webForumDet fria alternativet

Replace-problem

2 svar · 289 visningar · startad av i-or

i-orMedlem sedan nov. 2001294 inlägg
#1
SebbeMedlem sedan jan. 20032 285 inlägg
#2

Är det ungefär såhär du vill göra?

strSQL = "SELECT * FROM t_diaryworkouts"
Set objRS = Connect.Execute(strSQL)

Do Until objRS.EOF
  Response.Write(objRS("f_comments"))
  strSQL = "UPDATE t_diaryworkouts SET f_comments = '" & Replace(objRS("f_comments"), "ss", "jj") & "' WHERE f_comments = '" & objRS("f_comments") & "'"
  Connect.Execute(strSQL)

  objRS.MoveNext
Loop

objRS.Close : Set objRS = Nothing

Var inte säker på om man kunde använda Replace() direkt i en SQL-sats, annars fungerar det att göra på ett annat sätt också, men jag vill inte förvirra dig och skriva något som inte fungerar med säkerhet.

i-orMedlem sedan nov. 2001294 inlägg
#3

Tack så mycket!

Det jag egentligen skulle göra (exemplet ovan var bara en felsökning, fel av mig att ange det kanske) är att ersätta alla radbryt med "; ". Det går bra att ersätta chr(10) eller chr(13) med ett annat tecken men radbryten försvinner inte.

SQL-satsen för detta är (enligt Sebbes exempel):

strSQL = "UPDATE t_diaryworkouts SET f_contents = '" & Replace(Replace(RecSet("f_contents"),"'","''"), chr(10), ":") & "' WHERE f_id = '" & RecSet("f_id") & "'"

Hur ska jag göra för att radbryten ska försvinna?

Edit: Glöm det, jag hade kastat om bokstäverna i vbcrlf, nu fungerar det. Tack igen!

124 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
122 ms — hämta tråd, inlägg och bilagor (db)