10 2008 档案

什么是类，一个最最简单的类
摘要：class Myobj public sub Link() response.Write"cxcxcx" end sub end class dim obj set obj=new Myobj obj.Link() set obj=nothing 阅读全文
posted @ 2008-10-27 22:36 missthe 阅读(241) 评论(0) 推荐(0)
汉字转换成拼音的代码(asp版)
摘要：第一步： 第二步： 源文件下载：http://files.cnblogs.com/missthe/change.rar 阅读全文
posted @ 2008-10-24 16:07 missthe 阅读(213) 评论(0) 推荐(0)
获取当前浏览器地址的函数
摘要：Function GetLocationURL() Dim Url Dim ServerPort,ServerName,ScriptName,QueryString ServerName = Request.ServerVariables("SERVER_NAME") ServerPort = Request.ServerVariables("SERVER_PORT") ScriptNa... 阅读全文
posted @ 2008-10-24 15:56 missthe 阅读(323) 评论(0) 推荐(0)
过滤超链接的正则表达式函数
摘要：Function regExReplace(sSource, replStr) //(替换字符集，代替值) Dim regEx, str1 str1 = sSource Set regEx = New RegExp regEx.Pattern = "|" regEx.IgnoreCase = True regEx.Global = True regExReplace = regEx.R... 阅读全文
posted @ 2008-10-24 15:52 missthe 阅读(1163) 评论(0) 推荐(0)
一个简单好用的UBB编辑器
摘要：调用范例： 编辑器源代码下载：http://files.cnblogs.com/missthe/HtmlEditor.rar 阅读全文
posted @ 2008-10-24 15:30 missthe 阅读(470) 评论(0) 推荐(0)
SQL语句：那样写还不如这样写
摘要：那样写： set rs=conn.execute("select * from Books") while not rs.eof rs2=conn.execute("select * from Authrs where AuthorID="&rs("AuthorID")) Response.write rs("Title")&">>"&rs2("Name") rs.movenext() ... 阅读全文
posted @ 2008-10-24 14:19 missthe 阅读(185) 评论(0) 推荐(0)
判断远程图片是否存在的ASP技巧
摘要：函数： Function CheckURL(byval A_strUrl) set XMLHTTP = Server.CreateObject("Microsoft.XMLHTTP") XMLHTTP.open "HEAD",A_strUrl,false XMLHTTP.send() CheckURL=(XMLHTTP.status=200) set XMLHTTP = nothing End f... 阅读全文
posted @ 2008-10-24 13:34 missthe 阅读(342) 评论(0) 推荐(0)
使用Response.IsClientConnected
摘要：在费时操作前使用Response.IsClientConnected属性 使用Response.IsClientConnected是观察用户是否仍连到服务器并正在载入ASP创建的网页的有用方式。如果用户断开连接或停止下载，我们就不用再浪费服务器的资源创建网页，因为缓冲区内容将被IIS丢弃。所以，对那些需要大量时间计算或资源使用较多的网页来说，值得在每一阶段都检查游览者是否已离线： 以下为引用的... 阅读全文
posted @ 2008-10-24 11:03 missthe 阅读(899) 评论(0) 推荐(0)
框架内页面如何让父页刷新。
摘要：我们经常要在某一页面嵌入iframe页面。然后在运行iframe页面后让程序自动刷新父页面，以便运行结果及时显示在父页上。 JS代码即为： window.paren.location.reload(); 阅读全文
posted @ 2008-10-10 15:29 missthe 阅读(383) 评论(0) 推荐(0)
将A表中的所有数据复制到B表(A表与B表字段不一定要一致)
摘要：通过以下例子说明： insert B(a,b,c,d,e) select aa,bb,cc,dd,ee from A 阅读全文
posted @ 2008-10-06 20:51 missthe 阅读(462) 评论(0) 推荐(0)
查询数据库某字段的相同记录
摘要：假设表名：e_custom 相同记录的字段：usn select * from e_custom where usn in (select usn from e_custom group by usn having count(*)>1) 阅读全文
posted @ 2008-10-06 20:48 missthe 阅读(379) 评论(0) 推荐(0)