May 18
这里是获得了好友列表,然后给这些好友发一个上线的通知,如果你不想每次提醒的时飞信上的好友都看到你上线,那么就去掉这些,也会加快发送短信的速度。更进一步的优化,你可以去掉TCP通信的相关代码 [ 阅读全文:菜鸟者资讯 ]
May 18

 最近发现一个神奇的PHP的preg_match_all编写代码时的错误代码如下preg_match_all('/<img.*src=(.*)\\s*.*>/iU',$content,$src);$content为一串html,其中包含img tag,目的是想取得这串html中所有img的路径,也就是src值,并放到$src中。理论上,上面这个代码没有任何问题,但实际上,它

[ 阅读全文:菜鸟者资讯 ]
May 18
一同学说DBF连接路径有问题,由于对DBF了解很少,仅限于VF开发的时候知道那么一点点基础知识,本地测试、远程测试的确发现数据库路径判断有问题,一通MSDN,百度,谷歌,均为发现更多关于ASP+ADO操作DBF的太多资料,索性尝试从文件权限去解决问题,简单处理,还真是目录权限不足,唉,郁闷,本需要花太多时间的~~ [ 阅读全文:菜鸟者资讯 ]
May 18

调用: 程序代码<%On Error Resume NextDim rSet r = New Rarr.Add Server.MapPath("a.gIf")r.Add Server.MapPath("a.txt")r.Add Server.MapPath("test")r.Add Server.MapPath("file.asp")r.packname = Server.MapPath("xxx.dat")r.Packr.rootpath = Server.MapPath("xxx")r.packname = Server.MapPath("xxx.dat")r.UnPackRe

[ 阅读全文:菜鸟者资讯 ]
May 18
程序代码<%'*******************************************************************'使用说明'Dim a'Set a=new CreateExcel'a.SavePath="x" '保存路径'a.SheetName="工作簿名称"'多个工作表 a.SheetName=array("工作簿名称一","工作簿名称二")'a.SheetTitle="表名称"'可以为空多个工作表 a.SheetName=array("表名称一","表 [ 阅读全文:菜鸟者资讯 ]
Apr 15

<%Function IPFilter(iplist, uip)Dim regEx, retVal,patrn,ipArripArr=split(iplist,"|")for i=0 to ubound(ipArr)  patrn=replace(ipArr(i),"*","\d{1,3}") &nbs

[ 阅读全文:菜鸟者资讯 ]
Apr 15

把下面代码保存为Asp_XML.asp运行即可测试效果  程序代码<% 'By Dicky 2005-03-22 21:52:18 AM QQ:25941 E-mail:AppleBBS@GMail.Com Const IsSql = 1    '定义数据库类型为SQL Server Call OpenConn(Conn) '打开数

[ 阅读全文:菜鸟者资讯 ]
Apr 15

计算闰年主要是为了判断2月份的天数,一般闰年2月份是29天,平年2月份是28天。计算闰年的算法非常简单,即:能被400整除,或者能被4整除而不能被100整除。算法如下:  程序代码<%function isLeapYear(pYear)    set oreg=new RegExp    or

[ 阅读全文:菜鸟者资讯 ]
Apr 15

假设为myfunc.asp   程序代码<% ''正则表表达式验证函数 patrn-正则表达式 strng-需要验证的字符串 Function RegExpTest(patrn, strng) Dim regEx, retVal '' 建立变量。 Set regEx = New RegExp '' 建立正则表达式。 regEx.Pattern = patrn '' 设置模

[ 阅读全文:菜鸟者资讯 ]
Apr 15

<%'//==================================文件操作================================== '取文件大小 Function GetFileSize(FileName) '//功能:取文件大小 '//形参:文件名 '//返回值:成功为文件大小,失败为-1 '// Dim f If ReportFileStatus(FileName

[ 阅读全文:菜鸟者资讯 ]
Apr 15

本来生成这个xml文档是为了开发一个ftp的搜索,后来由于没有资料参考怎么搜索xml文档,也就放弃了.其中最重要的是递归的算法.生成文件列表的速度很快.这个程序可以用于生成播放列表之类的东东.需要IIS的FSO组件支持.生成类似下面的XML文档   程序代码<?xml version="1.0" encoding="gb2312"?

[ 阅读全文:菜鸟者资讯 ]
Apr 15

Class 声明 声明一个类的名字,就是定义一些变量,属性,方法来组成一个类 这是真的!!!?VBScript中能用类!?!?不知道能不能用于ASP!?这样的话,我就不是能写出像object一样的ASP程序?!说干就干!实践是检验真理的唯一标准,自个动手吧! 我们常常看到别的程序语言中中都有类的说明,PHP,VB,C++,这个在VBScript中的类的说明,我是第一次听到,我们的日常工作就是网站开

[ 阅读全文:菜鸟者资讯 ]