2005年11月_potter2002

原创下拉菜单的内容移动

无标题文档// 加入已选function Add() { var sel1=document.myform.d_b1; var sel2=document.myform.d_b2; if (sel1.selectedIndex alert("请选择一个待选按钮！"); return; } sel2.options[sel2.length]=new Option(sel1.options[sel

2005-11-01 14:30:00 993

原创 window.open的例子和使用方法以及参数说明

window.open的例子和使用方法以及参数说明一、window.open()支持环境： JavaScript1.0+/JScript1.0+/Nav2+/IE3+/Opera3+二、基本语法：window.open(pageURL,name,parameters) 其中：pageURL 为子窗口路径 name 为子窗口句柄 parameters 为窗口参数(各参数用逗号分隔) 三、示例： w

2005-11-01 14:29:00 711

Set msg = Server.CreateObject("JMail.Message")msg.silent = truemsg.Logging = truemsg.Charset = "gb2312"中文编码msg.ContentType = "text/html"html模式msg.MailServerUserName = "[email protected]" smtp用户名 msg.Mai

2005-11-01 14:26:00 1543

原创 js 与vbs 判断email的比较

Function chkemail(strEmailAddr) Dim re Set re = new RegExp re.IgnoreCase = false re.global = false re.pattern = "[/w/-/.]+[@]([/w/-]+[.]){1,2}(/w){2,3}" chkemail = re.Test(strEmailAd

2005-11-01 14:23:00 793

原创读取数据的一些属性

RS.OPEN SQL,CONN,A,BA: ADOPENFORWARDONLY(=0) 只读,且当前数据记录只能向下移动ADOPENKEYSET(=1) 只读,当前数据记录可自由移动ADOPENDYNAMIC(=2) 可读写,当前数据记录可自由移动ADOPENSTATIC(=3) 可读写,当前数据记录可自由移动,可看到新增记录B:ADLOCKREADONLY(=1) 缺省锁定类型，记录集是只读的

2005-11-01 14:21:00 911

原创搜索整站

****************************************************************************************** Copyright Notice **** Web Wiz Guide Advanced Site Search Engine**

2005-11-01 14:18:00 1109

原创三秒钟关闭页面

function window.onload(){var ObjStr=document.body.insertAdjacentHTML("BeforeEnd",ObjStr)if(parseInt(window.navigator.appVersion.split(";")[1].substr(5))>=6){window.opener=setTimeout("self.close();

2005-11-01 14:14:00 919

原创获取文件大小

FPath=server.mappath("word/temp.doc")FPath="f:/temp/word.asp"Set fso = CreateObject("Scripting.FileSystemObject")Set f = fso.GetFile(FPath)response.write "文件名称："&f.name&""response.write "文件大小："&f.siz

2005-11-01 14:12:00 696

原创通用asp防攻击函数

编写通用的asp防注入程序 sql注入被那些菜鸟级别的所谓黑客高手玩出了滋味，，发现现在大部分黑客入侵都是基于sql注入实现的，哎，，谁让这个入门容易呢，好了，，不说废话了，，现在我开始说如果编写通用的sql防注入程序一般的http请求不外乎 get 和 post,所以只要我们在文件中过滤所有post或者get请求中的参数信息中非法字符即可，所以我们实现http 请求信息过滤就可以判断是是否

2005-11-01 14:10:00 891

原创一个比window.open() 打开更快的方法

无标题文档 function OpenDialog() { var winArgs = new Array(0, 0, 0); var winSettings = center:yes;resizable:no;scrollbars:yes;menubar:yes;help:no;status:no;dialogWidth:435px;dialogHeight:4

2005-11-01 14:09:00 1422

原创另外一个通过生成excel解决web打印方案的例子

server.scripttimeout=360 response.buffer= true response.expires=0 set xlapplication = CreateObject("Excel.Application")xlapplication.DisplayAlerts = false不显示警告xlapplication.Application.Visible = fals

2005-11-01 14:04:00 909

原创一个并不是很好解决web打印方案的例子

td{font-size:14px;line-height:180%}.ybk{border-right:1px #000000 solid;}.sbk{border-top:1px #000000 solid;}//因为要在客户端打印，所以将codebase 的路径改为服务的URL例如:http://IP/存放ScriptX.cab的路径function window.onload() { f

2005-11-01 14:00:00 756

JOHNNY的专栏