Password db access

[claudio.carcass]

Ho una semplice procedura che genera le password autoamticamente.
Cerco il modo per poter cambiare dinamicamente la password al database di Access.

Grazie anticipatamente.

[optime]

http://msdn.microsoft.com/en-us/library/aa139977(office.10).aspx#acadvsql_dbpword

ma sta' attento!

[claudio.carcass]

scusa, la procedura che cerco è in asp...

[optime]

embè? da asp non puoi eseguire comandi sql? una ALTER è come una INSERT...

[claudio.carcass]

<%
arc="tata.mdb"
Dim strAlterPassword ' As String

strAlterPassword = "ALTER DATABASE PASSWORD [123456] NULL;"
Set objConn = Server.CreateObject("ADODB.Connection")
'Set objConn = New ADODB.Connection
With objConn
.Mode = adModeShareExclusive
.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(arc)
.Execute (strAlterPassword)
End With
objConn.Close
Set objConn = Nothing
%>

mi da errore...

Tipo di errore:
Microsoft JET Database Engine (0x80004005)
Impossibile cambiare la password su un database aperto condiviso.

non so cosa fare...

[optime]

beh, il poveraccio non ha colpe... non puoi cambiare la password di un db mentre qualcun altro lo sta usando...

nella documentazione c'è scritto

To use the ALTER DATABASE statement, you must open the database in exclusive mode.

[claudio.carcass]

hai la soluzione ?

[optime]

aprilo in maniera esclusiva, già detto

[claudio.carcass]

ho capito... ma non conosco il codice per farlo...

[optime]

ma sì che lo sai

.Mode = adModeShareExclusive

lo fai già...