上一页 1 2 3 4 5 6 ··· 10 下一页
摘要: 这个小小的细节浪费了我20分钟。为了避免今后重蹈覆辙。截图记录下来~! 阅读全文
posted @ 2008-11-28 10:43 missthe 阅读(343) 评论(0) 推荐(0) 编辑
摘要: 内容网络 整个网络上的相关网页 仅我定位的展示位置上的相关网页 阅读全文
posted @ 2008-11-22 07:07 missthe 阅读(412) 评论(0) 推荐(0) 编辑
摘要: function totalDays(yy,mm) dt=dateSerial(yy,mm,1) totalDays=datediff("d",dt,dateadd("m",1,dt)) end function response.write("年份","月份") 阅读全文
posted @ 2008-11-20 16:59 missthe 阅读(280) 评论(0) 推荐(0) 编辑
摘要: 1.文本框只能输入数字代码(小数点也不能输入) 2.只能输入数字,能输小数点. 3.只能输入字母和汉字 4.只能输入英文字母和数字,不能输入中文 5.只能输入数字和英文chun 6.小数点后只能有最多两位(数字,中文都可输入),不能输入字母和运算符号: 57) && event.keyCode!=46 || /\.\d\d$/.test(value))event.returnValue=... 阅读全文
posted @ 2008-11-18 13:40 missthe 阅读(405) 评论(0) 推荐(0) 编辑
摘要: class Myobj public sub Link() response.Write"cxcxcx" end sub end class dim obj set obj=new Myobj obj.Link() set obj=nothing 阅读全文
posted @ 2008-10-27 22:36 missthe 阅读(232) 评论(0) 推荐(0) 编辑
摘要: 第一步: 第二步: 源文件下载:http://files.cnblogs.com/missthe/change.rar 阅读全文
posted @ 2008-10-24 16:07 missthe 阅读(195) 评论(0) 推荐(0) 编辑
摘要: Function GetLocationURL() Dim Url Dim ServerPort,ServerName,ScriptName,QueryString ServerName = Request.ServerVariables("SERVER_NAME") ServerPort = Request.ServerVariables("SERVER_PORT") ScriptNa... 阅读全文
posted @ 2008-10-24 15:56 missthe 阅读(315) 评论(0) 推荐(0) 编辑
摘要: Function regExReplace(sSource, replStr) //(替换字符集,代替值) Dim regEx, str1 str1 = sSource Set regEx = New RegExp regEx.Pattern = "|" regEx.IgnoreCase = True regEx.Global = True regExReplace = regEx.R... 阅读全文
posted @ 2008-10-24 15:52 missthe 阅读(1151) 评论(0) 推荐(0) 编辑
摘要: 调用范例: 编辑器源代码下载:http://files.cnblogs.com/missthe/HtmlEditor.rar 阅读全文
posted @ 2008-10-24 15:30 missthe 阅读(461) 评论(0) 推荐(0) 编辑
摘要: 那样写: set rs=conn.execute("select * from Books") while not rs.eof rs2=conn.execute("select * from Authrs where AuthorID="&rs("AuthorID")) Response.write rs("Title")&">>"&rs2("Name") rs.movenext() ... 阅读全文
posted @ 2008-10-24 14:19 missthe 阅读(173) 评论(0) 推荐(0) 编辑
上一页 1 2 3 4 5 6 ··· 10 下一页