Crear Usuario SQL desde Visual Basic 6
Hola, me gustaría saber si existe un método alternativo al SQL-DMO para poder crear un usuario para SQL, por posibles problemas con la compatibilidad de librerías i tal.
Yo utilizo esta Librería:
Proyecto/Referencias/Microsoft SQLDMO Object Library
Luego los creo así:
Public sServer As New SQLDMO.SQLServer2 (Esta en un Modulo)
No hay usuarios creados porque primero los elimino a todos.
Dim sLogin As New SQLDMO.Login
sServer.IntegratedSecurity.SecurityMode = SQLDMOSecurity_Mixed
sLogin.Name = "Nombre"
sLogin.Language = "Español"
sLogin.Type = SQLDMOLogin_Standard
sLogin.Database = "Nombre de BD"
sLogin.SetPassword "", "Password"
sServer.Logins.Add sLogin
sServer.ServerRoles("sysadmin").AddMember "Nombre"
On Error Resume Next
sServer.Disconnect
sServer.Connect "(local)", "Nombre", "Password"
sServer.Logins("Nombre").SetPassword "", " Password "
sServer.Disconnect
he encontrado esto pero me parece que es para .NET: en PortalSQL.com
sp_addlogin 'Nombre','miclave','Northwind'
go
use northwind
go
exec sp_grantdbaccess ' Nombre '
go
exec sp_helpuser
Te agradecería la ayuda compañero, porque estoy bastante perdido. Gracias...
Yo utilizo esta Librería:
Proyecto/Referencias/Microsoft SQLDMO Object Library
Luego los creo así:
Public sServer As New SQLDMO.SQLServer2 (Esta en un Modulo)
No hay usuarios creados porque primero los elimino a todos.
Dim sLogin As New SQLDMO.Login
sServer.IntegratedSecurity.SecurityMode = SQLDMOSecurity_Mixed
sLogin.Name = "Nombre"
sLogin.Language = "Español"
sLogin.Type = SQLDMOLogin_Standard
sLogin.Database = "Nombre de BD"
sLogin.SetPassword "", "Password"
sServer.Logins.Add sLogin
sServer.ServerRoles("sysadmin").AddMember "Nombre"
On Error Resume Next
sServer.Disconnect
sServer.Connect "(local)", "Nombre", "Password"
sServer.Logins("Nombre").SetPassword "", " Password "
sServer.Disconnect
he encontrado esto pero me parece que es para .NET: en PortalSQL.com
sp_addlogin 'Nombre','miclave','Northwind'
go
use northwind
go
exec sp_grantdbaccess ' Nombre '
go
exec sp_helpuser
Te agradecería la ayuda compañero, porque estoy bastante perdido. Gracias...
Respuesta de denciso
1