SQL 쿼리 실행(SQLXMLOLEDB 공급자)

이 예제에서는 다음 SQLXMLOLEDB 공급자별 속성을 사용하는 방법을 보여 줍니다.

• ClientSideXML

• xml root

이 클라이언트 쪽 ADO 샘플 애플리케이션에서는 클라이언트에서 간단한 SQL 쿼리가 실행됩니다. ClientSideXML 속성이 True로 설정되므로 FOR XML 절이 없는 SELECT 문이 서버로 전송됩니다. 서버는 쿼리를 실행하고 클라이언트에 행 집합을 반환합니다. 그런 다음 클라이언트는 FOR XML 변환을 행 집합에 적용하고 XML 문서를 생성합니다.

xml 루트 속성은 생성된 XML 문서에 대한 단일 최상위 루트 요소를 제공합니다.

비고

코드에서 연결 문자열에 Microsoft SQL Server 인스턴스의 이름을 제공해야 합니다. 또한 이 예제에서는 추가 네트워크 클라이언트 소프트웨어를 설치해야 하는 데이터 공급자에 대한 SQL Server SQLNCLI11(Native Client)의 사용을 지정합니다. 자세한 내용은 SQL Server Native Client에 대한 시스템 요구 사항을 참조하세요.

Option Explicit  
Sub main()  
Dim oTestStream As New ADODB.Stream  
Dim oTestConnection As New ADODB.Connection  
Dim oTestCommand As New ADODB.Command  
  
oTestConnection.Open "provider=SQLXMLOLEDB.4.0;data provider=SQLNCLI11;data source=SqlServerName;initial catalog=AdventureWorks;Integrated Security=SSPI ;"  
oTestCommand.ActiveConnection = oTestConnection  
oTestCommand.Properties("ClientSideXML") = True  
oTestCommand.CommandText = "SELECT TOP 10 FirstName, LastName FROM Person.Contact FOR XML AUTO"  
oTestStream.Open  
oTestCommand.Properties("Output Stream").Value = oTestStream  
oTestCommand.Properties("xml root") = "root"  
oTestCommand.Execute , , adExecuteStream  
  
oTestStream.Position = 0  
oTestStream.Charset = "utf-8"  
Debug.Print oTestStream.ReadText(adReadAll)  
End Sub  
Sub Form_Load()  
 main  
End Sub