Ver Mensaje Individual
  #3 (permalink)  
Antiguo 06/06/2008, 20:33
Avatar de krakxp
krakxp
 
Fecha de Ingreso: junio-2006
Ubicación: NA
Mensajes: 105
Antigüedad: 17 años, 10 meses
Puntos: 0
Respuesta: Stored Procedures

si lo ke kieres es mandar a llamar a un sp y pasarle parametros uno por uno asi le hago yo

Código:
Dim iRes AsInteger
Dim cnn AsNew SqlConnection(cadenaConexion)
Dim cmd As SqlCommand
Dim sdr As SqlDataReader
 
 
cmd = New SqlCommand("sp_InsEmpPry", cnn)
cmd.CommandType = CommandType.StoredProcedure
'Clave de la Emprendedor
cmd.Parameters.Add("@CveEntEmp", SqlDbType.Int)
cmd.Parameters("@CveEntEmp").Direction = ParameterDirection.Input
cmd.Parameters("@CveEntEmp").Value = iCveEntEmp
'Clave del proyecto
cmd.Parameters.Add("@CveEntPry", SqlDbType.Int)
cmd.Parameters("@CveEntPry").Direction = ParameterDirection.Input
cmd.Parameters("@CveEntPry").Value = iCveEntPry
'Status del proyecto
cmd.Parameters.Add("@CveStsPry", SqlDbType.Int)
cmd.Parameters("@CveStsPry").Direction = ParameterDirection.Input
cmd.Parameters("@CveStsPry").Value = iCveStsPry
'Clave del emprendedor de salida
cmd.Parameters.Add(New SqlParameter("@CveMaxPry", SqlDbType.Int))
cmd.Parameters("@CveMaxPry").Direction = ParameterDirection.Output
'Ejecutamos el StoredProcedure
cnn.Open()
cmd.ExecuteNonQuery()
iRes = cmd.Parameters("@CveMaxPry").Value
 
y bueno este sp lo ocupo para hacer un insert, espero te sirva