VB6 Verbindung zu einer Datenbank
Okay, was ich tun möchte, klingt einfach. Ich würde gerne laden Sie ein Formular und auf dem Formular-load-rufen Sie eine sql-Anweisung gibt 1 zurück, Element und legt es in TextBox1. Hier ist was ich habe, so weit.
Private Sub Form_Load()
Call openTheDatabase
End Sub
Public Function openTheDatabase() As Boolean
'-- Here we want to open the database
Dim sConnectionString As String
Dim strSQLStmt As String
'-- Build the connection string
sConnectionString = "PROVIDER = MSDASQL;driver={SQL Server};database=databasename ;server=servername;uid=;pwd=;"
strSQLStmt = "SELECT chvDealerName " & _
"From dbo.tblDealers Where chrVSCAcctNum = '90442001'"
TextBox1.Text = strSQLStmt
End Function
BEARBEITEN
Ok es war Text1.Text, aber jetzt bin ich nur immer die Zeichenfolge in der textbox, nicht den tatsächlichen Datenbank-Eintrag
besuchen connectionstrings.com
InformationsquelleAutor Zingo | 2014-01-28
Du musst angemeldet sein, um einen Kommentar abzugeben.
Können Sie sehen, ein solides Beispiel für die Einrichtung ADODB-connections hier: http://www.timesheetsmts.com/adotutorial.htm
Ihr Projekt muss ein Verweis auf die ADODB-Bibliothek vor dem nichts. Um dies zu tun:
Beispiel mit Ihrem Projekt:
Benutzerdefinierter Typ nicht definiert in der Zeile "Dim db as ADODB.Verbindung"
Hinzugefügt Anweisungen, wie Sie Links auf die ADO-Bibliothek für Sie - sorry! Guten Fang @GMastros
Ok, Jetzt bin ich immer Run-time error '91' Objektvariable oder With-block variable nicht festgelegt auf die Linie db.connectionString = sConnectionString?
Sorry, das war etwas, das ich Schlagsahne zusammen. Die dimension-Anweisungen erforderlich, die Neuen Schlüsselwörter. Ich aktualisiert die Beispiel.
InformationsquelleAutor Tony