<%
'*******************************
'기능 : isvalidusername (byvalusername)
'매개 변수 : 사용자 이름, 사용자 이름
'저자 : Alixi
'날짜 : 2007/7/15
'설명 : 사용자 이름에 불법 문자가 포함되어 있는지 확인하십시오. 불법 문자없이 반환 : true
'예 : isvalidusername (byvalusername)
'*******************************
functionisvalidusername (byvalusername)
디미, c
isvalidusername = true
fori = 1tolen (사용자 이름)
c = lcase (MID (사용자 이름, i, 1))
ifinstr ( "$! <>##^%@~ ~`&*(); :+= '" "", c)> 0then
isvalidusername = false
종료 기능
endif
다음
최종 기능 장애
%>