SQL 쿼리 실행(SQLXMLOLEDB 공급자)

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

• ClientSideXML

• xml root

이 클라이언트측 ADO 예제 응용 프로그램에서는 예제 SQL 쿼리가 클라이언트에서 실행됩니다. ClientSideXML 속성이 True로 설정되었으므로 FOR XML 절이 없는 SELECT 문이 서버로 전송됩니다. 서버는 쿼리를 실행하고 클라이언트로 행 집합을 반환합니다. 그러면 클라이언트에서는 행 집합에 FOR XML 변환을 적용하여 XML 문서를 생성합니다.

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

[!참고]

코드에서 연결 문자열에 Microsoft SQL Server 인스턴스의 이름을 지정해야 합니다. 또한 이 예에서는 데이터 공급자에 대해 SQL Server Native Client(SQLNCLI10)를 사용하도록 지정하는데, 이렇게 하려면 추가 네트워크 클라이언트를 설치해야 합니다. 자세한 내용은 SQL Server 2008 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=SQLNCLI10;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