Programación General > Visual Basic 6.0 e inferiores

 Ayuda Urgente

<< < (2/2)

cpmario:
Esa es la manera de manejar apostrofes o comillas simples, para saber que está sucediendo en tu programa debes de escribir algo de tu código para poder comprender lo que estás intentando hacer.
  :)

chicharos:
cp mario:

te mendo el codigo para ver si me puedes ayudar gracias

Text14.Text = DataCombo2.Text
base3 = "select InvAddStreet1,ClientID from baClients where Name like'[]" & DataCombo2.Text & "';"
Dim db As Connection
Set db = New Connection
db.CursorLocation = adUseClient
db.Open "PROVIDER=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;User ID=Admin;Data Source=\\Servidor\BusinessAdmin2k4\BArena.mdb;"
Set adoPrimaryRS = New Recordset
adoPrimaryRS.Open base3, db, adOpenStatic, adLockOptimistic
Set Text15.DataSource = adoPrimaryRS


agradesco mucho tu ayuda mil gracias

CESAR LEONARDO ESPAÑA REYES
chicharos2002@yahoo.om.mx

cpmario:
Para buscar cadena con apóstrofe después de:
Text14.Text = DataCombo2.Text
Escribe:
strNombre = replace(DataCombo2.Text,"'","''")
Y en lugar de:
base3 = "select InvAddStreet1,ClientID from baClients where Name like'[]" & DataCombo2.Text & "';"
Escribe:
base3 = "select InvAddStreet1,ClientID from baClients where Name like'" & strNombre  & "';"

Además en el código, no veo la razón para los brackets [], a menos que lo que estés buscando los tenga, retíralos.

 :)

Navegación

[0] Índice de Mensajes

[*] Página Anterior

Ir a la versión completa