Título: Access 2007 y visual basic 2008, error ar guardar lo datos
Publicado por: 01munrra en 6 Febrero 2012, 03:52 am
saludos le comento estoy con vb y una tabla access y lo que quiro es hacer es que me guarde los datos tipeado desde un formulario este es el codigo Dim Consulta1 As String Dim Consulta2 As String Dim resultado1 As ADODB.Recordset Dim resultado2 As ADODB.Recordset If accion = "nuevo" Then If IdcedulaTextBox.Text = "" Or NombresTextBox.Text = "" Or ApellidosTextBox.Text = "" Or DireccionTextBox.Text = "" Or TelefonoTextBox.Text = "" Then MessageBox.Show("le faltan Campos por completar", "Mensaje", MessageBoxButtons.OK) Else Consulta1 = "select * from cliente where idcedula = '" & IdcedulaTextBox.Text & "'" Consulta2 = "select * from natural where cedula= '" & IdcedulaTextBox.Text & "'" resultado1 = Conexion.Execute(Consulta1) resultado2 = Conexion.Execute(Consulta2) ' consulta de por si ya esta registrado If resultado1.BOF <> True And resultado2.BOF <> True Then MessageBox.Show("El Cliente ya esta registrado", "Mensaje", MessageBoxButtons.OK) IdcedulaTextBox.Text = "" NombresTextBox.Text = "" ApellidosTextBox.Text = "" DireccionTextBox.Text = "" TelefonoTextBox.Text = "" Else Registro1 = "insert into cliente(idcedula,direccion,telefono) values('" & IdcedulaTextBox.Text & "','" & DireccionTextBox.Text & "','" & TelefonoTextBox.Text & "')" Conexion.Execute(Registro1) Registro2 = "insert into natural(cedula,nombres,apellidos) values('" & IdcedulaTextBox.Text & "','" & NombresTextBox.Text & "','" & ApellidosTextBox.Text & "')" Conexion.Execute(Registro2) MessageBox.Show("Registro Exitoso", "Mensaje", MessageBoxButtons.OK) IdcedulaTextBox.Text = "" NombresTextBox.Text = "" ApellidosTextBox.Text = "" DireccionTextBox.Text = "" TelefonoTextBox.Text = "" End If End If End If Cerrar anuncio
me lanza un error en resultado2 = Conexion.Execute(Consulta2) este es el errror Error no especificado (Exepcion de HRESULT : 0x080004005(E_FAIL) ) que es cuando estoy tratando de consultar el registro, por si ya esta registrado... cual sera el error???????
Título: Re: Access 2007 y visual basic 2008, error ar guardar lo datos
Publicado por: XxwiyavixX en 11 Febrero 2012, 02:00 am
Hola; No, tengo ni la mas minima idea :huh:
Título: Re: Access 2007 y visual basic 2008, error ar guardar lo datos
Publicado por: 01munrra en 11 Febrero 2012, 20:49 pm
no ayudas mucho............ aunque ya descubri el problema,,,,, estaba en las tablas,,,,,,,, gracias de igual forma
|