? En Updategram er en database strukturert spørrespråk ( SQL ) uttalelse formatert i XML. Visual Basic 6.0 bruker ActiveX Database Objects å koble til en database for å utføre SQL-spørringer , oppdateringer og sletter . En streng med tekst kan sendes til ADO kontroll. Formaterer et XML-dokument i VB6 programmet lar deg utføre flere oppdateringer i en enkelt database transaksjon . Du kan også oppdatere mer enn én tabell i en enkelt transaksjon i en Updategram . Instruksjoner
en

Åpne en ny VB6 Standard EXE -prosjekt . Legge til en knapp til standard " Form1 " og gi den navnet " cmdUpdateGram . "
2

Definer en variabel for database tilkobling objekt, en kommando objekt og to stream objekter i koden for " cmdUpdateGram "-knappen . En strøm objekt vil bli brukt for inngang og en utgang for , så nevne dem tilsvarende. Koble til tilkoblingsobjektet , angir du egenskapene for tilkoblingen objektet og aktivere tilkoblingen

conn.Open "server = (local ) ; database = Northwind ; Integrated Security = SSPI ; " . Conn.Properties ( " SQLXML Version" ) = " SQLXML.3.0 " Set cmd.ActiveConnection = conn
3

Definer en streng for å holde riktig formatert XML streng. Navnet noe meningsfullt , for eksempel " sXMLUpdate . " The XML bør inneholde søkeord sync , før og etter. En sync er en enhet av arbeid eller en transaksjon . XML kan ha mer enn én sync og hver synkronisering kan ha mer enn én før og etter par.
4

Sett en rekord ved å forlate off verdien for før nøkkelordet . La ut verdien av etter nøkkelord for å utføre en delete.Example av et innstikk XML Datagram streng i VB6 : sXMLUpdate = " " ; sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " < /updg : før >" sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " ; < /updg : etter > " sXMLUpdate = sXMLUpdate &" < /updg : sync > " sXMLUpdate = sXMLUpdate &" < /root > "
5

Åpne input stream , og skrive ut innholdet i sXMLUpdate til at strømmen ved hjelp av " WriteText " method.strmIn.OpenstrmIn.WriteText sXMLUpdate

Åpne output stream . Still "Output Stream " eiendom av kommandoen objektet til " strmOut . " Utfør kommandoen objektet til å utføre handlinger som er angitt i " sXMLUpdate . "

StrmOut.Opencmd.Properties ( "Output Stream ") . Verdi = strmOutcmd.Execute , , adExecuteStream