You can also get a DLL version of Zip/Unzip code that you can reference.
--
Bradley
Software Developer
www.hrsystems.com.au
A Christian Response
www.pastornet.net.au/response
"Wayne Morgan" <comprev_gothroughthenewsgroup@hotmail.com> wrote in message
news:N3Kjb.8502$OI2.6760@newssvr16.news.prodigy.co m...[color=blue]
> If you have a command line zip program, you may want to try the Shell[/color]
command to zip the[color=blue]
> mdb after you create it.
>
> --
> Wayne Morgan
>
>
> "Peter yeshew" <freelance@abv.bg> wrote in message
> news:3f8f64e7$0$199$75868355@news.frii.net...[color=green]
> > Create a database in a zipped format
> >
> >
> > I have a function that creates a database. Is there any way to make
> > the function create the database in a zipped form?TThe function i have
> > is:
> >
> >
> > Function CreateDepotDB(tName As String, StrPassword As String)
> > '*******************************************
> > Dim wsp As Workspace, db As Database
> > Dim db2 As Database
> > Set db = CurrentDb
> > Set wsp = DBEngine.Workspaces(0)
> > Set db2 = wsp.CreateDatabase(tName, dbLangGeneral & ";pwd=" &
> > StrPassword)
> > db2.Close
> > End Function
> >
> >
> >
> >
> > *** Sent via Developersdex
http://www.developersdex.com ***
> > Don't just participate in USENET...get rewarded for it![/color]
>
>[/color]
