Dim whatever As Database .. !?

kan man godt det??? følger lige med...

keysersoze:> yeps .. det kan man godt .. jeg har set det før i eksempler herfra, men jeg har sku\'t kunnet finde den reference der skulle bruges..

Det er noget a\'la:

Dim db As Database

db.CreateDatabase(\"c:\\hihi.mdb\")

mener jeg ...

Kan man ikke nøjes med at oprette en Connection gennem ADO og så oprette den der i gennem ? Jeg mener jeg så det blive brugt i et VBScript engang men kan ikke huske om det var gennem et ADODB komponent eller...
Oh well, det kunne måske være et spor...

winkill:> have noo idea :-(

Jeg tog vidst fejl... har lige surfet MSDN tyndt uden at finde noget (hvad ADO angår).
Kan man ikke bare Base64 encode en tom Access database til en string og så \"pakke\" denne ud når der skal bruges en ny database ? Eller retter; ville det være en brugbar løsning ?

winkill:> det ville da nok kunn lade sig gøre, men jeg vil helst gerne have at databasen bliver lavet AF VB .. eller af Access driveren ..

tdaugaard> Jeg ved ikke, om det er dette du søger, men her er et lille udklip :

START CUT&PASTE

  \' Create a reference to daoTable2 indirectly,
  \' as a dependent object of the DAO DBEngine object.
  Dim daoDBE As DAO.DBEngine
  Dim daoWs As DAO.Workspace
  Dim daoDb As DAO.Database
  Dim daoTable2 As DAO.TableDef

  Set daoDBE = DAO.DBEngine
  Set daoWs = daoDBE.Workspaces(0)
  Set daoDb = daoWs.CreateDatabase(\"db1.mdb\", _
  dbLangGeneral)
  Set daoTable2 = daoDb.CreateTableDef(\"Table2\")

END CUT&PASTE

Håber, at du kan bruge det...

Hej igen  ^__^

Jeg fandt lidt mere om CreateDatabase, men det er lidt ,ere fyldigt, så jeg tog mig den frihed at mail\'e det til dig på e@tdaugaard.dk

Mange takker :-) Jeg kigger på det i morgen ..

Hej stargate/tdaugaard
Kunne jeg få én af Jer til at maile den information om CreateDatabase til mig også :-)

På forhånd tusind tak

Jette
jnl@ncc.dk

Jette >  Yep, men det bliver først i eftermiddag, når jeg får fri  :-)

stargate: kan du gennemskue hvordan man opretter en native Access2000 db med CreateDatabase. Så vidt jeg har kunne finde ud af kan man definere dbVersion10, ..11, ..20 og ..30 hvor det sidste er default. Dette bruger så Jet 3.x engine. Men for at bruge Access2000 skal man såvidt jeg ved bruge Jet 4.0. Jeg har prøvet med dbVersion40 men det virker ikke. Heller ikke med hardcode (64), altså med udgangspunkt i dit eksempel:

Set daoDb = daoWs.CreateDatabase(\"db1.mdb\", dbLangGeneral, 64)

idet dbVersion30 = 32 og dbVersion20 = 16 

Any ideas? Jeg har VB6/SP4.

Jeg har i øvrigt et komplet working example (fra Wrox\' Beginning VB 6 Databse Programming) hvis nogen skulle være interesseret. Inkluderer oprettelse af tabeller, felter og relationer.

cstern: Jeg vil meget gerne se det eksempel du har fra Wrox\' Beginning VB 6 Database Programming... Kan du sende det pr. email?

stargate: Tak for det!

Jette
jnl@ncc.dk

cstern> der står faktisk noget om dette (er jeg sikker på) i de docs jeg sendte tdaugaard, så dem kan jeg mail\'e dig i eftermiddag, hvis du er interesseret.
Jeg vil gerne se det x-ample du har....

stargate: Giv mig din e-mail add så sender jeg det.
Jeg har i mellemtiden løst det andet problem. Det var når man referer til MS DAO 3.51 Object Library i projektet så bliver det en Access97 database. Nu har jeg lavet det om til DAP 3.6 - så bliver det Access2000 som standard!

Mht eksemplet skal man have et katalog der hedder C:\\BegDB (eller ret i koden) til databasen.

Jette: jeg sender det. Husk at rette ovenstående hvis du vil have Access2000.

Lige en note: Når man bruger ovenstående DAO 3.6 Library er dbVersion40 defineret (og har som forventet værdien 64). Og denne type benyttes som default.

stargate. Demo sendt til jack@p..

ps. Jeg vil gerne se de doc\'s du har.

cstern >  Tak for demo.  Jeg sender doc\'s i eftermiddag...

cstern: Jeg har modtaget eksemplet, tak for det..

stargate:> jeg bruger cstern\'s eksempel da det var lige hvad jeg skulle. men ellers tak :-)
cstern:> lav lige et svar ..

Ok, men så deler jeg med stargate, da nøglen jo er createdb som stargate angav.

I øvrigt var der en fejl i min kommentar kl. 11.59. Det skal selvfølgelig være DAO 3.6, ikke DAP 3.6 - men det har I jo nok regnet ud...

tdaugaard >  Sku\' det være en anden gang....
cstern >  Nice Guy....