-
ASP 自动采集达成代码
所属栏目:[Asp教程] 日期:2023-05-15 热度:6384
其主要的优点便是无需再手工添加大量的信息了,可以指定对某一个站信息的截取进行批量录入,达到省时省力的目的。与其单纯的ASP小偷程序不同的是:它已经不再依赖其目标网站。参考代码:代码如下:<%'声明取得目标[详细]
-
asp是的日期转变为星座的函数
所属栏目:[Asp教程] 日期:2023-05-15 热度:1761
asp是的日期转变为星座的函数:代码如下:function astro(birth)astro=""if birth="" or not isdate(birth) Then exit functionbirthmonth=month(birth) : if birthmonth<10 then birthmonth="0" & birthmonthbirthda[详细]
-
64位win7的IIS7下asp与access的连接难题
所属栏目:[Asp教程] 日期:2023-05-15 热度:3171
最近升级了电脑主机,淘宝买的,卖家把我装好了64位的win7和一些基本程序。自己有个小程序是asp的,要让它运行起来,于是装上IIS(之前在添加删除程序里,现在叫 打开或关闭Windows功能 ,找了好一会儿),搭好web后[详细]
-
asp和php页面全方位封杀WVS扫描器的代码
所属栏目:[Asp教程] 日期:2023-05-15 热度:4251
Acunetix Web Vulnerability Scanner 是一款国外产的及其优秀的扫描工具,可以帮忙挖掘网站内的诸多漏洞,包括常见的SQLinjection,XSS(很多自认为牛人的就喜欢用WVS扫站发现XSS就公布说是他发现的...)。既然WVS这[详细]
-
asp下为何韩文字后面显示分号
所属栏目:[Asp教程] 日期:2023-05-15 热度:9011
asp下为何韩文字后面显示分号:代码如下:function HTMLEncode(fString)fString=Replace(fString,";",";")fString=Replace(fString,"<","<")fString=Replace(fString,">",">")fString=Replace(fString,"/",[详细]
-
ASP 高亮显现不区分大小写的关键字
所属栏目:[Asp教程] 日期:2023-05-15 热度:6055
例如:文本abcaBcabCaBCabcaBCa,关键字bc,在不区分大小写的情况,一共有6个匹配项。则在网页中显示的是abcaBcabCaBCabcaBCa。很多人,想到是replace函数。原型为Replace(string,find,replacewith[,start[,count[,c[详细]
-
用asp达成的获取文件夹中文件的个数的代码
所属栏目:[Asp教程] 日期:2023-05-15 热度:3859
用asp达成的获取文件夹中文件的个数的代码:代码如下:'返回指定文件夹中文件的数目,传入值为被检测文件夹的硬盘绝对路径function CountFilesNumber(folderspec)Dim objfso,f,fcSet objfso=CreateObject("Script[详细]
-
ASP 隐蔽下载地址及防盗链代码
所属栏目:[Asp教程] 日期:2023-05-13 热度:2039
ASP 隐蔽下载地址及防盗链代码:代码如下:<% FunctIon DownloadFIle(StrFIle)StrFIlename=StrFIleResponse.Buffer=TrueResponse.ClearSet S=Server.CreateObJect("ADODB.Stream")S.OpenS.Type=1on Error Resume Next[详细]
-
ASP 日期的加减运算达成代码
所属栏目:[Asp教程] 日期:2023-05-13 热度:1394
举个例子来说,要查找出2007-10-12至2007-10-31之间在网站上注册的会员,选择好日期后,点击“查询”按钮,发现2007-10-31注册的会员的信息根本没有显示出来,试验了几次结果都是一样。调试程序发现,原来[详细]
-
asp 判断是不是为搜索引擎蜘蛛的代码
所属栏目:[Asp教程] 日期:2023-05-13 热度:2444
asp 判断是不是为搜索引擎蜘蛛的代码:代码如下:<%function GetBot()'查询蜘蛛dim s_agentGetBot=""s_agent=Request.ServerVariables("HTTP_USER_AGENT") ‘关键判断语句if instr(1,s_agent,"googlebot",1)[详细]
-
ASP XMLDom在服务器端操作XML文件的主要方式和实现
所属栏目:[Asp教程] 日期:2023-05-13 热度:8779
对于小数据量,xml文件在检索更新上于ACCESS有很多优势。我曾经测试过不用数据库,把网站的会员信息,商品数据信息,交易信息,网站定制信息全部存放在三个xml文件中,运行结果十分正常,感觉上比数据库快多了,不过[详细]
-
一段ASP单页显示文件夹下全部图片的代码
所属栏目:[Asp教程] 日期:2023-05-13 热度:8278
一段ASP单页显示文件夹下全部图片的代码:代码如下:<%dim fso,objFolder,objFilesdim filelistSet fso=Server.CreateObject("scripting.FileSystemObject")Set objFolder=fso.GetFolder(server.MapPath("thumbs"))Se[详细]
-
ASP XML运作类代码
所属栏目:[Asp教程] 日期:2023-05-13 热度:6472
ASP XML运作类代码:代码如下:Class XMLClassPrivate objXmlPrivate xmlDocPrivate xmlPath'//============================================================'Sub Class_initializeSet objXml = Server.Cre[详细]
-
Microsoft VBScript 运作时错误
所属栏目:[Asp教程] 日期:2023-05-13 热度:3155
昨天给公司服务器重做了一下系统,遇到Asp附件无法上传,之前服务器上使用好好的,怎么重做了就不正常了,于是一番google,baidu,下面将解决办法送出,帮助碰到该问题的朋友少走弯路: 1,权限问题 请确保您所上传文件的[详细]
-
ASP将Excel数据输入到SQLServer的实现代码
所属栏目:[Asp教程] 日期:2023-05-13 热度:6879
ASP将Excel数据输入到SQLServer的实现代码:代码如下:<form action="insert.asp" method="post" enctype="multipart/form-data" name="form1" onSubmit="b1_onclick()"><table width="500" border="1" align[详细]
-
asp 使用正则表达式替换word中的标签 变成纯文本
所属栏目:[Asp教程] 日期:2023-05-13 热度:3404
公司客户在使用网站后台编辑添加修改内容时,经常是直接从word文档里复制内容到编辑器里后就提交。结果是在内容显示页面上是五花八门的样式,有时也需要部分纯文本内容作为摘录使用,这些都需要清除word格式。改变客[详细]
-
asp获取xml实例代码
所属栏目:[Asp教程] 日期:2023-05-13 热度:3292
asp获取xml实例代码:代码如下:<?xml version="1.0" encoding="gb2312"?><languageRoot><!--简体中文--><language><LanguageName>简体中文</LanguageName><LanguageValue>SimpilifiedChinese</LanguageValue><Langua[详细]
-
ASP 利用jqGrid实现读写删的代码 json
所属栏目:[Asp教程] 日期:2023-05-12 热度:8116
jqGrid是一个优秀的基于jQuery的DataGrid框架,想必大伙儿也不陌生,网上基于ASP的资料很少,我提供一个,数据格式是json的:一个针对jqGrid的json类:这段代码似乎是由官网论坛的一些PHP中转化而来,我们存为json.a[详细]
-
asp随机数 随机产生N位由数字和字母建成的密码
所属栏目:[Asp教程] 日期:2023-05-12 热度:6777
asp随机数 随机产生N位由数字和字母建成的密码:代码如下:<%RandomizeDo While Len(pass)<12 '随机密码位数num1=CStr(Chr((57-48)*rnd+48)) '0~9num2=CStr(Chr((90-65)*rnd+65)) 'A~Znum3=CStr(Chr((122[详细]
-
达成UTF8转换GB2312国标码的asp代码
所属栏目:[Asp教程] 日期:2023-05-12 热度:4184
代码如下:
'个人代码风格注释(变量名中第一个小写字母表表示变量类型)
'i:为Integer型;
's:为String;
Function U2UTF8(Byval a_iNum)
Dim sResult,sUTF8
Dim iTemp,iHexNum,i
iHexNum = Trim[详细] -
asp+ajax仿google搜索提醒效果代码
所属栏目:[Asp教程] 日期:2023-05-12 热度:3504
对于更完整的代码可以参考,这个是支持数据库的版本。经过错新站长站编辑测试。Asp+Ajax仿google搜索提示效果 数据库版需要修改的地方有代码如下:javascript.jsvar url="ajax.asp"; //后台地址var time_delayajax=30[详细]
-
asp动态页面防采集的新方式
所属栏目:[Asp教程] 日期:2023-05-12 热度:5549
昨天在网上看到一个防采集软件,说采集只访问当前网页,不会访问网页的图片、JS等,今天突然想到,通过动态程序和Js访问分别记录访问者的IP,然后进行IP判断,由于采集过程不会访问JS,采集的时候只会查到用动态程序[详细]
-
aspJpeg图片水印有杂点的完美解决办法
所属栏目:[Asp教程] 日期:2023-05-12 热度:9021
操作实现函数:代码如下:Function AddWater(n)Set Photo = Server.CreateObject("Persits.Jpeg")PhotoPath = Server.MapPath(n)Photo.Open PhotoPathPhoto.Interpolation=1Photo.Quality=100iWidth=Photo.OriginalWi[详细]
-
asp textarea 多行数组分割处置方法
所属栏目:[Asp教程] 日期:2023-05-12 热度:3994
所以对应的asp处理代码如下:代码如下:dedearr=split(xiangguanid2,chr(13)) '分割成数组for dede=0 to ubound(dedearr)-1 '数组长度减一,因为最后有两个chr(13)换行。dedearr2=split(dedearr(dede),"|")ded[详细]
-
asp图片加水印的性能代码
所属栏目:[Asp教程] 日期:2023-05-12 热度:39
asp图片加水印的性能代码:代码如下:'文字水印Function WordWatermark(ImagePath)Dim ImageSet Image= Server.CreateObject("Persits.Jpeg") ' 建立对象Image.Open server.mappath(ImagePath) ' 图片所在[详细]