La Web del Programador: Comunidad de Programadores
 
    Pregunta:  11210 - COMO USAR LA SEGURIDAD DE WIN NT(USUARIO Y PASSWORD)
Autor:  Azucena Rodriguez
Estoy haciendo una aplicacion en VB en la que presento al inicio una ventana para logearse donde pone el nombre del usuario que esta logeado a la red NT(para esto utilizo la funcion GETUSERNAME de las api's de windows) y luego pide el password.
Lo que deseo saber es como hacerle para que una vez que tecleen el password este sea validado contra el password que este usuario tiene en la red NT, en pocas palabras deseo manejar los usuarios y la seguridad de NT para la aplicacion , e intentado con la funcion LOGONUSER tambien de las Api's pero no me ha funcionado, tal vez la este usando de forma incorrecta, si alguien puede ayudarme con la estructura y funcionalidad de esta funcion o tiene alguna otra manera de realizar esta operacion se los agradeceria

  Respuesta:  Aplinfor Aplimfor
No entiendo mucho tu pregunta. Pero para conectarse a una bases de Datos SQLSERVER y verificar usuario y Password, lo puedes hacer de la siguiente forma, si son validos el usuario y el Password se realiza la coneccion.

Sub cmdConnect_Click()

Dim sUsername As string
Dim sPassword As string
Dim cnStateUBookstore As Connection

Set cnStateUBookstore = New Connection
sUsername = InputBox("Please enter your user name:")
sPassword = InputBox("Please enter your password:")
With cnStateUBookstore
.Provider = "SQLOLEDB"
.ConnectionString = "User ID=" & sUsername & _
";Password=" & sPassword & _
";Data Source=MSERIES1;" & _
"Initial Catalog=StateUBookstore"
.Open
End With

End Sub
Provider=Proveedor de Base de Datos
DataSource=Nombre del servidor de base de datos
Initial Catalog=Nombre de la base de datos