Error al Ingresar
Publicado por GONAS (60 intervenciones) el 19/11/2003 18:53:00
Hola a Todos.
Tengo un problemilla con un ingreso de modo desconectado, del cual no sé como corregirlo...Si alguno de ustedes tiene cualquier tipo de ayuda que me pueda brindar, se los agradeceré mucho....
*****MI CÓDIGO*****
Public Sub grabar(ByVal nombre As String, ByVal apellido As String, ByVal rut As String, ByVal telefono As Integer, ByVal direccion As String)
Dim sql_insertar As New OleDbCommand()
Dim sql_select As New OleDbCommand()
Dim da_insertar As New OleDbDataAdapter()
Dim datos As New DataSet()
sql_insertar.CommandText = "Insert Into Tabla1 (Nombres, Apellidos, Rut, Fono1, Direccion) values ('" & nombre & "','" & apellido & "','" & rut & "','" & telefono & "','" & direccion & "')"
sql_insertar.Connection = conexion 'La Variable conexion está declarad al inicio como Global con ruta de la base de datos
da_insertar.InsertCommand = sql_insertar
da_insertar.SelectCommand = sql_insertar
da_insertar.Fill(datos, "tabla1")
da_insertar.Update(datos, "tabla1")
End Sub
***Mi Error***
Update no puede encontrar TableMappings['tabla1'] o DataTable 'tabla1'.
No puedo saber que es, por favor si me pueden ayudar....muchas gracias de antemano
Tengo un problemilla con un ingreso de modo desconectado, del cual no sé como corregirlo...Si alguno de ustedes tiene cualquier tipo de ayuda que me pueda brindar, se los agradeceré mucho....
*****MI CÓDIGO*****
Public Sub grabar(ByVal nombre As String, ByVal apellido As String, ByVal rut As String, ByVal telefono As Integer, ByVal direccion As String)
Dim sql_insertar As New OleDbCommand()
Dim sql_select As New OleDbCommand()
Dim da_insertar As New OleDbDataAdapter()
Dim datos As New DataSet()
sql_insertar.CommandText = "Insert Into Tabla1 (Nombres, Apellidos, Rut, Fono1, Direccion) values ('" & nombre & "','" & apellido & "','" & rut & "','" & telefono & "','" & direccion & "')"
sql_insertar.Connection = conexion 'La Variable conexion está declarad al inicio como Global con ruta de la base de datos
da_insertar.InsertCommand = sql_insertar
da_insertar.SelectCommand = sql_insertar
da_insertar.Fill(datos, "tabla1")
da_insertar.Update(datos, "tabla1")
End Sub
***Mi Error***
Update no puede encontrar TableMappings['tabla1'] o DataTable 'tabla1'.
No puedo saber que es, por favor si me pueden ayudar....muchas gracias de antemano
Valora esta pregunta


0