搜索列表
-
杰奇登录后的东西都是在session里面的
【整站程序】主要是方便自己写的php页面里,调用登录后的信息
杰奇session -
杰奇jieqi用户评论vip图标显示效果代码 原创
【整站程序】主要用户突出显示vip用户的回复,让vip用户更具优势的回复,适合原创类网站增加此功能
杰奇vip图标 -
用asp+xmlhttp编写web采集程序
【ASP编程】web采集程序?网页抓取程序?小倫程序?不管怎么叫,这种程序应用倒是蛮广的。本文不讨论这种使用这种程序引起的版权或道德问题,只谈这种程序在ASP+VBScript环境下的实现 :-) 预备知识:除了一般的ASP+VBScript的知识外,你还需要了解xmlhttp对象和正则表达式对象。xmlhttp对象是时下风头正劲的Ajax的主...
用asp+xmlhttp编写web采集程序 -
图片自动播放器脚本之家修正
【网页播放器】图片自动播放器修正,可以兼容ff,发现些小问题,希望大家多多讨论,使用方法呢复制代码 代码如下:ImgName=new ImgArray(3); ImgName[0]="4.jpg"; ImgName[1]="1.jpg"; ImgName[2]="2.jpg"; ImgName[3]="3.jpg";只需修改上面的地方即可,加了图片预载,转载请写明出处,剩下的大家...
图片自动播放器脚本之家修正 -
google sitemap.asp
【ASP编程】用于生成sitemap.xml文件的东西,利于google等搜索引擎的抓取。复制代码 代码如下:<% Server.ScriptTimeout=50000 ' sitemap_gen.asp ' A simple script to automatically produce sitemaps for a webserver, in the G...
googlesitemap.asp -
asp最常用的分页函数
【ASP编程】复制代码 代码如下: rs.open sql,conn,1,1 if rs.eof and rs.bof then response.write "<p align='center'>还没找到文章</p>" else &nb...
asp最常用的分页函数 -
ASP用JMail、CDO发送邮件
【ASP编程】前一段时间有发过一个简单的JMAIL邮件发邮件的代码,今天就把这个代码做一个具体的注解,并增加了另外两个格式的代码,并举几个简单的例子: 首先是jmail.smtpmail的核心代码: 程序代码 <% Set jmail = Server.CreateObject("JMAIL.SMTPMail")  ...
ASP用JMail、CDO发送邮件 -
UBB代码在论坛中的应用
【正则表达式】一、读者指引 读者指引帮助你掌握本文的梗概。以免你看了大半才明白这编文章不适合你,给你造成视觉污染。 如果你正在用ASP写程序,或者你正在写一些诸如BBS、留言溥或表单数据检查之类的东东那就值得一看。 如果你对正则表达式已经了如指掌,那么你不必一行行的看,只要看看我写的模板,再比较一下,取其精华...
UBB代码在论坛中的应用 -
统计在线人数 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 -
正则表达式在UBB论坛中的应用
【正则表达式】一、读者指引 读者指引帮助你掌握本文的梗概。以免你看了大半才明白这编文章不适合你,给你造成视觉污染。 如果你正在用ASP写程序,或者你正在写一些诸如BBS、留言溥或表单数据检查之类的东东那就值得一看。 如果你对正则表达式已经了如指掌,那么你不必一行行的看,只要看看我写的模板,再比较一下,取其精华...
正则表达式在UBB论坛中的应用 -
截取实际长度字符串,并用空格替换
【ASP编程】function cutstr(thestr,strlen)dim l,t,cl=len(thestr)t=0for dxy=1 to lc=Abs(asc(Mid(thestr,dxy,1)))if c>255 thent=t+2elset=t+1end ifif t>=strlen thenthev=left(thestr,dxy)exit forelsebu=strlen-tfor bui=1 to bustrbu=" "strbuall=strbuall&strbunextthev=thestr&strbuallstrbu="...
截取实际长度字符串,并用空格替换 -
asp截取字符串的两种应用 原创
【ASP编程】1、纯粹的截取字符串复制代码 代码如下:function cutstr(thestr1,strlen) dim l,t,c l=len(thestr1) if l<1 then exit function t=0 for dxy1=1 to l c=Abs(asc(Mid(thestr1,dxy1,1))) if c>255 then t=t+2 else t=t+1 end if if t&...
aspsubstr