Probleme mit Recordset und datenbank erstellen

Hussl · 08.01.2003, 08:01

hallo,

zu Problem 1: ich denke mal, dass man den Fehler so ungefähr abfangen könnte (für Verbesserungsvorschläge bzw. Korrekturen bin ich natürlich offen)

Code:

On Error Goto Fehler
'...hier der Code mit Recordset usw.

Fehler:
If Err.Number = ### Then ' ### = Fehlercode
   '...Direkt von Excel
End If

zu Problem 2: ich habe mal so etwas in ASP geschrieben (bzw. begonnen zu schreiben) Die Sache heißt ADOX. Vielleicht gibts aber auch eine bequemere Möglichkeit, das weiß ich aber nicht.

Code:

Set cat = CreateObject("ADOX.Catalog")
cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _
     "Data Source=" & Pfad & DBname)
If Err.Number = 0 Then Msgbox "Datenbank erstellt"

08.01.2003, 08:01	#2
Hussl Veteran Registriert seit: 08.02.2001 Alter: 42 Beiträge: 320	hallo, zu Problem 1: ich denke mal, dass man den Fehler so ungefähr abfangen könnte (für Verbesserungsvorschläge bzw. Korrekturen bin ich natürlich offen) Code: On Error Goto Fehler '...hier der Code mit Recordset usw. Fehler: If Err.Number = ### Then ' ### = Fehlercode '...Direkt von Excel End If zu Problem 2: ich habe mal so etwas in ASP geschrieben (bzw. begonnen zu schreiben) Die Sache heißt ADOX. Vielleicht gibts aber auch eine bequemere Möglichkeit, das weiß ich aber nicht. Code: Set cat = CreateObject("ADOX.Catalog") cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=" & Pfad & DBname) If Err.Number = 0 Then Msgbox "Datenbank erstellt" ____________________________________ Nein, ich bin nicht die Signatur, ich putz hier nur. http://www.chili-it.at

Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Gäste: 1)