¿Comó realizo búsqueda desde Visual Basic 6?

Hola amigos estoy apunto de terminar un proyecto en Visual Basic para poder exentar mi parcial.

El problema es que tengo que mostrar en un >Update:

ASI LO PONGO DENTRO DE UN BOTON Y PUES SOLO TENGO EL DATA GRID DONDE DEBE APARECER LOS CAMPOS Y EL ADODC QUE SOLO LO ENLAZA.

Private Sub Command2_Click()

Dim mes As String

mes = Text1.Text

Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\reportes\happy chips.mdb;Persist Security Info=False"

Adodc1.RecordSource = "Select * From personal Where fecha de nacimiento = '#+mes+#'"

Set DataGrid1.DataSource = Adodc1

End Sub

Comments

  • El error está en como mandas el SELECT, tu tienes esto:

    Adodc1.RecordSource = "Select * From personal Where fecha de nacimiento = 'AAAA-mes-DD'"

    El error está dado por usar el campo FECHA DE NACIMIENTO, ya que hay espacios en blanco entre cada palabra, para que sea reconocido e indicar que esas tres palabras se refieren a un campo entonces debes ponerla entre corchetes [FECHA DE NACIMIENTO]

    Adodc1.RecordSource = "Select * From personal Where [fecha de nacimiento] = 'AAAA-mes-DD'"

    Espero poder ayudarte, si sigues teniendo duda puedes escribirme.

    Saludos!

  • si asi esta bn

Sign In or Register to comment.