Erstatte tekst med noget andet eller undlade det.?
Hej,Jeg kan ikke hitte denne her.
Jeg har denne stump kode som fjerner visse ord:
-------------------------------------------------------------
function smiley(felt)
'opsætning
felt=Replace(felt,vbNewLine, "<br>")
felt=Replace(felt," "," ")
'Smileys
felt=Replace(felt,";~(","<img src=""img/smiley/smileys126[1].gif"" align=""middle"" alt="""">")
felt=Replace(felt,":(","<img src=""img/smiley/smileys125[1].gif"" align=""middle"" alt="""">")
'Bandeord
felt=Replace(felt,"luder","(slettet)",1,-1,1)
felt=Replace(felt,"fisse","(slettet)",1,-1,1)
felt=Replace(felt,"spasser","(slettet)",1,-1,1)
felt=Replace(felt,"kusse","(slettet)",1,-1,1)
felt=Replace(felt,"website","Ingen hjemmeside",1,-1,1)
smiley=felt
end function
----------------------------------------------------------
Det går også fint med alle ord på nær:
felt=Replace(felt,"website","Ingen hjemmeside",1,-1,1)
----------------------------------------------------------
strContent= smiley(rs("Kommentar"))
strContent= LinkString2(strContent)
Response.Write strContent & "<br /><a class='tlink' href='http://" & rs("Website") & "'>" & rs("Website") & "</a></div><br />"
problemet er at min form ser sådan ud:
<input id="l0" type="text" name="Website" value='Website' onfocus="if(this.value=='Website')this.value='';" onblur="if(this.value=='')this.value='Website';" /><br />
----------------------------------------------------------------
Så det vi sige at når man ikke udfylder den kommer der bare til at stå Website :( Er der en måde at løse det på.?
