Przykład trwałości XML zestawu rekordów ADO w C++

2020-10-19

W tym artykule opisano sposób utrwalania/ładowania zestawu rekordów ADO do/z zewnętrznego pliku XML, obiektu ADO IStream i obiektu DOM XML.

Oryginalna wersja produktu: zestaw rekordów ADO
Oryginalny numer KB: 262450

Podsumowanie

W przypadku platformy ADO 2.5 lub nowszej obiekty zestawu rekordów można utrwalać w dowolnym obiekcie implementującym IStream interfejs. Przykładowy kod w tym artykule pokazuje, jak utrwalać/ładować zestaw rekordów ADO do/z zewnętrznego pliku XML, obiektu ADO IStream Object i XML DOM.

Więcej informacji

W przykładzie użyto tabeli autorów w bazie danych pubs programu SQL Server.
Zmodyfikuj parametry połączenia, aby podać odpowiednią nazwę źródła danych i poświadczenia użytkownika.
Ponieważ istnieją dwie importowane biblioteki DLL, dla uproszczenia programowania zmieniam nazwę przestrzeni ADO (ADODB) na MSXML i używam MSXML dla interfejsów zdefiniowanych w obu bibliotekach DLL. Alternatywnie można zawsze prefiksować interfejs z odpowiednią przestrzenią nazw bez wykonywania tej czynności.

Uwaga

Przed uruchomieniem tego kodu musisz zmienić User ID=<username> i Password=<strong password> na poprawne wartości. Upewnij się, że User ID masz odpowiednie uprawnienia do wykonania tej operacji w bazie danych.

// 1. ADO Recordset <-> external xml file
// 2. ADO Recordset <-> ADO IStream Object
// 3. ADO Recordset <-> DOM Document

#import "C:\Program files\Common Files\System\Ado\msado15.dll" rename_namespace("MSXML") rename("EOF", "ADOEOF")

#import "c:\winnt\system32\msxml.dll"
using namespace MSXML;

#include "stdio.h"
#include "io.h"
void dump_error(_com_error &e); //exception handling

void main()
{
    HRESULT hr;
    CoInitialize(NULL);

    try
    {
            //open the connection, get the reocrdset ready
            _ConnectionPtr pConn;
            _RecordsetPtr pRs;

            hr = pConn.CreateInstance(__uuidof(Connection));
            hr = pRs.CreateInstance(__uuidof(Recordset));

            pConn->CursorLocation = adUseClient;
            _bstr_t strConn("Provider=sqloledb;Data Source=juliaj01;Initial Catalog=pubs;User Id=<username>;Password=<strong password>;");
            hr = pConn->Open(strConn, "<username>", "<strong password>", adConnectUnspecified);
            hr = pRs->Open("SELECT * from authors", pConn.GetInterfacePtr(), adOpenForwardOnly, adLockReadOnly, adCmdText);

            //preparation to save RS as xml file,
            struct _finddata_t xml_file;
            long hFile;
            if( (hFile = _findfirst("authors.xml", &xml_file ))!= -1L)
            {
                DeleteFile("authors.xml"); //if the file exists, delete it
            }

            // 1. Persist it to an external xml file by calling Save with file name and adPersistXML
            hr = pRs->Save("authors.xml", adPersistXML);

            // 2. Persist it to ADO IStream Object
            _StreamPtrpStream ; //declare one first
            pStream.CreateInstance(__uuidof(Stream)); //create it after
            hr = pRs->Save(pStream.GetInterfacePtr(), adPersistXML); //old trick, call Save 

            // 3. Persist it to DOM Document
            IXMLDOMDocumentPtr pXMLDOMDoc;
            pXMLDOMDoc.CreateInstance(__uuidof(DOMDocument));
            hr = pRs->Save(pXMLDOMDoc.GetInterfacePtr(), adPersistXML);
            // if you want to check out the content call printf(pXMLDOMDoc->Getxml());

            //Recycle the Recordset object
            hr = pRs->Close();

            // 4. load the recordset back from the file by calling Open with MSPersist provider and adCmdFile.
            // the Recordset will be a ReadOnly, Forwardly only
            hr = pRs->Open("authors.xml","Provider=MSPersist;",adOpenForwardOnly,adLockReadOnly,adCmdFile);
            hr = pRs->Close();

            // 5. Load from IStream object, call Open, first param is pStream.GetInterfacePtr()

            // Set the steam object position to the beginning of the stream:
            pStream->Position = 0;

            // call Open, passing in vtMissing for connection string, see Q245485 for details
            hr = pRs->Open(pStream.GetInterfacePtr(),vtMissing, adOpenForwardOnly,adLockReadOnly,adCmdFile);

            hr = pRs->Close();

            // 6 .Load from DOM Document, call Open, first param is pXMLDOMDoc.GetInterfacePtr() and
            // pass in vtMissing for connection string, see Q245485

            hr = pRs->Open(pXMLDOMDoc.GetInterfacePtr(), vtMissing, adOpenForwardOnly, adLockReadOnly, adCmdFile);

            hr = pRs->Close();

            //Don't forget to clean up the stream object
            hr = pStream->Close();

            }
            catch(_com_error &e)
            {
                dump_error(e);
            }
}

void dump_error(_com_error &e)
{
    _bstr_t bstrSource(e.Source());
    _bstr_t bstrDescription(e.Description());

    // Print Com errors.
    printf("Error\n");
    printf("\tCode = %08lx\n", e.Error());
    printf("\tCode meaning = %s", e.ErrorMessage());
    printf("\tSource = %s\n", (LPCSTR) bstrSource);
    printf("\tDescription = %s\n", (LPCSTR) bstrDescription);
}

Uwaga

Przykładowy kod podany w tym artykule zawiera odwołanie do programu MSXML 2.5 lub starszego. Jeśli nowsza wersja programu MSXML została zainstalowana w trybie zamiany na maszynie, przykładowy kod automatycznie użyje tej nowej wersji. Jeśli nowsza wersja programu MSXML została zainstalowana w trybie równoległym na maszynie, kod może używać starszej wersji.

Aby uruchomić kod za pomocą programu MSXML 6.0, należy zmienić następujące wiersze kodu:

Wymiana:

#import "C:\Program files\Common Files\System\Ado\msado15.dll" rename_namespace("MSXML") rename("EOF", "ADOEOF")

#import "c:\winnt\system32\msxml.dll" by using namespace MSXML;

Tym:

#import "C:\Program files\Common Files\System\Ado\msado15.dll" rename_namespace("MSXML2") rename("EOF", "ADOEOF")

#import "c:\winnt\system32\msxml6.dll" using namespace MSXML2;

Wymiana:

pXMLDOMDoc.CreateInstance(__uuidof(DOMDocument));

Tym:

pXMLDOMDoc.CreateInstance(__uuidof(DOMDocument60));

Aby uruchomić kod za pomocą programu MSXML 6.0, należy zmienić następujące wiersze kodu:

Wymiana:

#import "C:\Program files\Common Files\System\Ado\msado15.dll" rename_namespace("MSXML") rename("EOF", "ADOEOF")

#import "c:\winnt\system32\msxml.dll" by using namespace MSXML;

Tym:

#import "C:\Program files\Common Files\System\Ado\msado15.dll" rename_namespace("MSXML2") rename("EOF", "ADOEOF")

#import "c:\winnt\system32\msxml6.dll" using namespace MSXML2;

Wymiana:

pXMLDOMDoc.CreateInstance(__uuidof(DOMDocument));

Tym:

pXMLDOMDoc.CreateInstance(__uuidof(DOMDocument60));

Udostępnij za pośrednictwem

Przykład trwałości XML zestawu rekordów ADO w C++

Podsumowanie

Więcej informacji

Dodatkowe zasoby