1 Ανοίξτε το Visual Basic αρχείο που περιέχει την τάξη που σκοπεύετε να χρησιμοποιήσετε για να καλέσετε τη λειτουργία των Τ - SQL . 2
Δημιουργήστε μια " Sub" ονομάζεται CallSQLFunction να κρατήστε τη λειτουργία που θα καλέσει τη συνάρτηση T - SQL . Προσθέστε ένα " ByVal « επιχείρημα συμβολοσειράς που ονομάζεται " ConnectionString " :
CallSQLFunction Public Sub ( ByVal ConnectionString Όπως String )
End Sub
εικόνων 3
Δημιουργία μεταβλητή συμβολοσειράς που ονομάζεται « ερώτημα ». Αναθέστε το κείμενο του ερωτήματος T - SQL που θέλετε να εκτελέσετε με το " ερώτημα " μεταβλητή :
Dim ερώτημα As String = "SELECT * "
Η 4
Δημιουργήστε μια "Χρήση " δήλωση στο πλαίσιο της λειτουργίας CallSQLFunction και να το χρησιμοποιήσετε σε συνδυασμό με την παράμετρο ConnectionString :
Χρησιμοποιώντας σύνδεση As New SqlConnection ( ConnectionString )
Τέλος Χρησιμοποιώντας
5
Ανοίξτε το SQL σύνδεση και να χρησιμοποιήσετε το " ExecuteReader ( ) " μέθοδος της κλάσης SqlCommand :
Dim εντολή As New SqlCommand ( QueryString , σύνδεση )
connection.Open ( )
Dim r Όπως SqlDataReader = command.ExecuteReader ( )
Η 6
Δημιουργήστε μια " Try" μπλοκ να επισυνάψουν " Ενώ η" loop . Χρησιμοποιήστε τα αποτελέσματα από την λειτουργία των Τ - SQL , όπως είναι απαραίτητο στο πλαίσιο της " Ενώ η" loop .
Δοκιμάστε
Ενώ r.Read ( )
» χρησιμοποιούν δεδομένα της βάσης δεδομένων εδώ
End Ενώ
End Δοκιμάστε
Η 7
Προσθήκη " Τέλος " δήλωση στον κώδικα . Κλείστε τον αναγνώστη μέσα στο " Τέλος " μπλοκ .
Τέλος
r.Close ( )
End Δοκιμάστε
8
Εκτελέστε τη λειτουργία ως που απαιτούνται σε όλη κωδικό σας .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα