Πώς μπορώ Γράψτε Updategrams XML Script σε VB6

; Μια Updategram είναι μια βάση δεδομένων δομημένη γλώσσα ερωτημάτων ( SQL) μορφοποιημένα σε XML . Visual Basic 6.0 χρησιμοποιεί ActiveX αντικείμενα βάσης δεδομένων για να συνδεθείτε σε μια βάση δεδομένων για να εκτελέσετε ερωτήματα SQL , ενημερώσεις και διαγράφει . Μια συμβολοσειρά κειμένου μπορεί να περάσει στον έλεγχο της ADO . Μορφοποίηση ενός εγγράφου XML μέσα από την εφαρμογή VB6 σας επιτρέπει να εκτελέσετε πολλές ενημερωμένες εκδόσεις σε μια ενιαία συναλλαγή βάσης δεδομένων . Μπορείτε επίσης να ενημερώσετε περισσότερους από έναν πίνακα μέσα σε μία μόνο συναλλαγή σε Updategram . Οδηγίες
Η

1 Ανοίξτε ένα νέο έργο Standard EXE VB6 . Προσθέστε ένα κουμπί στην προεπιλεγμένη " Form1 " και ονομάστε το " cmdUpdateGram . " 2

Ορίστε μια μεταβλητή για το αντικείμενο σύνδεσης σε βάση δεδομένων , ένα αντικείμενο εντολής και δύο αντικείμενα ρεύμα στον κώδικα για την κουμπί " cmdUpdateGram " . Ένα αντικείμενο ρεύμα θα χρησιμοποιηθεί για την είσοδο και ένα για έξοδο , έτσι ώστε να τους αναφέρουμε αναλόγως. Συνδεθείτε με το αντικείμενο , ρυθμίστε τις ιδιότητες του αντικειμένου σύνδεσης και ενεργοποιήστε τη σύνδεση

conn.Open . "Διακομιστής = ( τοπική ) ? Βάσης δεδομένων Northwind = ? Ενσωματωμένη ασφάλεια = SSPI ? " Conn.Properties ( " SQLXML Version" ) = " SQLXML.3.0 " Set cmd.ActiveConnection = conn εικόνων
3

Ορίστε μια σειρά για να κρατήσει το σωστά μορφοποιημένο string XML . Το όνομα αυτό κάτι που έχει νόημα , όπως " sXMLUpdate . " Η XML πρέπει να περιέχει το συγχρονισμό λέξεις-κλειδιά , πριν και μετά . Μια συγχρονισμού είναι μια μονάδα εργασίας ή μία μόνο συναλλαγή. XML σας μπορεί να έχει περισσότερες από μία συγχρονισμού και κάθε συγχρονισμού μπορεί να έχει περισσότερες από μία πριν και μετά το ζευγάρι .
Η

4 Τοποθετήστε ένα ρεκόρ , αφήνοντας εκτός την τιμή για την προηγούμενη λέξη κλειδί. Αφήστε συμψηφίσει την αξία της μετά -κλειδί για να εκτελέσει μια delete.Example μιας συμβολοσειράς ένθετο XML Datagram σε VB6 : sXMLUpdate = " " ? sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " ? " sXMLUpdate = sXMLUpdate & " " sXMLUpdate = sXMLUpdate & " "
5

Ανοίξτε το ρεύμα εισόδου , ​​και να γράψει το περιεχόμενο της sXMLUpdate σε αυτό το ρεύμα με τη χρήση του " WRITETEXT " method.strmIn.OpenstrmIn.WriteText sXMLUpdate

Ανοίξτε το ρεύμα εξόδου . Ρυθμίστε το "Output Stream» ιδιότητα του αντικειμένου εντολή για να " strmOut . " Εκτελέστε το αντικείμενο εντολών για να εκτελέσετε τις ενέργειες που προβλέπονται στο " sXMLUpdate . "