webForumDet fria alternativet

Ersätta text med bilder utan regExp

ASP

1 svar · 200 visningar · startad av pirajan

Medlem sedan apr. 2001246 inlägg
Frågan#1

Jag har försökt att ersätta en text med bilder i form av bokstäver. Jag började med Replace men sedan kom jag på att man kunde köra med for... next sats... Jag vill alltså inte göra det med RegExp.

Function bildtext(bytText) 
For i = 0 To Len(bytText)
Response.Write "<img src=/gfx/rub1/" & Mid(bytText,i,1) & ">"
Next
bildtext = bytText 
End Function

Vad är fel? Får error: Invalid procedure call or argument: 'Mid'

Medlem sedan dec. 200012 464 inlägg
#2
Function bildtext(bytText) 
For i = 1 To Len(bytText)
Response.Write "<img src=/gfx/rub1/" & Mid(bytText,i,1) & ">"
Next
bildtext = bytText 
End Function
392 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
130 ms — deklarationer (db)
127 ms — hämta statistik (db)
133 ms — hämta tråd, inlägg och bilagor (db)
118 ms — ändringar (db)