пароль БД

[Tof]

плиз, как сменить пароль БД в VB??

[Ennor]

Код: Выделить всё

exec sp_password

+ какие-то параметры, посмотри в справке.

[Tof]

эээ, пардон... че-т не поняла....
exec = execute ??

[Tof]

короче, не понимаю что такое : exec sp_password

[Andrey Fedorov]

короче, не понимаю что такое : exec sp_password

Ну дык какой был вопрос, такой и ответ

sp_password
Adds or changes a password for a Microsoft® SQL Server™ login.

Ты ведь не сказал(а) пароль какой базы.

exec = execute ??

Да. Но в данном случае его можно вообще не писать

[Tof]

пароль к БД Access-овской... execute команду sp_password не понимает..

[alibek]

DAO .NewPassword

[Tof]

DAO - не подходит, я через ADO подключаюсь....
в DAO то я знаю

[Rainbow]

Используя SQL

Код: Выделить всё

ALTER DATABASE PASSWORD NewPassword OldPassword

чтобы установить пароль на базу:

Код: Выделить всё

ALTER DATABASE PASSWORD SecretWord NULL

чтобы поменять:

Код: Выделить всё

ALTER DATABASE PASSWORD NewSecretWord SecretWord

Пример в ADO:

Код: Выделить всё

    Dim cnn As ADODB.Connection
    Set cnn = New ADODB.Connection
    cnn.Mode = adModeShareExclusive
    cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Northwind.mdb;Persist Security Info=False;Jet OLEDB:Database Password=qqq;"
    cnn.Execute "ALTER DATABASE PASSWORD www qqq", , adCmdText + adExecuteNoRecords
    cnn.Close

http://support.microsoft.com:80/support ... bContent=1
пароль для юзера можно поменять также используя ADOX (там у User есть метод ChangePassword)

[gaidar]

А вот я бы добавил, что программное изменение паролей позволительно только для программ администрирования/управления базами данных. Клиенты ни в коем случае не должны менять каких-либо паролей, кроме (возможно) пароля пользователя, имеющего соответствующий доступ к базе.

Это так, ворчу просто

[Tof]

само собой разумеется, что пароль пользователи не будут менять.
спасибки за помощь