答案: 用下面这个函数:Function CheckStringLength(txt) txt=trim(txt) x = len(txt) y = 0 for ii = 1 to x if asc(mid(txt,ii,1)) < 0 or asc(mid(txt,ii,1)) >255 then ' 如果是中文 y = y + 2 else y = y + 1 end if next CheckStringLength = y End Function
用下面这个函数:Function CheckStringLength(txt) txt=trim(txt) x = len(txt) y = 0 for ii = 1 to x if asc(mid(txt,ii,1)) < 0 or asc(mid(txt,ii,1)) >255 then ' 如果是中文 y = y + 2 else y = y + 1 end if next CheckStringLength = y
End Function
上一个:如何创建自定义的HttpHandler ?下一个:asp如何处理超时事件?