Πώς να χρησιμοποιήσετε το Command αντικειμένου σε VB6 να διαγράψετε αρχεία σε SQL

Το Basic ( VB ) αντικείμενο εντολών Visual σας επιτρέπει να εκτελέσετε ερωτήματα σε ένα διακομιστή SQL . Μπορείτε να προσθέσετε ή να διαγράψετε αρχεία χρησιμοποιώντας το αντικείμενο εντολή VB . Μπορείτε να χρησιμοποιήσετε το " ExecuteNonQuery " λειτουργία εντολή για να διαγράψετε μια εγγραφή . Η συνάρτηση δεν επιστρέφει καμία απάντηση , σε αντίθεση με ένα τυπικό ερώτημα επιλογής , η οποία επιστρέφει ένα σύνολο ρεκόρ των αρχείων πίνακα . Μπορείτε επίσης να καθορίσετε τις εγγραφές που θέλετε να διαγράψετε για να αποφευχθεί η διαγραφή όλων των εγγραφών στον πίνακα . Οδηγίες
Η

1 Κάντε διπλό κλικ στο αρχείο προέλευσης VB για να το ανοίξετε στον υπολογιστή σας και να φορτώσετε το λογισμικό Visual Basic επεξεργασίας . Το αρχείο ανοίγει με τον σχεδιαστή. Κάντε δεξί κλικ στη φόρμα και επιλέξτε " Προβολή κώδικα " για την πρόσβαση στον κώδικα όπου μπορείτε να πληκτρολογήσετε το ερώτημα εντολή . 2

Δημιουργήστε τη σύνδεση με το διακομιστή SQL . Πληκτρολογήστε τον ακόλουθο κώδικα για να κάνει τη σύνδεση :

Dim conn Όπως String

conn = "Πηγή δεδομένων = server? Initial Catalog = βάση δεδομένων? ID χρήστη = χρήστη? Κωδικός = περάσει"

Αντικαταστήστε το " server" με το όνομα του υπολογιστή-διακομιστή . Αντικαταστήστε το " βάση δεδομένων " με το όνομα της βάσης δεδομένων , και αντικαταστήστε το " χρήστης " και "περάσει" με τις πιστοποιήσεις που χρησιμοποιούνται για τη σύνδεση με το διακομιστή .
Εικόνων 3

Ρυθμίστε το ερώτημα διαγραφής SQL . Ο κώδικας που ακολουθεί διαγράφει τον πελάτη με ID 1 :

Dim ερώτημα As String

query = " διαγραφή από τον πελάτη WHERE CustomerID = 1 "
Η 4

Εκτέλεση το ερώτημα χρησιμοποιώντας το αντικείμενο της εντολής. Πληκτρολογήστε τον ακόλουθο κώδικα για να ολοκληρωθεί η εκτέλεση του ερωτήματος :

conn.Open ( )

cmd = Νέα SqlCommand (ερώτημα , con )

cmd.ExecuteNonQuery ( )


εικόνων