ASP中字符串函数的应用,ASP中字符串函数的应用
【 tulaoshi.com - ASP 】
1. 字符串函数:
Len(str):取得字符串的长度
Instr(str1,str2):从字符串str1,寻找另一个字符串str2第一个出现的位置
Left(str,n):从字符串str左起取n个字符
Right(str,n):从字符串str右起取n个字符
Mid(str1,n1,n2):从字符串第n1个字符开始,取出n2个字符。
2.字符串函数应用:
1)通过字符函数设计出一个字符串长度控制函数:
防止超过行宽字符串换行:
<%
Function strleft(string,leng)
Dim str1
Dim i,j,k
j = Len(string)
k = 0
For i = 1 To j
str1 = Mid(string,i,1)
If Asc(str1) 0 Then
k = k + 1
Else
k = k + 2
End If
If k leng Then
strLeft = Left(string,i) & "..."
Exit For
Else
strLeft = string
End If
Next
End Function
%
2)通过字符串函数检测输出是否为电子邮件地址:
(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/asp/)<%
Function EMAIL(string)
Dim str1
Dim i,j,k,l
j = Len(string)
k = 0
for i = 1 to j
str1=Mid(string,i,1)
if str1 = "@" then
k = k + 1
l = i
end if
next
str2 = Mid(string,l+1,1)
if (k=1) And ((str2="a") And (str2<="z")) or ((str2="A") And (str2<="Z")) then
EMAIL = string
else
EMAIL = "miss!"
end if
End Function
%
此检测函数并不充分,并没有检测".",如有兴趣请补充。
(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/asp/)来源:http://www.tulaoshi.com/n/20160129/1510508.html
看过《ASP中字符串函数的应用》的人还看了以下文章 更多>>