ASP关于字符串处理的函数（在线等……）
现在有一个字符串，类似“要测试的字符串adsFBs”
就是说前面是汉字，后面是字母，
最终处理要将字符串拆分，并得到两个字符串，请高手帮忙！
问题点数：20、回复次数：4Top
1 楼znjgress（四空和尚）回复于 2006-03-17 10:23:06 得分 0
汉字的asc值小于零
Top
2 楼larksky（飞天）回复于 2006-03-17 10:24:19 得分 0
我要详细地代码,自己懒得写,呵呵!Top
3 楼eglic（圪圪) (理由永远是谎言，信仰永远是自慰）回复于 2006-03-17 10:39:24 得分 0
是不是饭也懒得吃
工资也懒得领？Top
4 楼znjgress（四空和尚）回复于 2006-03-17 10:48:38 得分 20
参考一下我的这个函数
Function UrlCheck(enterUrl)
if len(trim(enterUrl)) > 0 then
strLong = len(enterUrl) '取字符串长
Dim i
i = 0
Dim A()
Dim B()
Redim A(strLong)
Redim B(strLong)
for i = 0 to strLong - 1
A(i) = mid(enterUrl, i + 1, 1)
''汉字字符ASC值 < 0
if asc(A(i)) < 0 or asc(A(i)) > 255 then
B(i) = server.URLEncode(A(i))
else
B(i) = A(i)
end if
next
UrlCheck = ""
for i = 0 to strLong
UrlCheck = UrlCheck & B(i)
next
end if
end FunctionTop
