ODBC-Datensätze in VB6 aktualisieren

Open Database Connectivity ist Microsofts Schnittstelle für Anwendungen auf vielen verschiedene SQL-Datenbanken zugreifen. Z. B. möglicherweise die Daten in einer SQL Server-Datenbank, einer Oracle-Datenbank oder einer DB2-Datenbank gespeichert werden. ODBC ermöglicht Programmierern, Herstellen einer Verbindung mit einem dieser Motoren Datenbank über die ODBC-Schnittstelle. Innerhalb der Visual Basic-Anwendung eine Verbindung zur Datenbank hergestellt wird und dann die Datensätze gelesen und aktualisiert werden können.

Anweisungen

1 Öffnen Sie ein neues Standard EXE Visual Basic-Projekt. Wählen Sie im Menü "Projekt" und dann "Verweise". Klicken Sie auf das Kontrollkästchen neben "Microsoft ActiveX Data Objects 2.x" wobei "X" ist die höchste Zahl, die auf Ihrem Computer verfügbar ist. Klicken Sie auf "OK", um zu speichern und zu schließen.

2 Fügen Sie eine neue Schaltfläche, um die Standardeinstellung "Form1", die standardmäßig erstellt wurde. Nennen Sie die Schaltfläche "CmdUpdate" und legen Sie die Beschriftung auf "Update". Diese Schaltfläche werden alle Updates direkt an die entsprechenden Tabellen speichern.

3 Deklarieren von Variablen, um die ADODB-Objekte speichern und eine String-Variable für die SQL-Anweisung selbst.

Dim oConn als ADODB. Verbindung

Dim StrSQL As String

Dim oCmd als ADODB.Command

4 Verbindung zur Datenbank im "Form_Load" Ereignis "Form1".

Legen Sie oConn = New ADODB. Verbindung

oConn.ConnectionString = "DSN = MyDBName; UID = Admin; PWD = Passwort; "

oConn.Open

5 Code die SQL-Anweisungen für die "Update"-Anweisung in das Click-Ereignis des "CmdUpdate."

StrSQL = "UPDATE MyTable SET ColumnName ="NewName"WHERE ID = 3;"

oCmd.CommandText = StrSQL

oCmd.Execute