
28/08/2006, 07:39
|
 | | | Fecha de Ingreso: agosto-2006
Mensajes: 381
Antigüedad: 18 años, 9 meses Puntos: 2 | |
En el procedimiento deberias declarar un a variable de salida de la siguiente manera
create procedure DevuelveRazonSocial
(
@Id int,
@RazonSocial varchar(50) OutPut
)
as
select @RazonSocial = NombreEmpresa from TablaEmpresas where IdEmpresa = @Id
Return
Go
y en el codigo de Visual Basic Seria algo asi
Dim comando As New ADODB.Command
Set comando = New ADODB.Command
comando.ActiveConnection = Cn 'Cn es la Conexion Activa
comando.CommandText = "Sp_CajasInsertar "
comando.CommandType = adCmdStoredProc
comando.Parameters.Append comando.CreateParameter("Id", adInteger,
adParamInput, 4, txtIdBusqueda.text)
comando.Parameters.Append comando.CreateParameter("RazonSocial", adVarChar,
adParamOutput, 50, RazonSocial)
comando.Execute
NombreEmpresaDevuelto = comando.Parameters("RazonSocial").Value
comando.ActiveConnection = Nothing
la verdad que lo hago medio memorizado no estoy seguro pero asi te debiese funcionar, pero por hay va |