[AccessD] System MDW

John,

Dunno if it helps in your situation but

	for x=0 to 95:?x;"
";application.CurrentProject.Connection.Properties(x).Name;"=",currentprojec
t.Connection.Properties(x).Value:next x

Gives me the system.mdw location at item(64) for a locally created db.  If
all else fails maybe you could create a dummy "open" db during the install
and get the mdw location from it????????????
\
Bruce

>  -----Original Message-----
> From: 	accessd-admin at databaseadvisors.com
> [mailto:accessd-admin at databaseadvisors.com] 
> Sent:	Monday, February 17, 2003 2:39 PM
> 
> To:	accessd at databaseadvisors.com
> Subject:	RE: [AccessD] System MDW
> 
> On a related note, is there anyway to access the help for the adox stuff?
> 
> John W. Colby
> Colby Consulting
> www.ColbyConsulting.com
> 
> -----Original Message-----
> From: accessd-admin at databaseadvisors.com
> [mailto:accessd-admin at databaseadvisors.com]On Behalf Of John W. Colby
> Sent: Sunday, February 16, 2003 10:31 PM
> To: AccessD
> Subject: [AccessD] System MDW
> 
> 
> Does anyone know how to get the path to the system mdw?
> 
> Actually let's back up.  I need to create a new encrypted, password
> protected database.  One way to do that (using A2K / ADO) is to use the
> adox
> library as follows:
> 
>     Dim cat As New ADOX.Catalog
>     Dim strDataSrc As String
>     strDataSrc = "c:\New.mdb"
>     cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _
>                 "Data Source=" & strDataSrc & ";" & _
>                 "Jet OLEDB:Encrypt Database=True;"
>     cat.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
>                             "Data Source=" & strDataSrc & ";Jet
> OLEDB:System
> database=" & _
>                             "C:\Program Files\Microsoft
> Office\Office\SYSTEM.MDW"
>     cat.Users("Admin").ChangePassword "", "password"
> 
> As you can see the activeconnection property is looking for the path to
> the
> mdw.  Since this is going to run on YOUR system I have no idea where this
> is
> so... how do I find it?
> 
> Or is ther an easier way?
> 
> John W. Colby
> Colby Consulting
> www.ColbyConsulting.com
> 
> ----------------------------------------------------
> Is email taking over your day?  Manage your time with eMailBoss.
> Try it free!  http://www.eMailBoss.com
> 
> 
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 
> 
> 
> ----------------------------------------------------
> Is email taking over your day?  Manage your time with eMailBoss.  
> Try it free!  http://www.eMailBoss.com
-------------- next part --------------
A non-text attachment was scrubbed...
Name: winmail.dat
Type: application/ms-tnef
Size: 3212 bytes
Desc: not available
URL: <http://databaseadvisors.com/pipermail/accessd/attachments/20030217/b11620c0/attachment-0002.bin>