Excepción producida "System.NullReferenceException"
Publicado por Miguel (281 intervenciones) el 08/04/2016 00:03:37
Referencia a objeto no establecida como instancia de un objeto.
He hecho una pequeña aplicación que utiliza 4 formularios. todos hacen Insertar, modificar y eliminar. Tres funcionan correctamente pero el cuarto me da un error y después de dos semanas buscando causas y verificar los datos que cargo no sean null y buscar en la red todas las causas posibles me rindo y pido ayuda.
Este es el código donde me da el error:
El programa se para en : "dr = ds.Tables("Clientes").NewRow " sale un cuadro mostrando el error de "Systen.NullReferenceException· y de hay no consigo pasar.
Lo que me llama la atención es que con distintos datos, pero la misma forma de programación y en los otros formularios no da problemas.
Espero haber si alguien me puede dar pistas para arreglar este entuerto.
Gracias y un saludo.
He hecho una pequeña aplicación que utiliza 4 formularios. todos hacen Insertar, modificar y eliminar. Tres funcionan correctamente pero el cuarto me da un error y después de dos semanas buscando causas y verificar los datos que cargo no sean null y buscar en la red todas las causas posibles me rindo y pido ayuda.
Este es el código donde me da el error:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Sub InsertarNuevo()
Try
Dim dr As DataRow
dr = ds.Tables("Clientes").NewRow
dr(0) = CInt(Me.txtIdClien.Text)
dr(1) = CStr(Me.txtNombre.Text)
dr(2) = CStr(Me.txtIdProv.Text)
dr(3) = CInt(Me.txtIdCp.Text)
dr(4) = CInt(Me.txtIdCalle.Text)
dr(5) = "" & CStr(Me.txtNumPiso.Text)
If Len("" & CStr(Me.txtSujeto.Text)) > 0 Then
dr(6) = "" & CStr(Me.txtSujeto.Text)
End If
dr(7) = "" & CStr(Me.txtDni.Text)
dr(8) = "" & CStr(Me.txtFijo.Text)
dr(9) = "" & CStr(Me.txtMovil.Text)
dr(10) = "" & CStr(Me.txtFax.Text)
dr(11) = "" & CStr(Me.txtCorreo.Text)
dr(12) = "" & CStr(Me.txtNotas.Text)
ds.Tables("Clientes").Rows.Add(dr)
da.Update(ds, "Clientes")
Catch oExcep As Exception
Console.WriteLine("StackTrace: {0}", oExcep.StackTrace)
End Try
End Sub
El programa se para en : "dr = ds.Tables("Clientes").NewRow " sale un cuadro mostrando el error de "Systen.NullReferenceException· y de hay no consigo pasar.
Lo que me llama la atención es que con distintos datos, pero la misma forma de programación y en los otros formularios no da problemas.
Espero haber si alguien me puede dar pistas para arreglar este entuerto.
Gracias y un saludo.
Valora esta pregunta
0
