By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
425,790 Members | 1,409 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 425,790 IT Pros & Developers. It's quick & easy.

function to make dataabse in zipped form ?

P: n/a
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!
Nov 12 '05 #1
Share this Question
Share on Google+
2 Replies


P: n/a
If you have a command line zip program, you may want to try the Shell command to zip the
mdb after you create it.

--
Wayne Morgan
"Peter yeshew" <fr*******@abv.bg> wrote in message
news:3f*********************@news.frii.net...
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!

Nov 12 '05 #2

P: n/a
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" <co***************************@hotmail.com> wrote in message
news:N3*****************@newssvr16.news.prodigy.co m...
If you have a command line zip program, you may want to try the Shell command to zip the mdb after you create it.

--
Wayne Morgan
"Peter yeshew" <fr*******@abv.bg> wrote in message
news:3f*********************@news.frii.net...
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!


Nov 12 '05 #3

This discussion thread is closed

Replies have been disabled for this discussion.