PDA

Vollständige Version anzeigen : datenbank anlegen


Ravel
26.07.2001, 14:03
hallo,
ich möchte mal anfangen mit datenbanken zu arbeiten bzw.habe schon etwas darüber gelesen. kann mir bitte jemand SCHRITT FÜR SCHRITT erklären, wie ich da vorgehen muss? ich möchte eine ado-db anlegen.
also bitte schritt für schritt und anfängergerecht :)
ich danke euch vielmals
r a v e l

Stefan Kulpa
28.07.2001, 05:21
<font face="Verdana" size="2">Hallo,

nachfolgend ein simples Beispiel:</font>

<PRE><FONT SIZE=1 FACE=Courier New><FONT COLOR=#000080>Sub</FONT> CreateDatabase()
<FONT COLOR=#008000>'// ============================================================================</FONT>
<FONT COLOR=#008000>'// Funktion: |Beispiel zur Erstellung einer Jet-Datenbank mit ADOX.</FONT>
<FONT COLOR=#008000>'// ----------------------------------------------------------------------------</FONT>
<FONT COLOR=#008000>'// Voraussetzungen: |Verweis auf "Microsoft ADO Ext. 2.5 for DDL and Security"</FONT>
<FONT COLOR=#008000>'// ----------------------------------------------------------------------------</FONT>
<FONT COLOR=#008000>'// Parameter: |-</FONT>
<FONT COLOR=#008000>'// ----------------------------------------------------------------------------</FONT>
<FONT COLOR=#008000>'// Rückgabe: |-</FONT>
<FONT COLOR=#008000>'// ----------------------------------------------------------------------------</FONT>
<FONT COLOR=#008000>'// Erstellt: |28.07.2001; Stefan Kulpa</FONT>
<FONT COLOR=#008000>'// ----------------------------------------------------------------------------</FONT>
<FONT COLOR=#008000>'// Geändert: |</FONT>
<FONT COLOR=#008000>'// |</FONT>
<FONT COLOR=#008000>'// ============================================================================</FONT>
<FONT COLOR=#000080>Dim</FONT> objADODb <FONT COLOR=#000080>As</FONT> <FONT COLOR=#000080>New</FONT> ADOX.Catalog
<FONT COLOR=#000080>Dim</FONT> objADOTb <FONT COLOR=#000080>As</FONT> <FONT COLOR=#000080>New</FONT> ADOX.Table
<FONT COLOR=#000080>Dim</FONT> sDbPath <FONT COLOR=#000080>As String</FONT>

<FONT COLOR=#008000>'// 1. Schritt: Datenbank anlegen:</FONT>
sDbPath = App.Path & "\MyADO.mdb"
objADODb.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & sDbPath & ";"
<FONT COLOR=#008000>'// 2. Schritt: Tabelle anlegen:</FONT>
<FONT COLOR=#000080>With</FONT> objADOTb
.Name = "Kontakte"
.Columns.<FONT COLOR=#000080>Append</FONT> "Name", adVarWChar
.Columns.<FONT COLOR=#000080>Append</FONT> "Titel", adVarWChar
.Columns.<FONT COLOR=#000080>Append</FONT> "Ruf", adVarWChar
.Columns.<FONT COLOR=#000080>Append</FONT> "Notiz", adLongVarWChar
.Columns("Notiz").Attributes = adColNullable
<FONT COLOR=#000080>End</FONT> <FONT COLOR=#000080>With</FONT>
<FONT COLOR=#008000>'// 3. Schritt: Neu Tabelle zur Datenbank hinzufügen:</FONT>
objADODb.Tables.<FONT COLOR=#000080>Append</FONT> objADOTb
<FONT COLOR=#000080>Set</FONT> objADODb = <FONT COLOR=#000080>Nothing</FONT>

<FONT COLOR=#000080>End</FONT> <FONT COLOR=#000080>Sub</FONT>

</FONT></PRE>

<font face="Verdana" size="2">Folgendes ist dabei zu beachten:

Es gibt eigentlich keine ADO-Datenbanken.</li>
In diesem Beispiel wird eine Jet-Datenbank (= Access) erstellt.</li>
Dazu wird nicht ADO sondern ADOX benutzt; ADO selbst kann dies nicht.</li>

Die ganze Thematik ist doch recht umfangreich, so dass ich Dir wirklich ein entsprechendes Buch empfehle oder das "Durchforsten der MSDN resp. des Internet". Sich so durch das Thema zu hangeln, erscheint mir doch recht kompliziert - vielleicht hat ein anderer Forenteilnehmer gute Buchvorschläge und/oder kennt gute Links zum Einstieg ... auf jeden Fall wünsche ich Dir viel Erfolg!

Gruß</font>