Urgente VB

[rebeca22]

Necesito borrar registros haciendo uso de DELETE FROM, pero no se muy bien como hacerlo.

sentSQL = "DELETE FROM " & tabla & _
"WHERE " & fecha & " LIKE " & fechasel

La tabla de la cual debo borrar registros está contenida en una vble. (tabla).
Los registros a borrar son aquellos que tengan igual fecha, siendo fecha un campo de la tabla y fechasel una fecha introducida por el usuario, ambas son strings.

1. ¿Comó puedo referenciar un campo de mi tabla (el campo fecha) ?
2. ¿Es la comparación LIKE correcta?
3. ¿Podéis escribir un código que arregle el problema?

Gracias.

[Zeratul]

si comparas dos cadenas de caracteres puedes usar like o = indistintamente.
Al formar la sentencia sql debes tener ciudado con las comillas: hay que poner las comillas sencillas de sql donde correspondan y las dobles de la cadena visual basic. Puedes revisar que la sentencia queda bien usando el depurador.

este ejemplo borra siempre del mismo campo de la base de datos el texto que se introduzca en la caja de texto text1

Private Sub Command1_Click()
Dim cadena As String
Dim db As Database
Set db = OpenDatabase("tu_bd.mdb")
cadena = "delete from libros where campo=' " & Text1.Text & "' "
db.Execute (cadena)
End Sub

este otro borra el campo de la base de datos que se teclee en la caja de texto text2 y el texto que se introduzca en la caja de texto text1

Private Sub Command1_Click()
Dim cadena As String
Dim campo As String
Dim db As Database
Set db = OpenDatabase("biblioteca.mdb")
campo = Text2.Text
cadena = "delete from editoriales where " & campo & "=' " & Text1.Text & "' "
db.Execute (cadena)
End Sub

[Mickel]

sentSQL = "DELETE FROM " & tabla & "WHERE " & fecha & " LIKE " & chr(39) & fechasel & "%" & chr(39)