PDA

Visualizza versione completa : creare un Database via codice con ADO in VB6


Neopolis
07-11-2001, 15.42.11
CIao a Tutti,

mi sapete dire come si fa?

In DAO si faceva cosi:

Set db = ws.CreateDatabase("C:\db.mdb", dbLangGeneral)

Ciao

badmood
07-11-2001, 15.56.10
Probabilmente dovrai usare sintassi SQL, del tipo "create schema" o simili. Da qualche parte avevo trovato un quick reference, se mi torna tra le mani ti posto l'indirizzo esatto.

Ciao

badmood
07-11-2001, 16.06.17
Oppure:

Sub CreateAccessDatabase(strDBPath As String)
Dim catNewDB As ADOX.Catalog
Set catNewDB = New ADOX.Catalog

catNewDB.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & strDBPath

Set catNewDB = Nothing
End Sub

Per altre informazioni prova su
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/odeopg/html/deovrchoosingadoordaoforworkingwithaccessdatabases .asp
e correlati.

Ciao

beee
19-11-2001, 23.34.34
Ma cosa ADOX.Catalog ??
Ho installato VB6, V. interdev , office xp, ma non ho nessun riferimento a ADOX.

Bye !!

badmood
20-11-2001, 10.10.48
Beh, era un esempio tratto dal sito Microsoft...
Comunque sia, ADOX un'estensione ad ADO.

Per semplificare:
Dim objCat As New ADOX.Catalog
objCat.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=c:\Pippo\MioDatabase.mdb"

Un esempio pi completo ed esteso lo trovi su
http://www.geocities.com/SiliconValley/Lakes/1636/ADOX1.htm

Invece su
http://www.able-consulting.com/ADOX_Faq.htm
ti spiegano anche come creare, in base ai parametri passati, database di tipo Access 97 o 2000

Ciao