Inte riktigt med nu... Vad menar du med att ersätta till characters? Det blir ju ingen förändring då.
Frågan#1
Kan nån ge mig en funktion som ersätter alla tecken som kan vara krångliga..
till characters istället?
3 svar · 183 visningar · startad av Nickemannen
Kan nån ge mig en funktion som ersätter alla tecken som kan vara krångliga..
till characters istället?
Inte riktigt med nu... Vad menar du med att ersätta till characters? Det blir ju ingen förändring då.
Okej, jag kanske var lite otydlig.
Ersätta dom täknerna till t.ex.
om det är ett
' så ändrar den det till Chr(145)
nån som har en färdig sådan funktion.
------------------
"Brott kanske inte lönar sig, men det är kul"
Function ConvSql(ByVal sSql)
sSql = Replace(sSql, Chr(39), "' & chr(39) & '") ' '
sSql = Replace(sSql, Chr(34), "' & chr(34) & '") ' "
sSql = Replace(sSql, Chr(36), "' & chr(36) & '") ' $
sSql = Replace(sSql, Chr(37), "' & chr(37) & '") ' %
sSql = Replace(sSql, " & '' & ", " & ")
ConvSql = sSql
End Function
------------------
/ Torbjörn Hansson, webbutvecklare
Endero Sverige
[Redigerat av toha den 19 feb 2001]