Permalänk

Replace med ASP

Jag vill att om man skrivit en smiley i ett inlägg, så ska denna bli en bild istället. till exempel ska : ) bli <img src="smiley1.gif">

Jag testade skriva

strPost = RecSet("strPost")
strPost = Replace(strPost,: ),"<img src='smiley1.gif'>")

men det fungerade inte så bra.. hur ska man skriva istället?

Permalänk
Medlem

strPost = Replace(strPost,": )","<img src='smiley1.gif'>")

Permalänk

lyx! tack.. nu är det så att jag har flera smiles som är tillgängliga.. kan man på nåt sätt föra ihop dessa till en enda lång replace metod eller nåt.. så man slipper skriva dessa två rader om och om??

Permalänk
Hedersmedlem

Nja, du kan ju alltid göra en funktion av det, men du måste hur som helst ha en "replace-rad" för varje smilie.

Visa signatur

Är du lycklig nu?

Frågor och funderingar angående modereringen tas med mail, inte genom forumet. dennizpop@sweclockers.com

Permalänk
Medlem

Nåt sånt här kanske?

<% dim dastring dastring = "hey =) what's up =/ dude =(" dim hej(2) hej(0) = "=)" hej(1) = "=(" hej(2) = "=/" dim i: i = 0 dim smilie for each smilie in hej dastring = replace(dastring, smilie, "<img src=""smilie" & i & ".gif"" alt=""" & smilie & """ />") i = i + 1 next response.write dastring %>

Finns säkert ett par vettigare sätt att fylla arrayen

Permalänk

okey.. frö det första är det asp jag håller på med!

men sen.. går det inte bara att skriva massa replace efter varandra???

Permalänk
Hedersmedlem

Om det är ASP du håller på med borde du väll känna igen det?

Det är ASP som mirza har skrivit. Han har bara satt det i PHP-taggar så att det skall bli olika färger färger och därmed lättare att läsa.

Svar på din frpga: Jo, det går att skriva flera replace efter varandra. Inga problem alls.

Visa signatur

Är du lycklig nu?

Frågor och funderingar angående modereringen tas med mail, inte genom forumet. dennizpop@sweclockers.com

Permalänk

jag har liksom skrivit koden nedan, (bortse ifrån kommentar tecken.. ville bara kunna spara utan att ändra koden...)

strPost = RecSet("strPost")
strPost = Replace(strPost,vbCrLf,"<br>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,":)","<img src='smiley1.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,":(","<img src='smiley2.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,":-)","<img src='smiley3.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,";)","<img src='smiley4.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,";(","<img src='smiley5.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,":P","<img src='smiley6.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,":D","<img src='smiley7.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,":O","<img src='smiley8.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,":sarcasm:","<img src='smiley_sarcasm.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,"=/","<img src='smiley9.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,":cool:","<img src='smiley10.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,":love:","<img src='smiley_love.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,":fuck:","<img src='smiley_fuck.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,"LOL","<img src='smiley_lol.gif'>")

'strPost = RecSet("strPost")
'strPost = Replace(strPost,":evil:","<img src='smiley_evil.gif'>")

Men när jag gjorde detta ignorerade den allting.. gjorde inte äns den första replacen...

Permalänk
Hedersmedlem

Jo, men du sätter ju hela tiden strPost till RecSet("strPost") före varje replace. Gör bara det före första replacen så skall det nog fungera.

Visa signatur

Är du lycklig nu?

Frågor och funderingar angående modereringen tas med mail, inte genom forumet. dennizpop@sweclockers.com

Permalänk
Medlem

strPost = RecSet("strPost")
strPost = Replace(strPost,vbCrLf,"<br>")
'strPost = Replace(strPost,"","<img src='smiley1.gif'>")
'strPost = Replace(strPost,"","<img src='smiley1.gif'>")
'strPost = Replace(strPost,"","<img src='smiley1.gif'>")
'strPost = Replace(strPost,"","<img src='smiley1.gif'>")

du fattar