daniel
07 de Febrero del 2006

hola les comento qe kiero qe haga el programa, qe busq en la base de datos y qe si la encuentra el apellido me tire un msgbox, sino qe me haga un insert este es el codigo qe estoy usando (uso dos cajas y un boton)

Private Sub Command1_Click()
sql = "Select * From tabla where nombre = " & Text1.Text & ""
If Adodc1.Recordset.State = 1 Then
Adodc1.Recordset.Close
End If
Adodc1.Recordset.Open sql
If Adodc1.Recordset.RecordCount = 0 Then
With Adodc1.Recordset
.AddNew
!nombre = Text1.Text
!apellido = Text2.Text
.Update
End With
Else
MsgBox ("ya existe")
End If
End Sub

me tira el error enla sintaxix de la clausula from en la linea Adodc1.Recordset.Open sql

qe puede ser?
desde ya muchias gracias y espero respuestas :P

Pablo M
07 de Febrero del 2006

fijate que en la parte del WHERE Nombre = " & Text1.Text & ""
estes poniendo los apostrofes correspondientes y que la variable Nombre no posea apostrofes y esas cosas.
salu2