ASP中實現字符部位類似.NET里String對象的PadLeft和PadRight函數_應用技巧

來源:腳本之家  責任編輯:小易  

直接使用&就ok了ASP 里面&是字符串連接雖然也可以實現字符串連接,但是如果連接的字符串中如果包含數字或者可轉換成數字的部分,就會出現錯誤了1+2 結果 3a"+"b"結果 ab1+"a"就會出現錯誤了www.anxorj.tw防采集請勿采集本網。

論壇里又有人問起日期怎樣格式化為:2004-08-09 05:02:20這樣的格式:于是寫了一個左(右)對齊的函數.這函數等價于.NET里String對象的PadLeft和PadRight函數

dim id,domurl,domurl1 id=request(\"id\") domurl1=\"data/img.asp?id= domurl=domurl1&id set rs=server.createobject(\"adodb.recordset\") sqltext=\"select*from info where domurl=\"&\"'domurl1'

Function PadLeft(Value,Length,sChar) Dim strText,I strText = String(Length,sChar) strText = strText & Value LeftPad = Right(strText,Length)End Function

用正則表達式 strString=\"http://www.ddd.com www.dss.com\" Set regExp=New RegExp regexp.Global=true regExp.Pattern=\"(((ht|f)tps?(www\\.))([\\w-]+\\.)+[\\w-:]+(/[\\w-./?Set matches=regExp.

改一下最下面則為這樣:

Dim arr(7) Dim i,h,t,w,x As Integer arr(1)=body arr(2)=html arr(3)=td arr(4)=table arr(5)=th arr(6)=div arr(7)=xml w=Len(arr(1)) for x=2 To 7 If w>len(arr(x))then w=len(arr(x))

Function PadRight(Value,Length,sChar) Dim strText,I strText = String(Length,sChar) strText = Value & strText LeftPad = Left(strText,Length)End Function

顯示 右邊 三位 語句。aa=right(\"3242341453\",\"1\",3) 你查查語句有 左邊,右邊。

使用例子:日期顯示

for i=1 to 7 aa=Dateadd(\"d\",i,date) ab=weekday(aa) if ab=1 then ac=\"星期日 elseif ab=2 then ac=\"星期一 elseif ab=3 then ac=\"星期二 elseif ab=4 then ac=\"星期三 elseif ab=5 then ac=

AA = year(now) & "-" & PadLeft(month(now),2,"0") & "-" & PadLeft(Day(now),2,"0") & " " & PadLeft(Hour(now),2,"0") & ":" & PadLeft(Minute(now),2,"0") & ":" & PadLeft(Second(now),2,"0")

萬能時間補位代碼

Public Function ForMatDate(DateAndTime, Para) '格式化日期(日期時間,格式) Dim Y, M, D, H, F, S IF Not ISNumeric(Para) Or Not ISDate(DateAndTime) Then Exit Function Y = CStr(Year(DateAndTime)) M = CStr(Month(DateAndTime)):IF Len(M) = 1 Then M = "0" & M D = CStr(Day(DateAndTime)):IF Len(D) = 1 Then D = "0" & D H = CStr(Hour(DateAndTime)):IF Len(H) = 1 Then H = "0" & H F = CStr(Minute(DateAndTime)):IF Len(F) = 1 Then F = "0" & F S = CStr(Second(DateAndTime)):IF Len(S) = 1 Then S = "0" & S Select Case Para Case "0" ForMatDate = Y & "-" & M & "-" & D & " " & H & ":" & F & ":" & S Case "1" ForMatDate = Y & "-" & M & "-" & D & " " & H & ":" & F Case "2" ForMatDate = Y & "-" & M & "-" & D Case "3" ForMatDate = Y & "/" & M & "/" & D Case "4" ForMatDate = Y & "年" & M & "月" & D & "日" Case "5" ForMatDate = M & "-" & D & " " & H & ":" & F Case "6" ForMatDate = M & "/" & D Case "7" ForMatDate = M & "月" & D & "日" Case "8" ForMatDate = Y & "年" & M & "月" Case "9" ForMatDate = Y & "-" & M Case "10" ForMatDate = Y & "/" & M Case "11" ForMatDate = right(Y,2) & "-" &M & "-" & D & " " & H & ":" & F Case "12" ForMatDate = right(Y,2) & "-" &M & "-" & D Case "13" ForMatDate = M & "-" & D Case Else ForMatDate = DateAndTime End Select End Function Response.Write ForMatDate(Now,"2")

asp一段自動補位的函數

function formatsn(getnum,getbit)dim formatsnnum,formatsnpre,formatsnjformatsnnum = getbit – len(getnum)for formatsnj = 1 to formatsnnumformatsnpre = formatsnpre & "0"nextformatsn = formatsnpre & getnumend function

使用方法

formatsn(getnum,getbit)

getnum 計數

getbit 共幾位

到此這篇關于ASP中實現字符部位類似.NET里String對象的PadLeft和PadRight函數的文章就介紹到這了,更多相關asp PadLeft和PadRight內容請搜索真格學網以前的文章或繼續瀏覽下面的相關文章希望大家以后多多支持真格學網!

第一種:使用 MaxLength 屬性 直接設置為6TextBox有一個屬性是 MaxLength,為“可輸入的最大字符數”。但是僅對于 SingleLine(單行文本框)有效,對于 MultiLine(多行文本框)就要用第二種方法了。第二種:使用 TextChanged 事件在 TextBox 有一個TextChanged事件,在“更改文本屬性后激發”。例子:private void TextBox1_TextChanged(object sender,System.EventArgs e){if(TextBox1.Text.Length>6){Response.Write("不能超過6個字符!}}內容來自www.anxorj.tw請勿采集。


  • 本文相關:
  • asp 包含文件中的路徑問題和使用單一數據庫連接文件的解決方案
  • 幾個經典的asp應用
  • 用asp實現訪問遠程計算機上mdb access數據庫文件的方法
  • 使用innerhtml時注意處理空格和回車符(asp后臺處理)
  • 檢查access數據庫中是否存在某個名字的表的asp代碼
  • 一些關于asp 購物車的想法
  • 關于“未指定的錯誤”的問題 的比較正解的解決方法
  • asp操作xml文件的完整實例代碼
  • asp 高級模板引擎實現類
  • asp無組件分頁實現思路及代碼
  • 在asp.net中控制文本框輸入字符數的控件是哪個?例:至少6個字符。怎么實現?
  • ASP中怎樣使兩個不同類型的字符連接在一起
  • [asp學習]ASP中怎么實現字符和acssll碼之間的互轉啊
  • asp中如何提取某個符號之前的字符
  • asp:怎么實現兩個字符串的連接
  • ASP中,在一個很長的字符串中,假如有好幾個相同的字符串,應該用什么函數實現
  • asp代碼實現字符串按字母順序(ABCDEFG)排序的方式
  • ASP中怎樣截取一段字符串中指定字符后三位的字符 例如: string a="四五六七八一二三" 我想截"一"后三位怎樣
  • 用sql還是asp實現“根據數字輸出特定字符”
  • 請問asp代碼能不能實現過濾兩個符號間的字符。
  • 網站首頁網頁制作腳本下載服務器操作系統網站運營平面設計媒體動畫電腦基礎硬件教程網絡安全asp基礎應用技巧數據庫相關asp class類存儲過程小偷/采集木馬相關fso專題首頁asp編程應用技巧asp 包含文件中的路徑問題和使用單一數據庫連接文件的解決方案幾個經典的asp應用用asp實現訪問遠程計算機上mdb access數據庫文件的方法使用innerhtml時注意處理空格和回車符(asp后臺處理)檢查access數據庫中是否存在某個名字的表的asp代碼一些關于asp 購物車的想法關于“未指定的錯誤”的問題 的比較正解的解決方法asp操作xml文件的完整實例代碼asp 高級模板引擎實現類asp無組件分頁實現思路及代碼推薦4款傻瓜型的asp服務器軟件(關于“未指定的錯誤”的問題 的比錯誤類型:provider (0x80004005c#入門教程之listbox控件使用方法utf-8 網頁不顯示+utf-8網頁亂碼asp 日期格式化問題microsoft jet database engine(asp中設置session過期時間方法總sql查詢語句通配符與access模糊查asp utf-8 亂碼問題的解決方法小聊天室實現私聊asp 信息提示函數并作返回或者轉向asp 常見對象總結(熟悉一下利用以后的開發imagemagickobject獲取圖片的信息無返回值asp access實現網站計數器(訪問量)asp提高數據顯示效率-緩存探幽asp中用ajax方式獲得session的實現代碼asp常用函數:trace()discuz 2.0整合asp系統,用戶添加函數轉換中文為unicode 轉換unicode到正常文本
    免責聲明 - 關于我們 - 聯系我們 - 廣告聯系 - 友情鏈接 - 幫助中心 - 頻道導航
    Copyright © 2017 www.anxorj.tw All Rights Reserved
    陕西快乐10分下载