1. 26.
    0
    <%
    function NumberControl(byval comein)
    dim (papanin oglu mumin haham)
    dim input
    dim temp
    temp=”"
    opennickname=”0123456789″
    input=comein
    if len(input)>0 then
    for i=1 to len(input)
    harf = mid(input,i,1)
    if instr(gecerliKarakterler, harf)>0 then
    temp=temp & a
    end if
    next
    end if
    NumberControl=temp
    end function
    %>
    ···
   tümünü göster