我用了你给的方法,修改如下:
str=request("xxx")
dim location
for i=1 to len(str)
if asc(mid(Str,i,1))<0 then
location=i-1
exit for
end if
next
num=left(str,location)
string=right(str,len(str)-location)
现在问题是,第一个222和天下无双,分别写进了shizi和hanzi,但是第二个223红高粱,只写进了hanzi里面,现在我的数据库中:
shizi hanzi
222 天下无双,223红高粱
如果数字和汉字有分隔符 如 "12312,真好"
那么可以split("12312,真好")(0)为数字,split("12312,真好")(1)为汉字
如果没有那么只好
str="12312,真好"
dim location
for i=1 to len(str)
if asc(mid(Str,i,1))<0 then
location=i-1
exit for
end if
next
num=left(str,location)
string=right(str,len(str)-location)