ASP中实现字符部位类似.NET里String对象的PadLeft和PadRight函数_应用技巧

来源:脚本之家  责任编辑:小易  

直接使用&就ok了ASP 里面&是字符串连接虽然也可以实现字符串连接,但是如果连接的字符串中如果包含数字或者可转换成数字的部分,就会出现错误了1+2 结果 3a"+"b"结果 ab1+"a"就会出现错误了www.zgxue.com防采集请勿采集本网。

论坛里又有人问起日期怎样格式化为: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.zgxue.com请勿采集。


  • 本文相关:
  • 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.zgxue.com All Rights Reserved