Jag har en sträng (myStr="Hej på dej!") där jag vill byta ut varje bokstav/siffra mot en bild. Tex. e ska bytas ut mot e.gif. Mellanslag ska ignoreras.
Hur göra?

<code>
For i = 1 To Len(strang)
tecken = Mid(strang, i, 1)
if tecken <> " " Then
Response.Write "<img src=""" & tecken & ".gif"">"
End If
Next
</code>

/Johan

Tackar!
Fast jag hade iof. redan lös det såhär:<code><%
letterStr=",a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,x,y,z,å,ä,ö,0,1,2,3,4,5,6,7,8,9,"
myStr=trim(LCase(Request("text")))
For i = 1 To Len(myStr)
strChar = Mid(myStr, i, 1)
IF inStr(letterStr, strChar) THEN
tmpStr=tmpStr&Replace(strChar,strChar,"<img src=""./images/char/"&strChar&".gif"" border=""0"">")
ELSE
tmpStr=tmpStr&Replace(strChar,strChar,"<img src=""./images/char/_.gif"" border=""0"">")
END IF
Next
Response.Write(tmpStr)
%></code>