db den gelen veriyi harf harf bölmek.

<%
a="" & left(seyret("isim"),30) & ""
c=len(a)
for i=1 to c
Sol=i-1
d=mid(a,sol+1,1)
if d=" " then
d="space"
end if
if d="ö" then
d="o"
end if
if d="ş" then
d="s"
end if
if d="ı" then
d="i"
end if
if d="ğ" then
d="g"
end if
if d="ç" then
d="c"
end if
if d="-" then
d="space"
end if
if d="&" then
d="space"
end if
if d="Ü" then
d="u"
end if
if d="Ö" then
d="o"
end if
if d="Ş" then
d="s"
end if
if d="İ" then
d="i"
end if
if d="Ğ" then
d="g"
end if
if d="Ç" then
d="c"
end if
if d="Ü" then
d="u"
end if
sonuc=d&".gif"' 
 response.write("<img src=grafik/harf/")
Response.Write(sonuc&">")
next
'@Dk
%>