? Ein Updategram ist eine Datenbank Structured Query Language (SQL )-Anweisung in XML formatiert. Visual Basic 6.0 verwendet ActiveX Database Objects zu einer Datenbank verbinden , um SQL-Abfragen , Aktualisierungen und Löschungen durchführen . Eine Reihe von Text kann die ADO-Steuerelement übergeben werden. Formatieren eines XML-Dokuments in der VB6-Anwendung ermöglicht es Ihnen, mehrere Updates in einer einzigen Datenbank-Transaktion durchzuführen. Sie können auch aktualisieren mehr als eine Tabelle innerhalb einer einzigen Transaktion in einem Updategram . Anleitung
1 Öffnen Sie eine neue
VB6 Standard EXE-Projekt . Fügen Sie eine Schaltfläche auf den Standardwert " Form1 " und nennen Sie es " cmdUpdateGram . "
2
Definieren Sie eine Variable für die Datenbank Connection-Objekt , ein Command-Objekt und zwei Stream-Objekte im Code für die " cmdUpdateGram " -Taste. Ein Stream-Objekt wird für Eingangs-und einen für den Ausgang verwendet werden , so nennen sie entsprechend. Verbindung mit dem Connection-Objekt , die Eigenschaften des Connection-Objekt und aktivieren die Verbindung
conn.Open " Server = (local ); database = Northwind ; Integrated Security = SSPI ; " . Conn.Properties ( " SQLXML Version ") = " SQLXML.3.0 " Set cmd.ActiveConnection = conn
3
Definieren Sie eine Zeichenfolge , die korrekt formatierte XML-String zu halten. Nennen Sie es etwas Sinnvolles wie " sXMLUpdate . " Die XML sollten die Schlüsselwörter sync enthalten , vorher und nachher. Ein Sync ist eine Einheit der Arbeit oder einer Transaktion . Ihre XML kann mehr als ein Sync und jeder Sync können mehr als eine vor und nach dem Paar haben .
4
Einfügen eines Datensatzes , indem Sie den Wert für das Schlüsselwort vor . Lassen Sie den Wert der nach dem Schlüsselwort , um eine delete.Example eines Einsatzes XML Datagram Zeichenfolge in VB6 ausführen: sXMLUpdate = " " ; sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " ; " sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " "
5
Öffnen Sie die Input-Stream , und schreiben Sie die Inhalte sXMLUpdate in diesen Stream mit dem " WriteText " method.strmIn.OpenstrmIn.WriteText sXMLUpdate
Öffnen Sie die Ausgabe-Stream . Stellen Sie den "Output Stream" -Eigenschaft des Command-Objekt zu " strmOut . " Führen Sie den Befehl Objekt , um die Aktionen in entsprechender Ausführlichkeit " sXMLUpdate . "
StrmOut.Opencmd.Properties ( "Output Stream " ) . Value = strmOutcmd.Execute , AdExecuteStream