为google量身定做的sitemap生成代码asp版

2017年02月06日 59 阅读

外面很多所谓sitemap生成代码都只生成目录文件地址,没生成动态的,我后来自己写了这个,是支持动态的,例子: 如你是文章网站,文章有2000条,那你修改下对应你的文章数据表,即可生成除了所有目录文件外,还生成你的动态2000条地址,绝对的没话说,生成速度非常快 把下面代码保存为sitemap.asp文件,修改我已注明的几个地方,其他的一概不要修改,好不好用过才知道。复制代码 代码如下:<！--#include file="conn.asp"--&g...

适合所有网站的rss和xml聚合功能asp代码

2017年02月06日 64 阅读

rss.asp格式的 下面代码保存为rss.asp 复制代码 代码如下:<！--#include file="conn.asp"--> <% strURL = "http://" & request.servervariables（"server_name"） & _ left（request.servervariables（"script_name"）,len（request.servervariables（"SCRIPT_NAME"）...

ASP MSSQL存储过程的实现小例

2017年02月06日 57 阅读

sql复制代码 代码如下:CREATE PROCEDURE Proname //使用CREATE PROCEDURE 创建存储过程 Proname为存储过程名称 @Lname VARCHAR（30） //定义传入的参数 AS SET NOCOUNT ON BEGIN SELECT * FROM TableName WHERE Lname like "%"+@Lname+"%" //使用SELECE模糊查询Lname值与传入参数Lname的值相近所有行 EN...

动网论坛的asp 数据库连接代码

2017年02月06日 57 阅读

复制代码 代码如下:<%@LANGUAGE="VBSCRIPT"%> <% option explicit dim startime,endtime,conn,strCon,db startime=timer（） Dim strSQLServerName Dim strSQLDBUserName Dim strSQLDBPassword Dim strSQLDBName "请填写数据库具体参数 "---------------------...

ASP+MSSQL2000 数据库被批量注入后的解决方法第1/2页

2017年02月06日 60 阅读

mssql的每个varchar、text字段都被自动插入一段js代码，即使删除这段代码，如果没有从源头上解决，几分钟后，js代码就又会自动插入数据库。 经过飘易的观察，这很有可能是程序自动执行的，黑客先从搜索引擎google、百度等搜索存在漏洞的采用asp+mssql设计的网站，然后采用小明子这样的注入扫描工具，扫描整个网站，一旦发现有sql注入的漏洞或者上传漏洞，黑客就通过各种手段，上传自己的大马，如海阳木马；然后，黑客就把这个网站纳入他的肉鸡列表，随时...

asp 去掉html中的table正则代码函数

2017年02月06日 56 阅读

"去掉html中的table代码 Function OutTable（str） dim a,re set re=new RegExp re.pattern="<[^>]+（）>" re.global=true a=str OutTable=re.replace（a,""） End Function ...

asp 过滤非法字符函数

2017年02月06日 52 阅读

<% Function cutbadchar（str） badstr="不|文|明|字|符|列|表|格|式" badword=split（badstr,"|"） For i=0 to Ubound（badword） If instr（str,badword（i）） > 0 then str=Replace（str,badword（i）,"***"） End If Next cutbadchar=str End Function Response...

asp检测是否为中文字符函数

2017年02月06日 56 阅读

<% "****************************** "函数：CheckChinese（strng） "参数：strng,待验证字符 "描述：检测是否为中文字符，返回值：中文为true，否则false "示例：<%=CheckChinese（strng）%> "****************************** Function CheckChinese（strng） CheckChinese = true Di...

ASP 包含文件中的路径问题和使用单一数据库连接文件的解决方案

2017年02月06日 56 阅读

啥都不说了，直接奉献原代码 复制代码 代码如下:"==========注意=============================================== " 1、网站所在文件夹的名字不能为“root” " 2、网站所在文件夹的名字，物理路径中不允许出现重复此文件夹名，如F: ,t为网站所在文件夹名，这种情况会出错 "============================================================= ...

asp HTTP 500错误 常见问题分析

2017年02月06日 57 阅读

首先你要确定错误的原因： 让IE显示详细的出错信息： 菜单--工具--Internet选项--高级--显示友好的HTTP错误信息，去掉这个选择吧，对帮助你确定错误所在非常有帮助！ 造成500错误常见原因有：ASP语法出错、ACCESS数据库连接语句出错、文件引用与包含路径出错、使用了服务器不支持的组件如FSO等。注意数据库的 一些释放操作，是不是使用了set rs=nothing 而不是rs=nothing之类的问题...

asp 关键词高亮显示（不区分大小写）

2017年02月06日 65 阅读

在这种配置下我们要实现关键词不区分大小写搜索并高亮显示要借助ASP的正则处理了，请看下面代码：复制代码 代码如下:<% Function Takeout（patrn,string1,colors） "提取搜索关键字匹配文字 Dim regEx, Match, Matches, tt " 建立变量。 Set regEx = New RegExp " 建立正则表达式。 regEx.Pattern = patrn " 设置模式。 regEx.IgnoreC...

一段ASP的HTTP_REFERER判断代码

2017年02月06日 55 阅读

只要不是HTTP_REFERER来源于（google.com google.cn *.google.com *.google.cn baidu.com *.baidu.com）这些网址来源的请求，就通通转发至404复制代码 代码如下:<% Dim a, reg a = Request.ServerVariables（"HTTP_REFERER"）.Item Set reg = New RegExp reg.Pattern = "^http://（？:...

asp datediff 时间相减

2017年02月06日 59 阅读

asp时间加减运算 和转换问题 a=2007-07-24 2:23:15 b=2005-06-25 2:23:15 问题1 如何将a转换成2007-07-24要日期格式不要字符格式！ 问题2 如何将a转换成2007要日期格式不要字符格式！ 问题3 如何将a转换成2：23：15要日期格式不要字符格式！ 问题4 a-b为什么回出现一答对数字！为什么不是时间？怎么让他结果是时间 答案 问题1: FormatDateTime（a, 2） 问题2: Year（a） ...

asp下去除超链接的函数

2017年02月06日 54 阅读

复制代码 代码如下:<% Function ReplaceUrl2（HTMLstr） Dim n,str1,str2,str3,str4 HTMLstr = Lcase（HTMLstr） For n=1 to Ubound（Split（HTMLstr,"<a"）） str1 = Instr（HTMLstr,"<a"） str2 = Instr（str1,HTMLstr,">"） HTMLstr = left（HTMLstr,str1...

ASP 根据用户权限判断显示的列标题

2017年02月06日 56 阅读

<table border="1" cellpadding="0" cellspacing="0" style="border-collapse:collapse" bordercolor="#6699CC" width="700" align="center"> <tr> <td height="25" background="images/b2.gif" class="td1"> <div align="cen...

asp连接mssql2005的代码

2017年02月06日 53 阅读

复制代码 代码如下:<% dim objconn,connstr Set objconn = Server.CreateObject（"ADODB.Connection"） connstr = "Provider=SQLNCLI;Server=（local）;Database=sosuo8.comdatabase;Uid=sa;Pwd=123;" objconn.Open connstr %> ...

asp access数据库并生成XML文件范例

2017年02月06日 57 阅读

首先来看，ASP读取ACCESS数据库。复制代码 代码如下:<% @language="VBScript" @codepage="65001"%> <% "开启显式变量声明 Option Explicit "设置输出类型 Response.contentType="text/xml" "定义三个变量，conn（Connection对象）、connstr（ConnectionString）、sql（一个SQL语句） dim conn,con...

防止网站被采集的理论分析以及十条方法对策第1/2页

2017年02月06日 55 阅读

相同点： a. 两者都需要直接抓取到网页源码才能有效工作， b. 两者单位时间内会多次大量抓取被访问的网站内容; c. 宏观上来讲两者IP都会变动; d. 两者多没耐心的去破解你对网页的一些加密（验证），比如网页内容通过js文件加密，比如需要输入验证码才能浏览内容，比如需要登录才能访问内容等。 不同点：搜索引擎爬虫先忽略整个网页源码脚本和样式以及html标签代码，然后对剩下的文字部分进行切词语法句法分析等一系列的复杂处理。而采集器一般是通过 html标签特...

Asp 操作Access数据库时出现死锁.ldb的解决方法

2017年02月06日 57 阅读

于是我登陆主机的管理面板，重启了网站服务，ldb文件就消失了，网站打开也正常了，但过了数小时后，网站又再次出现以上情况，此种情况持续了好一段时间，网站后来被虚拟主机的供应商屏蔽了，反馈给我的说法是因为我的网站运行时大量占用CPU资源，所以予暂时屏蔽，让我对网站程序或数据库进行优化。 在百度上搜索了一下这方面的情况，结果也不少，总结下来主要都是因为对数据库存取完后，没有及时释放记录集和断开数据库连接，以下谈谈操作Access数据库的标准方法: 1、数据库连接...

asp 批量删除选中的多条记录

2017年02月06日 94 阅读

好多网友问起来，·深度学习网址导航·深度学习整站系统 的后台管理能否增加批量删除功能，如何加：就是列出N篇文章或网址信息，每篇文章或网址前有一个复选框，页面最底下有一个按钮“删除”，多选文章或点击删除，选中的文章或网址实现全部删除。。。 这个功能实现起来并不是很难，只是一直没静心弄，今天有空将深度学习网址导航的后台 “网站管理 ”增加了批量删除，捎带将整个操作简单记录如下（具体实例可参照深度学习网址导航后台管理）：1、首先在管理页多条对应记录 的处，添加 ...