Llamada a stored procedure desde Vbasic, Access ADP y Sql server

ejmeplo usado paraporyecto acess ADP con sql server y visual basic: Paso de parametro y retorno de parametro.

Private Sub Comando4_Click()
Set con = CurrentProject.Connection
Dim Cmd As New ADODB.Command
Dim nombres As ADODB.Parameter

With Cmd
.ActiveConnection = CurrentProject.Connection
.CommandType = adCmdStoredProc
.CommandText = “spAutentificacionUsuario”
.Parameters.Append .CreateParameter(“usuario”, adChar, adParamInput, 20, “admin”)
.Parameters.Append .CreateParameter(“password”, adBinary, adParamInput, 10, “admin”)
Set nombres = .CreateParameter(“nombres”, adChar, adParamOutput, 50)
.Parameters.Append nombres

.Execute
End With
MsgBox nombres.Value
End Sub

Anuncios

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s

A %d blogueros les gusta esto: