- 博客(55)
- 资源 (4)
- 问答 (1)
- 收藏
- 关注
原创 安装完wdinows 2003以后更改序列号的方法,以及可以安装R2补丁的序列号
1: 开始-运行-regedit: 备份HKEY_LOCAL_MACHINE/Software/Microsoft/WindowsNT/Current Version/WPAEvents键值,例如:wpa.reg2: 修改或刪除Wpaevents子鍵3:开始-运行 c:/windows/system32/oobe/msoobe /a 现在应该是没激活状态 此处的c:/wind
2007-10-31 11:47:00 972
原创 用Delphi创建服务程序
Windows 2000/XP和2003等支持一种叫做"服务程序"的东西.程序作为服务启动有以下几个好处:(1)不用登陆进系统即可运行.(2)具有SYSTEM特权.所以你在进程管理器里面是无法结束它的.笔者在2003年为一公司开发机顶盒项目的时候,曾经写过课件上传和媒体服务,下面就介绍一下如何用Delphi7创建一个Service程序.运行Delphi7,选择菜单File-->New-->Othe
2007-09-24 10:25:00 423
原创 当使用Delphi调用Delphi编写的Com组件时,如果遇到“找不到成员”错误的解决方法
procedure TForm1.Button2Click(Sender: TObject);var A_Com:Variant;beginA_Com := CreateOleObject(Test.VH);A_Com.ShowText(Text);end; 这执行会报“找不到成员”的错误只要将A_Com.ShowText(Text);改成A_Com.ShowText[T
2007-09-23 11:33:00 758
转载 Windows权限的含义
下面简单解释一下六个权限选项的含义:①完全控制(Full Control):该权限允许用户对文件夹、子文件夹、文件进行全权控制,如修改资源的权限、获取资源的所有者、删除资源的权限等,拥有完全控制权限就等于拥有了其他所有的权限;②修改(Modify):该权限允许用户修改或删除资源,同时让用户拥有写入及读取和运行权限;③读取和运行(Read & Execute):该权限允许用户拥有读取和列
2007-09-19 18:17:00 648
原创 金额保留两位小数
Function PriceCheck(ThePrices) PriceCheck = Formatnumber(ThePrices,2,-1,0,0)End Function (6665.900)一个例子用到了函数Formatnumber()的所有参数:第一个参数(-6665.8999)指定了要进行格式化的数字。第二个参数(3)指定了小数点后显示的位数。第三个参数(-1)指定了是否显示
2007-09-15 13:54:00 485
原创 css alpha 用 js 设置的写法
function ChangeBackTran(thisValue){ document.all.PreviewPicBox.filters.Alpha.opacity = thisValue ; }
2007-08-27 18:20:00 514
原创 完整的键位扫描码和判断数字键、字母键、字符键的函数
一、键位扫描码,用event.keyCode获得8 退格 9 Tab 12 小键盘,numlock未锁定时 13 回车 16 Shift 17 Ctrl 18 Alt 19 Pause Break 20 CapsLock 27 Esc 33 PgUp 34
2007-05-22 04:49:00 606
原创 JS的replaceall
String.prototype.replaceAll = function(s1,s2){ return this.replace(new RegExp(s1,"gm"),s2); }
2007-05-18 07:55:00 1265
转载 动态创建table要注意tbody
CODE:var myTable = document.createElement("table");var myTbody = document.createElement("tbody");var myTr = document.createElement("tr");var myTd = document.createElement("td");myTd.innerHTML
2007-05-16 11:16:00 501
转载 Javascript attachEvent传递参数的办法
var newopen = function(id,level){ return function() { opentree(id,level);//该函数为外部定义的一个执行函数; }}x.attachEvent("onclick",newopen(id,parseInt(level)+1));y.attachEvent("onclick",newopen(id,parseInt
2007-05-15 16:30:00 1306
转载 用isapi_rewrite Lite Version(免费版本)编写正则表达式
下面是一个简单的例子,我想让别人输入 http://server/test-12314.html 实际上访问的是 http://server/test.asp?id=12314 。那么我们的匹配表达式应该是 /test-([0-9]*).html 对应的格式化表达式应该为 /test.asp/?id=$1 。 进行正则表达式的编写的时候,可以利用isapi_rewrite提供的正则表达式测试工具(
2007-04-26 11:49:00 516
原创 Win2003+IIS安装ISAPI_Rewrite使论坛运行静态页面!
Win2003+IIS安装ISAPI_Rewrite使论坛运行静态页面!前提你要自己有服务器,然后下载:http://www.isapirewrite.com/download/isapi_rwl_0049.msi接着安装,随便装哪都行。然后,打开Internet 信息服务,右键,web站点属性,点ISAPI筛选器选项卡.添加筛选器,名称填个rewrite,路径自己指定ISAPI_Rewrite.
2007-04-26 11:45:00 1017
转载 如何在html页面中的textbox框输入html标签(转由Rickel Huang )
如何在html页面中的textbox框输入html标签Rickel Huang 2005-4-18今天解决的一个问题,需要在一个textbox框中输入html标签,并显示得到的效果。方法: 在一个td中嵌套一个DIV元素,设置Div元素标签属性CONTENTEDITABLE,这样该Div标签就可以编辑了,用此方法模拟textbox一个问题在于你如果直接输入”这样的标
2007-03-28 13:42:00 741
转载 IASP 让你的ASP运行于Apache
自从MS推出ASP技术后,由于ASP在创建动态交互式站点上的强大功能及其代码编写的简便性,使ASP在很多Internet/Intranet/Extranet网站上得到了极其广泛的应用,尤其是涉及到数据库操作的网站应用系统更是倾向于采用ASP技术。但由于众所周知的原因,ASP只能工作于MS自己的操作系统平台和服务器软件之下,即只能在WindowsNT+IIS系列或Windows9X+PWS系列中使用
2007-03-19 12:23:00 1070
转载 500元大洋学习SEO
某君花500元大洋学习SEO,将教程笔记公布。感谢他的分享!呵呵原文:http://www.kuziyuan.com/article/6/2007/200703092487.htmPR值算法原理总体上基于下面2个前提:1、一个网页被多次引用,则它可能是很重要的;一个网页虽然没有被多次引用,但是被重要的网页引用,则它也可能是很重要的;一个网页的重要性被平均的传递到它所引用的网页。这种重要的网页称为权
2007-03-19 12:01:00 1012
原创 自己写的防数字SQL注入的Request
Function IRequest(R_Para) Para = Request(R_Para) If IsNumeric(Para) = false Or Para="" Then Response.write "参数不正确" Response.end Else IRequest = Para End ifEnd Function用于替换ASP中原来的Request
2007-03-15 12:21:00 387
转载 10个最好Windows2003命令行函数
10个最好Windows2003命令行函数Windows的命令行程序是系统管理程序的支柱。然而我遍查了Windows Server 2003的附加软件,我从来没有报道过Windows系统内建的最有用的命令行程序。这些命令的用处体现在许多方面。当你需要做一个快速的修复工作,或者你要写一个批处理文件作为预定任务或一个大任务的一部分就会很有用。 我从Windows Server 2003中精选
2007-03-13 15:39:00 462
转载 用asp或asp.net显示NTFS磁盘空间
ASP的:disk=request.QueryString("disk")user=request.QueryString("user")if disk="" or user="" thenResponse.Write "没有指定硬盘或用户(disk,user)"elseSet colDiskQuotas = CreateObject("Microsoft.DiskQuota.1")col
2007-02-08 16:49:00 598
转载 Delphi防止程序被重复执行
复制到新的unit中,引用到自己的程序中即可unit MultInst;interfaceconstMI_QUERYWINDOWHANDLE = 1;MI_RESPONDWINDOWHANDLE = 2;MI_ERROR_NONE = 0;MI_ERROR_FAILSUBCLASS = 1;MI_ERROR_CREATINGMUTEX = 2;// Call this funct
2007-01-10 14:12:00 616
原创 asp动态include文件
受 宏限制必须存在该文件并且会预先编译(不管前面是否加以条件)经常有这样的要求,根据不同的需求要求include不同的文件如各个人的不同设置,所以要求能动态include文件。代码如下:Function include(filename) Dim re,content,fso,f,aspStart,aspEnd set fso=CreateObject("Scripting.F
2006-12-31 15:54:00 427
原创 修改eWebEditor显示路径方法
eWebEditor.aspconfig.BaseHref = ; config.BaseHref = 纯记录
2006-12-31 02:05:00 831
原创 ASP获取浏览器当前路径
http://192.168.0.5/super/super_article.asp?id=4----->http://
2006-12-29 11:39:00 672
原创 IFRAME完全自适应窗口高度
test.asp" name="main" id="main" allowtransparency="true" align="default" marginwidth=0 marginheight=0 frameborder=0 scrolling=no height="200" width="850" onload="this.height=0;var fdh=(this.Document?
2006-12-08 03:22:00 770
原创 Delphi6开发Web Service程序
本文介绍的是如何用Delphi6开发Web Service程序,并把服务程序放在IIS Web服务器上提供给各种客户程序调用。 一编写服务程序 第一步:File----->New----->Other------>WebServices----->Soap Server Application 选择ISAPI/NSAPI Dynamic Link Library然后确定。生成一个框架。后面的大部分
2006-11-20 10:28:00 751
原创 web开发常用js及html代码(待整理)
css创建CLASS并不是建立多种风格的唯一手段, ID也可以用来实现同一规则被应用到页面中不同的地方。 它的语法是: #id名 {标志属性:属性值;标志属性:属性值;……标志属性:属性值} 如上面的例子,可以改写为: #001 { font-size: 10pt; color: red} #002 { font-size: 12pt; color: blue}
2006-10-31 03:32:00 1081
原创 设置Access字段属性时常遇到的两个选项
Function SetAccess(conns,tables,fields)Set adox = Server.CreateObject("ADOX.Catalog")Set adox.ActiveConnection = conns conns用于确认链接哪个MDBSet tbl = adox.Tables(tables)set col=tbl.Columns(fields)col.P
2006-10-23 17:13:00 743
转载 防止cint和clng的溢出出错
一、检测它是不是整数function Is_Int(a_str) if not isnumeric(a_str) or len(str) > 5 then Is_Int = false exit function elseif len(str) Is_Int = true exit function
2006-10-23 11:42:00 609
转载 Delphi中的IsNumeric
function IsNumeric(Data: string) : boolean; var i, code : integer;begin val(data, i, code); if code = 0 then result := true else result := false; end;
2006-10-19 12:43:00 1069
转载 如何插入Access库记录后马上得到自动编号值
如何插入Access库记录后马上得到自动编号值 首先须保证获得记录集的方式支持bookmark属性,如1,3插入一条带自动编号字段的记录后,获取该记录的bookmark属性值temp = rs.bookmark然后rs.bookmark = temp试试!!Response.write rs.Fields("ID").
2006-09-28 13:58:00 668
原创 编号从新开始
dbcc checkident(表名,reseed,0); --------------------------------------------------------------- 下午才学的:dbcc checkident(yourtable,reseed,0) 编号从新开始 -------------------------------------------
2006-09-28 13:56:00 619
转载 用磁盘序列号对ASP进行加密
自从ASP(Active Server Pages)问世以来,因其可以创建健壮易于维护、与平台无关的应用系统,ASP技术受到了越来越多网络程序员的喜爱,使用ASP从事WEB开发的人也越来越多。但ASP只是一种非编译型的、在服务端运行的脚本语言,采用明文(plain text)方式来编写,即使采用了ASP加密程序对ASP源码进行加密,也不一定能保证发布到运行环境中去的ASP应用程序不被非法拷贝。对于
2006-09-26 14:56:00 735
原创 Visual Studio .net 2005 简体中文版 迅雷下载地址
ftp://ttbbs-VIP:77525563@cnc.ttbbs.org/下载/大型软件/[02.21][Visual Studio 2005 Professional Edition - DVD 简体中文版本][阿笨]/CS_VS_2005_Pro_DVD_TTBBS.ORG.iso 2006年8月15日 下载时 2.5M/S爽
2006-08-15 12:12:00 4581
原创 OnUnLoad事件不起作用的解决方法
在IE在直接在Body的Onunload事件中JS脚本,常常会不起作用,可以用以下代码代替: window.attachEvent(onunload,function(){window.location.replace(Admin_Quit.asp);}); 这应该算是IE的一个BUG吧
2006-08-09 12:01:00 1727
转载 兼容多种不同版本的浏览器,创建XMLHTTPRequest
try{ if( window.ActiveXObject ){ for( var i = 5; i; i-- ){ try{ if( i == 2 ){ xmlhttp_request = new ActiveXObject( "Microsoft.XMLHTTP" ); }else{ xmlhttp_request = new ActiveXObject
2006-08-07 16:46:00 717
转载 老文章——TWebBrowser编程简述
引 言 这篇文章最先发表于2000年07月25日,最后一次修改是在2001年02月07日。这里再次贴出的目的,一是作为前一阶段的完结,所以文章中的错误都不作修改;二是希望作为一个新的起点。我准备整理一下至今所积累的浏览器编程的知识,比较完整地写出来,与网友共勉。TWebBrowser编程简述摘要:Delphi 3开始有了TWebBrowser构件,不过那时是以ActiveX控件的形式
2006-08-03 14:41:00 531
转载 几招轻松搞定服务器安全
几招轻松搞定服务器安全一、删除或更名以下危险的ASP组件: WScript.Shell、WScript.Shell.1、Wscript.Network、Wscript.Network.1、adodb.stream、Shell.application 开始------->运行--------->Regedit,打开注册表编辑器,按Ctrl+F查找,依次输入以上Wscript.Shell等
2006-08-02 16:31:00 532
原创 用dom动态创建一个script对象
用dom动态创建一个script对象:Test.aspvar script=document.createElement("script");script.src="XXXX.asp"; //加载需要执行的js代码document.appendChild(script); XXXX.asp中的格式为:setTimeout(function(){SearchList.innerHT
2006-07-30 14:50:00 999 1
原创 在html中接收地址栏中的参数
今天在工作中遇到一个问题,就是要在在html文件中接收地址栏中的参数,以往都是在aspx中接收参数,只要用request[参数名]就行,后来在网友的帮忙下得到解决。虽然不是自己解决,但从中也学到些东西。 window.open ("11.htm?aa="+dd);问题就是从11.htm中接收aa的值 解决方案如下: 1.使用 window.location.search 来取得后面的参数 //
2006-07-30 14:28:00 468
E流速建虚拟主机管理系统
2007-10-25
我是一个oo初学者,想向大家讨论一下方法责任划分的问题。
2011-09-21
TA创建的收藏夹 TA关注的收藏夹
TA关注的人