| |
| In diesem Forum haben Sie die Möglichkeit Kommentare, Fragen und Verbesserungsvorschläge zu den im vb@rchiv gelisteten Tipps und Workshops zu posten.
Hinweis: Ein neues Thema kann immer nur über die jeweilige Tipps & Tricks bzw. Workshop Seite eröffnet werden! | Fragen zu Tipps & Tricks und Workshops im vb@rchivTipp 1306: Datenbanken und Tabellen mit ADOX erstellen (ADO) | | | Autor: dbsrhk | Tipp anzeigenDatum: 20.11.08 15:58 |
| Hallo,
Ich habe eine Frage zu den Tipps, wie meine Eine DB mit ADOX erstellt. Wenn ich den Code oben eintippe, bekomme ich folgende Fehlermeldung:
"Das Microsoft Jet-Datenbankmodul kann die Datei 'C:\Test.mdb' nicht öffnen. Sie ist bereits von einem anderen Benutzer exklusiv geöffnet, oder Sie benötigen eine Berechtigung, um die Daten lesen zu können."
Ein anderer Benutzer ist klar ausgeschlossen. Ebenso, dass die DB bereits geöffnet ist. Ich habe darauf hin ein wenig rumexperimentiert und herausgefunden, dass ich in meinem Home-Ordner die Datenbank erstellen kann. Es scheint also ein Problem der Berechtigungen zu sein
Mein System: Windows Vista 64 Bit, MS Visual Studio 2008.NET
Danke | |
Re: Datenbanken und Tabellen mit ADOX erstellen (ADO) | | | Autor: herbert.px | Datum: 15.12.09 14:51 |
| Hallo,
ich habe den Quelltext ausprobiert, funktioniert auch soweit.
Folgendes Problem tritt aber auf, wenn ich in eine bestehende Tabelle weitere Felder einfügen möchte.
Mein Quelltext dazu sieht folgendermaßen aus:
Dim oCat As ADOX.Catalog, oTable As ADOX.Table, oIndex As ADOX.Index
Set oCat = New ADOX.Catalog
oCat.ActiveConnection = oConn
Set oTable = oCat.Tables.Item("Tabelle1")
With oTable
.Columns.Append "Anschrift", adWChar, 60
With .Columns("Anschrift")
.Properties("Description") = "Feld3"
.Properties("Jet OLEDB:Allow Zero Length") = True
.Properties("Nullable") = True
End With
End With
Set oTable = Nothing
Wenn ich diesen Text ausführe kommt folgende Fehlermeldung:
"Laufzeitfehler '-2147217887 (80040e21)':
Fehler bei einem aus mehreren Schritten bestehenden OLE
DB-Vorgang. Prüfen Sie die einzelnen OLE DB-Statuswerte, falls
vorhanden. Daten wurden nicht verarbeitet."
Wenn ich dann auf Debuggen gehe, wird in der Entwicklungesumgebung die Zeile
.Properties("Nullable") = True
markiert. Wenn ich sie auskommentiere, funktioniert es. Ich brauche aber diese Porperty.
Warum funktioniert es im Zusammenhang mit dem Neuanlegen der Tabelle?
Im voraus schon mal vielen Dank.
herbert.px | |
| Sie sind nicht angemeldet! Um einen neuen Beitrag schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
|
|
Neu! sevEingabe 3.0
Einfach stark!
Ein einziges Eingabe-Control für alle benötigten Eingabetypen und -formate, inkl. Kalender-, Taschenrechner und Floskelfunktion, mehrspaltige ComboBox mit DB-Anbindung, ImageComboBox u.v.m. Weitere InfosTipp des Monats Access-Tools Vol.1
Über 400 MByte Inhalt
Mehr als 250 Access-Beispiele, 25 Add-Ins und ActiveX-Komponenten, 16 VB-Projekt inkl. Source, mehr als 320 Tipps & Tricks für Access und VB
Nur 24,95 EURWeitere Infos
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|