FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Harbour/xHarbour Problema usando STRTRAN()
Armando
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Problema usando STRTRAN()
Posted: Wed Jan 17, 2024 07:28 PM
Hola amigos del foro:

En el siguiente c贸digo
Code (fw): Select all Collapse
oWrk:Des := StrTran(oWrk:DES," ' "," \' ",1) Estoy incluyendo espacios solo para claridad en el foro
Pero el valor resultante en oWrk:DES me deja \' por ejemplo O'Riley me deja O\'Riley

Alguna otra alternativa?

Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
sysctrl2
Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
Re: Problema usando STRTRAN()
Posted: Wed Jan 17, 2024 08:01 PM

Paisano

no entiendo porque quieres reemplazar una comilla simple por otra comilla simple ?

cCad := StrTran( cCad, "\", "" ) //quito \ y lo reemplazo por espacio en blanco

saludos

Cesar Cortes Cruz

SysCtrl Software

Mexico



' Sin +- FWH es mejor "
Armando
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Problema usando STRTRAN()
Posted: Wed Jan 17, 2024 08:44 PM
C茅sar:

Con MySql cuando el texto incluye el apostrofe o una coma, el texto se trunca
en la posici贸n donde se encuentra el apostrofe o la coma y el resto lo toma como
si fuera el contenido de otro campo, la aplicaci贸n truena

En el foro recomendaron sustituir el apostrofe o la coma ante poniendo el caracte
de escape (\).

En una aplicaci贸n me funcion贸 al 100% pero este nuevo desarrollo no funciona mas

Una opci贸n es eliminar el apostrofe como bien indicas pero el cliente quiere que aparezca :-(

Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
sysctrl2
Posts: 1144
Joined: Mon Feb 05, 2007 07:15 PM
Re: Problema usando STRTRAN()
Posted: Wed Jan 17, 2024 09:52 PM
raro :shock:
Cesar Cortes Cruz

SysCtrl Software

Mexico



' Sin +- FWH es mejor "
JoseAlvarez
Posts: 851
Joined: Sun Nov 09, 2014 05:01 PM
Re: Problema usando STRTRAN()
Posted: Wed Jan 17, 2024 09:55 PM
Armando wrote:Hola amigos del foro:

En el siguiente c贸digo
Code (fw): Select all Collapse
oWrk:Des := StrTran(oWrk:DES," ' "," \' ",1) Estoy incluyendo espacios solo para claridad en el foro
Pero el valor resultante en oWrk:DES me deja \' por ejemplo O'Riley me deja O\'Riley

Alguna otra alternativa?

Saludos
Hola Armando, saludos.

Creo que tu problema no es el StrTran, es al momento de grabar la cadena en la tabla MySql

Prueba usando esto:
Code (fw): Select all Collapse
cQuery += " tucampo:='" + Val2escape (tuvariable) + " ' "
Si el armado del Query lleva mas campos seguidos de este, debes agregar coma al final
Code (fw): Select all Collapse
cQuery += " tucampo:='" + Val2escape (tuvariable) + " ' , "
"Los errores en programaci贸n, siempre est谩n entre la silla y el teclado..."



Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin



Carora, Estado Lara, Venezuela.
Armando
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Problema usando STRTRAN()
Posted: Wed Jan 17, 2024 10:53 PM
Jos茅:

Agradezco el consejo, no es un query es al momento de grabar, pero al compilar me reclama la funci贸n
Val2Escape(), me falta algo?
Code (fw): Select all Collapse
oRsWrk:Fields("WRK_DES"):Value := Val2escape(oWrk:DES)
Saludos
SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
JoseAlvarez
Posts: 851
Joined: Sun Nov 09, 2014 05:01 PM
Re: Problema usando STRTRAN()
Posted: Wed Jan 17, 2024 11:25 PM
Armando wrote:Jos茅:

Agradezco el consejo, no es un query es al momento de grabar, pero al compilar me reclama la funci贸n
Val2Escape(), me falta algo?
Code (fw): Select all Collapse
oRsWrk:Fields("WRK_DES"):Value := Val2escape(oWrk:DES)
Saludos
Armando disculpa, creo que es con TDolphin
"Los errores en programaci贸n, siempre est谩n entre la silla y el teclado..."



Fwh 19.06 32 bits + Harbour 3.2 + Borland 7.4 + MariaDB + TDolphin



Carora, Estado Lara, Venezuela.
Armando
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Problema usando STRTRAN()
Posted: Thu Jan 18, 2024 12:11 AM

Jos茅:

Aaaaah, nada que disculpar.

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero
karinha
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: Problema usando STRTRAN()
Posted: Thu Jan 18, 2024 03:13 PM
Armando, mira se ayuda:

https://fivewin.com.br/index.php?/topic/24714-tdolphin-campo-memo-resolvido/#comment-274661

Regards, saludos.
Jo茫o Santos - S茫o Paulo - Brasil - Phone: +55(11)95150-7341
cmsoft
Posts: 1344
Joined: Wed Nov 16, 2005 09:14 PM
Re: Problema usando STRTRAN()
Posted: Thu Jan 18, 2024 03:25 PM
Armando:
Que Charset tienes definido en la tabla, y que Collation para ese campo?
Armando wrote: En una aplicaci贸n me funcion贸 al 100% pero este nuevo desarrollo no funciona mas
Comprueba que sea el mismo del proyecto que si te funcionaba
Salu2
Cesar Gomez
https://www.bcnsoft.com.ar
https://www.pedidosbcn.com
Armando
Posts: 3358
Joined: Fri Oct 07, 2005 08:20 PM
Re: Problema usando STRTRAN()
Posted: Thu Jan 18, 2024 04:38 PM

Karinha:

Uso MySql con ADO, y la funci贸n Val2Escape() es de TDolphin, a煤n as铆, muchas gracias.

C茅sar:

Hago copiar y pegar el c贸digo que s铆 funciona pero en la nueva aplicaci贸n no funciona,

empiezo a pensar que sea problema de versiones, reviso y aviso.

Saludos a ambos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero

Continue the discussion

Static archive 路 New replies & topics via GitHub Discussions