ADO를 사용하여 DiffGram 실행(SQLXML 4.0)

  • 아티클

적용 대상: SQL Server Azure SQL 데이터베이스

이 Microsoft Visual Basic 애플리케이션은 ADO를 사용하여 Microsoft SQL Server instance 연결을 설정한 다음 DiffGram을 실행합니다. 이 애플리케이션에서 DiffGram 및 XSD 스키마는 파일에 저장됩니다. 애플리케이션은 지정된 파일에서 DiffGram을 로드합니다. DiffGram 예제에 설명된 DiffGram(및 연결된 XSD 스키마)을 사용할 수 있습니다.

다음은 예제 애플리케이션의 프로세스입니다.

  • conn 개체(ADODB. 연결)은 특정 서버에서 실행 중인 SQL Server instance 대한 연결을 설정합니다.

  • cmd 개체(ADODB. Command)는 설정된 연결에서 실행됩니다.

  • 명령 언어가 DBGUID_MSSQLXML로 설정됩니다.

  • DiffGram은 파일에서 명령 스트림(strmIn)에 복사됩니다.

  • 명령의 출력 스트림은 StrmOut 개체(ADODB)로 설정됩니다. Stream) 반환된 데이터를 수신합니다.

  • SQLOLEDB 공급자를 사용하면 기본적으로 Sqlxmlx.dll에서 제공되는 Microsoft SQLXML 기능을 사용할 수 있게 됩니다. SQLOLEDB 공급자와 함께 Sqlxml4.dll 사용하려면 SQLOLEDB 공급자 연결 개체에서 SQLXML Version 속성을 SQLXML.4.0으로 설정해야 합니다.

  • 명령(DiffGram)이 실행됩니다.

예제 애플리케이션 코드는 다음과 같습니다.

참고

코드에서 연결 문자열에 SQL Server instance 이름을 제공해야 합니다.

Private Sub Command1_Click()  
  Dim cmd As New ADODB.Command  
  Dim conn As New ADODB.Connection  
  Dim strmOut As New ADODB.Stream  
  Dim strmIn As New ADODB.Stream  
  
  'Open a connection to SQL Server.  
  conn.Provider = "SQLOLEDB"  
  conn.Open "server=SqlServerName; database=tempdb; Integrated Security=SSPI; "  
  conn.Properties("SQLXML Version") = "SQLXML.4.0"  
  Set cmd.ActiveConnection = conn  
  strmIn.Open  
  strmIn.Charset = "UTF-8"  
  strmIn.LoadFromFile "C:\SomeFilePath\SampleDiffGram.xml"  
  strmIn.Position = 0  
  Set cmd.CommandStream = strmIn  
  
  strmOut.Open  
  cmd.Properties("Output Stream").Value = strmOut  
  cmd.Properties("Output Encoding").Value = "UTF-8"  
  
  cmd.Dialect = "{5d531cb2-e6ed-11d2-b252-00c04f681b71}"  
  cmd.Properties("Mapping Schema") = "C:\SomeFilePath\SampleDiffGram.xml"  
  cmd.Execute , , adExecuteStream  
  strmOut.Position = 0  
  Set cmd = Nothing  
  strmOut.Charset = "UTF-8"  
  strmOut.SaveToFile "C:\DropIt.txt", adSaveCreateOverWrite  
  strmOut.Close  
  Set strmOut = Nothing  
  
End Sub

DiffGram을 테스트하려면

  1. 컴퓨터의 폴더에 DiffGram 예제의 예제 중 하나에서 DiffGrams 및 해당 XSD 스키마 중 하나를 복사합니다.

  2. Visual Basic을 열고 표준 EXE 프로젝트를 만듭니다.

  3. 프로젝트에 다음 참조를 추가합니다.

    Microsoft ActiveX Data Objects 2.8 Library

  4. 도구 상자에서 CommandButton을 클릭한 다음 양식에 단추를 그립니다.

  5. 단추를 두 번 클릭하여 코드를 편집하고 이 항목에서 제공된 애플리케이션 코드를 추가합니다.

  6. 코드에 DiffGram 및 XSD 파일 이름을 지정합니다. 연결 문자열 역시 적절하게 편집합니다.

  7. 애플리케이션을 실행합니다. 실행 결과는 사용자가 실행하는 DiffGram에 따라 다릅니다.