人人做人人澡人人爽欧美,国产主播一区二区,久久久精品五月天,羞羞视频在线观看免费

當前位置:蘿卜系統下載站 > 技術開發教程 > 詳細頁面

ASP中字符串函數的應用

ASP中字符串函數的應用

更新時間:2022-08-20 文章作者:未知 信息來源:網絡 閱讀次數:

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)通過字符串函數檢測輸出是否為電子郵件地址:

<%
 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
%>

此檢測函數并不充分,并沒有檢測".",如有興趣請補充。


溫馨提示:喜歡本站的話,請收藏一下本站!

本類教程下載

系統下載排行

網站地圖xml | 網站地圖html
主站蜘蛛池模板: 海兴县| 辽源市| 塔河县| 晋城| 罗甸县| 双辽市| 南陵县| 南木林县| 西贡区| 红原县| 苍溪县| 涿州市| 松江区| 徐闻县| 三门县| 兴城市| 沙坪坝区| 福鼎市| 榕江县| 泸水县| 龙江县| 南木林县| 温泉县| 永泰县| 宝鸡市| 河池市| 新龙县| 江油市| 芦山县| 怀宁县| 上蔡县| 武穴市| 泗水县| 钟山县| 旬阳县| 临夏县| 岫岩| 洛阳市| 苏尼特右旗| 金湖县| 宁德市|