- 博客(17)
- 收藏
- 关注
原创 发现一个好站(在线电子地图,行政地图,卫星地图)
最近主要致力于更新(标注)世界所有国家的卫星地图,已经更新完成了亚洲、欧洲、美洲、非洲和大洋洲国家卫星地图及相关介绍。 世界部分国家的首都卫星地图已经标注完成! 中国卫星地图
2006-10-09 09:13:00 2035
原创 脚本加密与解密
脚本加密与解密JScript.Encode: http://www.vvss.net/tools/encode.htmunescape: http://www.vvss.net/tools/unescape.htm
2004-10-16 12:33:00 2539
原创 禁止站外提交表单
使用asp尽量减少服务器端的工作量,这样就应该多使用javascript,把所有提交字段使用javascript或vbscript检测后提交给服务器,这样服务器就不必再作检测,而在提交时可能会有人修改script从本地提交,这样存在安全提交的问题,所以应该要求从服务器断路径提交,其他地址提交提交无无效:server_v1=Cstr(Request.ServerVariables("HTTP_REF
2004-10-15 18:34:00 1207 1
原创 css web 颜色渐变
MS的站确实不错,有很多东西可以参考这个渐变其实就是一个css滤镜而已。给参数介绍filter : progid:DXImageTransform.Microsoft.Gradient ( enabled=bEnabled , startColorStr=iWidth , endColorStr=iWidth ) 属性:enabled :可选项。布尔值
2004-10-12 16:41:00 1696
原创 JavaScript 参考教程
http://www.iselong.com/online/ebooks/javascript/js_0.htmhttp://www.iselong.com/online/ebooks/javascript/js_1.htmhttp://www.iselong.com/online/ebooks/javascript/js_2.htmhttp://www.iselong.com/online/eb
2004-09-29 10:36:00 915
原创 金额数值小写转大写函数
刚写的一个函数,但只能对"亿"以下的数值有效.如果超过Long类型的数值范围则转换会出错!!!!函数直接使用ChangeMoney(数值)即可!!得到的则是转换后的大写数额以下是第一次写的:对0不起隐藏作用Response.Write(ChangeMoney(235))Function ChangeMoney(sMoney)On Error Resume NextDim sToDim iInt,i
2004-09-19 15:33:00 1128
原创 一个取图片尺寸的类,支持jpg,gif,png
-->I have released this source code into the public domain. You may use itwith no strings attached.Just call GetImageSize with a string containing the filename, andit will return a user defi
2004-09-18 22:47:00 905
原创 按下回车键指向下一个位置的一个函数
function tofocus(itemname) //按回车置下一个位置{var aa=eval("document.vouch."+itemname)a.focus()} 在控件中使用onkeypress="javascrip:if(window.event.keyCode==13){tofocus(nextformname)}提取下一个控件名 (出处:开发者俱乐部)
2004-09-18 22:30:00 882
原创 数据库导出xml、htm、csv、sql
数据库导出记录代码作者海娃,haiwa#blueidea.com,http://www.51windows.Net用法:ExportDB.asp?sql=select语句&tablename=表名(可选)&filetype=导出格式(xml,htm,csv,sql)&pid=自动编号字段名(仅当导出sql类型时有用)dim tablename,filetype,fieldPidsql
2004-09-18 02:36:00 1106
原创 日期转大写的代码
2004-6-11 => 二零零四年六月十一日 Function D(x) if int(split(x,"-")(2)/10)=0 then D=D & F(split(x,"-")(2)) else _ if split(x,"-")(2) mod 10 =0 then D=D & F(int(split(x,"-")(2)/10)) & "十" else _ D=D & F(int(spl
2004-09-18 02:32:00 928
原创 汉字读音表GB2312版 (共7809个汉字)
汉字读音标 - 51windows.Net<!--a{text-decoration:none}a:hover{text-decoration:underline}td{font-size:14px;}-->汉字读音表GB2312版 (共7809个汉字) a1 : 阿啊呵腌吖锕 a2 : 啊呵嗄 a3 : 啊呵 a4
2004-09-18 02:28:00 52430 3
原创 限制某段IP地址
function IP2Num(sip) dim str1,str2,str3,str4 dim num IP2Num=0 if isnumeric(left(sip,2)) then str1=left(sip,instr(sip,".")-1) sip=mid(sip,instr(sip,".")+1) str2=left(sip,instr(sip,".")-1) sip=mid(s
2004-09-18 02:20:00 896
原创 MIME Formats in IIS5.0
MIME Formats in IIS5.0Declaring a MIME Type in an ASP PageWhen a Web server returns a file to a browser, it sends information identifying the type of content being returned. When an ASP ap
2004-09-18 02:15:00 1116
原创 IE里Window的Method列表
ie里window的method列表 alert(sMsg) //弹出一个确认消息框 attachEvent(sEvent,pFunction) //绑定一个函数到某个事件,事件触发时随机执行其中一个被绑定的函数 blur() //令窗口丧失焦点 clearInterval(iIntervalID) //清除指定定时器的关联函数 clearTimeout(iTimeoutID) //清
2004-09-18 02:09:00 810
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人