14/03/2006, 19:23
|
| | | Fecha de Ingreso: agosto-2005
Mensajes: 722
Antigüedad: 19 años, 6 meses Puntos: 2 | |
| otra pregunta
muchas grasias porla ayuda
pero tengo otro problema bueno
Try
cmb_personal.DataBindings.Add("text", oDocumentos.campo_personal.Tables("PERSONAL"), "ID_PERSONAL")
Catch ex As Exception
MsgBox(ex.Message)
End Try
tengo este codigo en vs,y esta saliendo este error
el valor no puede ser nulo.
nombre del parametro:datasource
no se cual es la causa, este pedaso de codigo lo copie de un libro, lo trato de cargar a un combo, y estoy llamando a una funcion que me devuelve un dataset, esta es la funcion
Public Function campo_personal() As DataSet
Try
Dim oComm As New SqlCommand("spPersonal", oconn)
oComm.CommandType = CommandType.StoredProcedure
Dim PAccion As New SqlParameter("@Accion", SqlDbType.Char, 1)
PAccion.Value = "V"
oComm.Parameters.Add(PAccion)
oconn.Open()
Dim oAdap As New SqlDataAdapter(oComm)
Dim oData As New DataSet
oAdap.Fill(oData, "codigo_personal")
oconn.Close()
Return oData
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Function
y este es el trigger al cual se invocoa
if @accion='V'
begin
select *
from personal
end
por favor help me |