摘要: Function RegImg(TheStr) Dim RegEx Set RegEx = New RegExp '建立正则表达对象。 RegEx.IgnoreCase =True ' 是否区分大小写,True为不区分且默认 RegEx.Global = True '全部匹配还是只匹配第一个 Reg 阅读全文
posted @ 2017-03-05 00:55 后除 阅读(616) 评论(0) 推荐(0) 编辑
摘要: Public Function GetFormatDate(DateAndTime, para)On Error Resume NextDim y, m, d, h, mi, s, strDateTimeGetFormatDate = DateAndTimeIf Not IsNumeric(para 阅读全文
posted @ 2017-03-05 00:50 后除 阅读(1267) 评论(0) 推荐(0) 编辑
摘要: <div align="center"> <table width="980" height="35" border="0" align="center"> <tr> <td> 友情链接:&nbsp;&nbsp; <a target="_blank" href="#">One</a> &nbsp;| 阅读全文
posted @ 2017-03-05 00:46 后除 阅读(20601) 评论(0) 推荐(0) 编辑
摘要: function checkcc() { var reg = new RegExp("^[0-9]*$"); var obj = document.getElementById("moneyc"); if(obj.value=="") { alert("不能为空!"); return false; 阅读全文
posted @ 2017-03-05 00:42 后除 阅读(6031) 评论(0) 推荐(0) 编辑