Eliminar campos vacios
Teresa
31 de Diciembre del 2003
He copiado este código del generado por una consulta de access. Estoy intentando pegarlo, en el módulo de un formulario de access, para ejecutar una consulta de eliminación que elimine todos los registros que tienen un campo vacio; las me funcionan en la consulta access, pero no en el recordset de Visual Basic.
Como puedo sustituir las comillas:
Mi código es:
Private Sub cmdBorrarDatos_Click()
Dim rst As New ADODB.Recordset
Dim cnn As ADODB.Connection
Dim strSql
strSql = "DELETE tlbFotos.CodYac, tlbFotos.foto, tlbFotos.PieFoto FROM tlbFotos WHERE (((tlbFotos.foto)=""));"
Set cnn = CurrentProject.Connection
rst.Open strSql, cnn
End Sub
GRACIAS
Como puedo sustituir las comillas:
Mi código es:
Private Sub cmdBorrarDatos_Click()
Dim rst As New ADODB.Recordset
Dim cnn As ADODB.Connection
Dim strSql
strSql = "DELETE tlbFotos.CodYac, tlbFotos.foto, tlbFotos.PieFoto FROM tlbFotos WHERE (((tlbFotos.foto)=""));"
Set cnn = CurrentProject.Connection
rst.Open strSql, cnn
End Sub
GRACIAS
Iron
31 de Diciembre del 2003
tienes que hacerlo con comillas simples
strSQL = "DELETE tlbFotos.CodYac, tlbFotos.foto, tlbFotos.PieFoto FROM tlbFotos WHERE tlbFotos.foto=''"
la cadena la encierras con comillas dobles pero el valor en blanco lo interpretas con comillas simples, esto lo deberias usar como norma al escribir sentencias sql.
suerte
Iron.
strSQL = "DELETE tlbFotos.CodYac, tlbFotos.foto, tlbFotos.PieFoto FROM tlbFotos WHERE tlbFotos.foto=''"
la cadena la encierras con comillas dobles pero el valor en blanco lo interpretas con comillas simples, esto lo deberias usar como norma al escribir sentencias sql.
suerte
Iron.