La Web del Programador: Comunidad de Programadores
 
    Pregunta:  5507 - CAMBIAR CONTRASEÑA MEDIANTE EL CONTROL ADO
Autor:  Enrique Araúz Vega
como puedo usando el control ado cambiar la contraseña de una base de datos ya sea access 2000 o sql server una vez ya accesada a la misma desde visual basic.
Muchas Gracias

  Respuesta:  JULIO CESAR FONTANILLA IGIRIO
Hola,mira access no sé como se cambia una contraseña; pero para sql server tiene procedimentos almacendos que comienzan por sp_?.

Uno de estos procedimiento es el sp_password old, new, user
desde VB creas una conexion a la BD master y la tabla syslogins, clara que para esto debe tener acceso como administrador de SQL server (SA) ejem.

creas un form donde lea el usuario a cambiar el password, el password viejo y el nuevo y luegos

dim conectem as adodb.conecction, rscliente as adodb.recordset, ejecuta as string

Set rscliente = New Recordset
Set conectem = New Connection
On Error GoTo error_handler
With conectem
.Provider = "SQLOLEDB"
.ConnectionString = "User ID=admon de la BD ;Password =password; data source=servidordondeestalaBDsqlserver;" & "initial catalog=master"
.Open
End With
ejecuta="sp_password " & txtpassold.text, txtpassnew, user.txt

rscliente=conectem.execute(ejecuta)
y listo, espero que esto te sirva, si averiguas como se hace en access me lo envias por favor a [email protected]