|
Da_Stimulator
DEV Team Forum Moderator
USA
3373 Posts |
 Posted - 31 October 2000 : 20:21:59
|
Just figured you might want to add this to setup.asp or something in case people want to upgrade there DB's to 2k.
<font color=red>
DoConvertMDB "C:\whatever\97database.mdb", "C:\whatever\2000database.mdb", 5
Sub DoConvertMDB(SourceDB, DestDB, Format)
Dim Engine
Set Engine = CreateObject("JRO.JetEngine")
Engine.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & SourceDB, _
"Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Engine Type=" & Format & ";Data Source=" & DestDB
End Sub
</font id=red>
<font color=red>Da_Stimulator</font id=red>
<font color=red>http://aokingdom.com</font id=red>
<font color=blue>response.write("I know what you coded last summer!")</font id=blue> |
|
Topic Locked
