如何判断表中提交的字符是英文字符还是中文字符
有那样的函数直接判断它们吗？
<%
dim enstr,cnstr
enstr = "dfasdfaasd"
cnstr = "这里含有中文字符asdfsdf"
function nothaveChinese(para)
dim str
nothaveChinese=true
str=cstr(para)
for i = 1 to Len(para)
c=asc(mid(str,i,1))
if c<0 then
nothaveChinese=false '说明含有中文字符
exit function
end if
next
end function
response.Write(nothaveChinese(enstr) &"<BR>")
response.Write(nothaveChinese(cnstr) &"<BR>")
%>
