搜索列表
-
无组件生成缩略图
【ASP编程】网上有不少生成缩略图的ASP组件。若你的虚拟空间不支持注册新组件，可能会感觉自己的网站失色不少。心晴不才，结合网上资源写了个无组件生成缩略图程序，仅供参考。 还是先看看基础部分吧。首先，我们知道在页面中显示图片是如下代码： <img src="pic.gif" border="0" width="300" height="26...
无组件生成缩略图 -
获取图片宽度和高度的类，支持JPG，GIF，PNG，BMP
【ASP编程】<% Class ImgWHInfo ''获取图片宽度和高度的类，支持JPG，GIF，PNG，BMP Dim ASO Private Sub Class_Initialize Set ASO=Server.CreateObject("ADODB.Stream") ASO.Mode=3 ASO.Type=1 ASO.Open End Sub Private Sub Class_Terminate Err.Clear Set ASO=No...
获取图片宽度和高度的类，支持JPG，GIF，PNG，BMP -
自己做采集程序
【ASP编程】现在网上的采集程序很多，但是有时候你发现一个好的网站，想自己做个采集工具采集一些信息，就需要自己去写程序了，其实这样的采集程序并不难写，主要是去分析源网站的网页结构。首先去下载个XMLHTTP的类文件：<%Class xhttpprivate cset,sUrl,sErrorPrivate Sub Class_Initialize()'cset="UTF-8"cset="G...
自己做采集程序 -
ASP充分利用Err.Description
【ASP编程】我们一般在调试程序的时候，有些操作会莫名地失败，又没有错误消息提示，特别是在执行数据库操作的时候，明明执行过去了，可就是数据库里没有记录变动，很是郁闷！今天刚才在搞FSO删除操作时就出现了这样的问题，后来一把Err.Description放上去，马上提示错误在哪里，所以这东东一定要充分利用！具体使用 On Error...
ASP充分利用Err.Description -
很不错的一个UBB代码
【ASP编程】<%Function HTMLEncode(ByVal strValue) '忽略错误 On Error Resume Next '定义变量 Dim strNewValue If strValue <> "" Then strNewValue = Replace(strValue,"...
很不错的一个UBB代码 -
写了段批量抓取某个列表页的东东
【ASP编程】有些人当抓取程序是个宝，到目前还TND有人在卖钱，强烈BS一下这些家伙 真是的！可能偶下边这段东西比较烂哈 下边这个没有写入库功能，已经到这一步了，入库功能是很简单的事了，需要的请自己去完成吧，其它功能各位自行完善吧！把代码拷贝过去直接运行即可看到效果Dim Url,List_PageCode,Array_ArticleID,i...
写了段批量抓取某个列表页的东东 -
以前写的一个分页存储过程，刚才不小心翻出来的
【ASP编程】CREATE PROCEDURE GoalerPageSp@IntPageSize int,@IntCurrPage int,@strFields nvarchar(2000),@strTable varchar(200),@strWhere varchar(800),@strOrderType varchar(200),@strKeyField varchar(50)ASSET NOCOUN...
以前写的一个分页存储过程，刚才不小心翻出来的 -
XMLHTTP利用POST发送表单时提交中文的问题
【ASP编程】刚才写一个小偷程序，突然发现一旦POST中文时抓取不到内容，考虑到中文编码问题，像javascript中的escape()一样，在vbscript中也可以使用这个函数，只需要这个发送就可以正常抓取到内容了send("A="&escape(A)&""&escape(B))完成收工！附几个小偷常用的function函数Function ByteToStr(vIn)&...
XMLHTTP利用POST发送表单时提交中文的问题 -
用XMLHTTP来偷东西哈！
【ASP编程】只做了一部份，IP查询请大家自己照着我里边的样例自己完成吧！演示：http://www.goalercn.com/demo/searcher.asp<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Trans...
用XMLHTTP来偷东西哈！ -
用ASP开"多线程"
【ASP编程】在网上找到一个用ASP开的假线程,发现和我以前做的一个程序不谋而合,只不过以前用的是VB,摘下来,储备. 1.原理实验 原理当然都一样，利用web服务器支持多线程，在同一页面里向服务器发多个http请求来完成我们的工作。还是先实验一下，在一个页面里同时写2个txt文件，比较写入时间的差异。代码如下： <% startime=tim...
用ASP开"多线程" -
ASP采集入库生成本地文件的几个函数
【ASP编程】'*****************************************************************' function' 作用 ：利用流保存文件' 参数 ：from（远程文件地址），tofile（保存文件位置）'*****************************************************************Private Function SaveFiles(byref from,byref tofile)Dim DatasDatas=GetData(...
ASP采集入库生成本地文件的几个函数 -
使用ASP在IIS创建WEB站点的函数
【ASP编程】程序代码： '=========================================================='函数介绍：创建WebSite'本函数使用ADSI，需要Administrators组用户权限'函数名称：CreateWebSite(Computer,IPAddr,PortNum,HostName,WebSiteDirectory,LogDirectory,WebSiteInfo,GuestUserName,GuestUserPass,Star...
使用ASP在IIS创建WEB站点的函数
