Como puedo engañar a las comillas?
Publicado por Carlos (50 intervenciones) el 15/08/2002 03:00:44
Hola a todos
El problema es que tengo en uno de los campos texto con comillas, por ejemplo: Alambre de ¾”, y al entrar en ese texto me da error.
Como le puedo engañar a las comillas?
Private Sub cboMaterial_KeyDown(KeyCode As Integer, Shift As Integer)
Dim texto As String
If (KeyCode = vbKeyReturn) Or (KeyCode = vbKeyUp) Or (KeyCode = vbKeyDown) Or (KeyCode = vbKeyPageUp) Or (KeyCode = vbKeyPageDown) Then
texto = cboMaterial.Text
texto = "COS_DESCR = '" & texto & "'"
dtaMateriales.Recordset.FindFirst texto
End If
End Sub
Gracias
Carlos
El problema es que tengo en uno de los campos texto con comillas, por ejemplo: Alambre de ¾”, y al entrar en ese texto me da error.
Como le puedo engañar a las comillas?
Private Sub cboMaterial_KeyDown(KeyCode As Integer, Shift As Integer)
Dim texto As String
If (KeyCode = vbKeyReturn) Or (KeyCode = vbKeyUp) Or (KeyCode = vbKeyDown) Or (KeyCode = vbKeyPageUp) Or (KeyCode = vbKeyPageDown) Then
texto = cboMaterial.Text
texto = "COS_DESCR = '" & texto & "'"
dtaMateriales.Recordset.FindFirst texto
End If
End Sub
Gracias
Carlos
Valora esta pregunta


0