asp
文章平均质量分 67
巫妖天下
宇宙无敌超级变态的菜鸟技术淫才
展开
-
asp带查询的分页例子
"" and d2"" then if cdate(d1)>cdate(d2) then response.Write("") response.End() end if end if if d1 = "" then d1 = showToday() if d2 = "" the原创 2010-12-14 12:18:00 · 3074 阅读 · 0 评论 -
asp查看文件大小类型创建时间
<br /><% Function showsize(filename) FPath=server.mappath(filename) '本目录下 set fso=server.CreateObject("scripting.filesystemobject") If fso.fileExists(FPath) Then Set f = fso.GetFile(FPath) filetype=f.type filesize=f.size adddate=原创 2010-12-13 16:42:00 · 3174 阅读 · 0 评论 -
asp 字符转换 Unicode
<br /><% Function CodeToUni(code) dim ix,thisStr,ThisCode,newcode if code="" then codetouni="" exit function end if for ix=1 to len(code) thisstr=right(left(code,ix),1) thiscode=hex(ascw(thisstr)) if len(thiscode)=1 the原创 2010-12-16 11:17:00 · 3393 阅读 · 0 评论 -
常用JS (自我整理)
《JS 写 Cookies》Hello World原创 2011-02-25 10:55:00 · 534 阅读 · 0 评论 -
常用asp(自我整理)
[ 一般式返回 ]'//无确认自动关闭窗口 response.Write("") response.End() '//返回式提示 response.Write("") response.End() '//跳转页面式提示 response.Write("原创 2011-01-31 09:38:00 · 1784 阅读 · 0 评论 -
asp 读取hao123的手机归属接口
<br /><%@Language="VBScript" CodePage="65001"%> <% '请求手机号码 chkPhone.asp?m=13763038876 req = Trim(request.QueryString("m")) if left(req,1)="1" and len(req)=11 then theResult = GetData(req) response.Write("Mobile : ") response.Write(GetMid(the原创 2011-03-27 19:21:00 · 2474 阅读 · 0 评论