Einzelnen Beitrag anzeigen
Alt 24.07.2002, 14:06   #5
renew
Inventar
 
Registriert seit: 22.10.2000
Alter: 41
Beiträge: 5.552


Standard

Wenn ich es über ADO in VBA mach bekomm ich folgende Fehlermeldung:
Zitat:
Der angegeben SQL Server wurde nicht gefunden.
Das is meine Funktion:
Code:
Dim con As ADODB.Connection
Dim rst As ADODB.Recordset

Set con = New ADODB.Connection
Set rst = New ADODB.Recordset

Dim db As String

db = "edvverwaltung" 'Datenbankname

With con
    .CursorLocation = adUseClient
    .Provider = "SQLOLEDB"
    .ConnectionString = db
    
    .Open
End With

rst.Open "bildschirm", con, adOpenDynamic, adLockOptimistic

MsgBox rst!IDBildschirm

rst.Close
con.Close
Nur hab ich da noch nirgends den SQL Server angegeben. Drum wird er den wahrscheinlich auch nicht finden - nur wo geb ich den an?

@bev:

hört sich gut an. Nur wie geht des.
Geh ich auf Datei/Externe Daten/Tabelle verknüpfen, kann ich eine reihe an Filetypen angeben.
Ganz am Schluss steht ODBC Datenquelle. Ich hab die genommen (weil was anderes kanns eigenltich nicht sein) und dann? Dann kann ich eine Data Source auswählen. Nur ich glaub ich brauch noch an ODBC Treiber fürs SQL Server - is des korrekt? Weil ich hab keinen passenden ODBC Treiber gefunden.
Ich hab nur diese: dBase - Dateien Word; dBase-Dateien; Excel-Dateien, FoxPro Dateien, Microsoft Access - Datenbank, Visual FoxPro - Datenbank, Visual FoxPro - Tabellen.
renew ist offline   Mit Zitat antworten