다음을 통해 공유

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

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

샘플 애플리케이션에 대한 프로세스는 다음과 같습니다.

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

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

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

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

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

  • SQLOLEDB 공급자를 사용하는 경우 기본적으로 Sqlxmlx.dll제공하는 Microsoft SQLXML 기능을 가져옵니다. SQLOLEDB 공급자와 함께 Sqlxml4.dll 사용하려면 SQLOLEDB 공급자 연결 개체에서 SQLXML 버전 속성을 SQLXML.4.0으로 설정해야 합니다.

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

다음 코드는 샘플 애플리케이션입니다.

비고

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

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에 따라 달라집니다.

  • Last updated on