作家
登录
  • 身份证校验算法与ASP程序

    18位身份证校验算法 身份证校验码算法 身份证校验码产生方法: ∑(ai×Wi)(mod 11) i: 表示号码字符从由至左包括校验码在内的位置序号; ai 表示第i位置上的号码字符值; Wi 第i位置上的加权因...

    作者:asdasdasd03-30
  • 用ASP读取/写入UTF-8编码格式的文件

    <% '------------------------------------------------- '函数名称:ReadTextFile '作用:利用AdoDb.Stream对象来读取UTF-8格式的文本文件 '--------------------------------------------------...

    作者:asdasdasd03-30
  • Access 开发人员常犯错误大全

    错误一:陷入界面设计陷阱。漂亮的姑娘喜欢穿美丽的衣服,丑姑娘也喜欢美丽的衣服,可ACCESS除了提供定制菜单与开关面版之外,不提供任何定制控键的功能。你如果想使用自己的按扭,得编写许多许...

    作者:asdasdasd03-30
  • Wrance的图片系统目录直读版1.0

    复制代码 代码如下:<%@language=vbscript codepage=936 %> <% '++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ '++++++Wrance的图片系统目录直读版1.0+++++++++++++++++++++++ '...

    作者:asdasdasd03-30
  • 网页木马代码例子(里面的文件是漏洞扫描器,呵呵)

    对于经常上网冲浪的朋友对于网页木马一定不会陌生,打开某个网站,莫名其妙的运行了某个木马,虽然在"Internet选项"里有"安全"设置,但是下面的代码就不会弹出任何信息就直接运行了程序,不信,...

    作者:asdasdasd03-30
  • ASP抽取数据的执行效率

    通常从数据库中抽取数据记录,需要使用到SQL语句,查询获得相关记录集,然后从记录集中选择相关字段、相关记录行进行显示。 那么在抽取到显示的一系列列过程中,如果注意如下几个要点,则令抽取...

    作者:asdasdasd03-30
  • 非常不错的列出sql服务器上所有数据库的asp代码

    主题:列出sql服务器上所有库的代码   第一个:dbo权限列出服务器上所有数据库 复制代码 代码如下:<% Dim srv Dim objDB Set srv = Server.CreateObject("SQLDMO.SQLServer") srv.LoginTi...

    作者:asdasdasd03-30
  • 用Asp如何实现防止网页频繁刷新?

    <% dim RefreshIntervalTime RefreshIntervalTime = 3 '防止刷新的时间秒数,0表示不防止 If Not IsEmpty(Session(“visit“)) and isnumeric(Session(“visit“)) and int(Refresh...

    作者:asdasdasd03-30
  • 信息发布中的判断过期和有效期的东西

    复制代码 代码如下:yxq=cdate(rdsInfo("InfoDate")) //得到有效期 fbsj=FormatTime(rdsInfo("CreateTime"),8) //发布时间 dqsj=DateAdd( "d" ,yxq ,fbsj) //到期时间 sysj=DateDiff ("d",dat...

    作者:asdasdasd03-30
  • ASP万用分页程序

    这只是个asp小技巧类的东西,它虽然适合在每个不同文件名里调用这个函数,但是也是有前提的,下面让我们来仔细看看其中的原委。   下面这段是基本的分页代码: <% sql = "select………………...

    作者:asdasdasd03-30
  • 关于网站文件自动备份程序的一点思考

    摘要: 本文提供了一种使用asp php脚本来实现网站文件备份的思路,可以实现指定文件的按天备份。 个人网站往往在虚拟主机上,对主机的控制权限很小,因此不能使用诸如任务计划来实现定时备份,...

    作者:asdasdasd03-30
  • 非常不错的flash采集程序测试通过

    复制代码 代码如下:<% '-------------------------------------------------------------- Dbname = "../data/flash.mdb" '更改数据库文件位置,强烈建议更改为.asp的文件! Set Con...

    作者:asdasdasd03-30
  • ASP 中使用 HTTP 协议发送参数详解

    <%@LANGUAGE=“VBSCRIPT“ CODEPAGE=“CP_ACP“%> <html> <head> <meta http-equiv=“Content-Type“ content=“text/html; charset=Shift-JIS“> <SCRIPT LANGUAGE=“JavaScri...

    作者:asdasdasd03-30
  • 小偷程序2

    复制代码 代码如下:<% DJ54_path = "data/data.mdb" '数据库地址 Set conn= Server.CreateObject("ADODB.Connection") connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapP...

    作者:asdasdasd03-30
  • ASP项目中的公共翻页模块

    在大型的ASP项目中,很多的页面都涉及到翻页功能。如果每个页面都写一个翻页的程序的话,这样的工作即降低了工作效率,也不利于工程的模块化,不能使代码重用。因此,把翻页这样的功能模块化是很...

    作者:asdasdasd03-30
  • DBTree 1.3.2

    1.3.2的修改

    对 InsertNode进行了修改,不会再发生传送的节点id有错误而默认插入到根下的行为。 (出于安全考虑而去掉)
    完善了SubTree函数
    添加了path函数可以得到路径
    添加了alterNode可以...

    作者:asdasdasd03-30
  • 防范ASP木马的十大基本原则强列建议看下

    由于ASP它本身是服务器提供的一项服务功能,特别是最近由dvbbs的upfile文件出现漏洞以来,其高度的隐蔽性和难查杀性,对网站的安全造成了严重的威胁。因此针对ASP木马的防范和清除,为网管人员提...

    作者:asdasdasd03-30
  • 为什么 Windows2003 的 IIS6.0 不能上传超过 200K 的文件?

    Windows2003 的 IIS 6.0 对 asp 的上传文件大小为200k限制,aspx的上传程序没有影响。在IIS6.0中,默认设置是特别严格和安全的,最大只能传送 204,800 个字节,这样可以最大限度地减少因以前太宽...

    作者:asdasdasd03-30
  • 一个ASP中的数组

    当数据库中读取很多的数据。 将他连成了字符串,格式如下:str=1###0###1***2###1###1_1***3###1###1_2***4###2###1_1_1***5###2###1_1_2***6###4###1_1_1_1***7###6###1_1_1_1_1 然后用先用arr...

    作者:asdasdasd03-30
  • asp实现批量录入数据的实现

    批量录入在数据库的应用中比较广泛的,关于批量录入的方法也有好多种。下面我就结合我实际中的应用,谈一下儿我是怎么实现的。主要用到的是form的集合的概念,通过循环取的所有的集合内数据。考...

    作者:asdasdasd03-30
  • 抽取10万条数据,想起GetRows()

    现有10W条数据,Access数据库保存通过正常提取:



    <%Set conn= Server.CreateObject("ADODB.Connection")connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("db2.md...

    作者:asdasdasd03-30
  • 雷客图ASP站长安全助手的ASP木马查找功能

    可以在线查找空间里的asp木马复制代码 代码如下:<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% '设置密码 PASSWORD = "jb51net" dim Report if request.QueryString("act")="login" then if ...

    作者:asdasdasd03-30
  • ASP类的写法

    <% Class myClassName Private int_ID '分类id '类初始化 Private Sub Class_Initialize() m_strError = "" End Sub '类释放 Private Sub Class_Terminate() m_strError = "" End Sub '-----读写...

    作者:asdasdasd03-30
  • 超精华的asp代码大全第1/2页

    显示页面加载时间 重复域中的斑马线 显示字符串前20个字符并在结尾处添加“……” 如果动态图片为空,使用默认图片代替 如果数据为空,使用默认提示信息代替 ●显示页面加载时间 页面顶部添...

    作者:asdasdasd03-30
  • 从文本文件中读取信息并存储入数据库

    <% dim fso,f1 Const ForReading = 1 set fso=createobject("Scripting.FileSystemObject") ''使用fso对象读取信息。 set f1=fso.OpenTextFile("E:doitinfo2.txt", ForReading) ''打开要读取...

    作者:asdasdasd03-30