搜索列表
-
ASP实现GB2312字符与区位码的相互转换的代码
【ASP编程】研究编码,得知GB2312编码与区位码的关系,尝试之后,得此程序。 搜索,似乎没人写,故发此地。 原创首发: http://bbs.blueidea.com http://mytju.com/classcode/ 任意转载,任意使用。 1.简述 (1)GB2312标准的定义,其实就是区位码。 共94行,94列,行就是区号,列就是位号。 如“啊”字区号为16,位号为01,它的区位...
ASP实现GB2312字符与区位码的相互转换的代码 -
动网防恶意广告比较有效的办法附asp代码
【ASP编程】1. 进入后台,风格界面模板总管理,page_login,template.html(13) <TR> <TD class=tablebody1><B>密码问题</B>:<BR>忘记密码的提示问题</TD> 在此两句上面添加如下代码 <TR> <TD class=tablebody1>...
动网防恶意广告比较有效的办法附asp代码 -
解决使用良精企业建站7.0未注册问题
【ASP编程】前些日子改一个后台,是良精的系统,挺好的系统,就是良精太变态了,也难怪人家是要赚钱的,都公开了,那就白白开发了,更何况ASP加密技术又不是很多,除非封装,但封装给自己也带来不便,所以良精使用了很多让人想不到的办法,前面我也写过几篇,大家可以看看有没有需要的。这次用的是 7.0的版本,好像也不是最新的,...
解决使用良精企业建站7.0未注册问题 -
把RS.GetRows看得更清楚
【ASP编程】用过Rs.GetRow的兄弟都知道Rs.GetRow可以更有效率地获取小容量数据(不适合大容量数据,尤其涉及大对象的时候,容易暴掉,我就爆过一次),PuterJam应用得不错的说。 但是Rs.GetRow返回的是一个二维数组,我们经常不知道哪段对哪段。这个很麻烦,于是编了一小段程序方便调试用: D...
把RS.GetRows看得更清楚 -
错误类型:Provider (0x80004005)未指定的错误 的一个处理方法
【ASP编程】一般情况下asp可以正常运行,但只要连接数据库就提示,Microsoft JET Database Engine 错误'80004005'
错误类型Provider -
VBscript 的正则表达式 字符串匹配
【正则表达式】由于我对正则不是很清楚,我想求取把字符串 “str, DGK, rDJK, DJKl,DGK , end” 替换为 “str, MSN, rDJK, DJKl,MSN , end” 求匹配式的写法。 [Ctrl+A 全选 注:引入外部Js需再刷新一下页面才...
VBscript的正则表达式字符串匹配 -
在Z-BLOG可用的新版ASP的GIF验证码[V70404]
【ASP编程】复制下面代码,存为c_validcode.asp上传到function下就可以了复制代码 代码如下:<%@ CODEPAGE=65001 %> <% '/////////////////////////////////////////////////////////////////////////////// '// ...
在Z-BLOG可用的新版ASP的GIF验证码[V70404] -
反SPAM新思路—换Z-BLOG的验证码!
【ASP编程】最近我们一些Z-BLOGGER都在想做个什么插件拦住SPAM,当然解决方法也不是没有,就是弄个超强的服务器,可惜搞不起。那……我们只好从SPAMMER的角度来想了。 懂一些的人可能知道,SPAM软件的基本原理是[搜索目标]-进入网站-扫描验证码-OCR-[填写表单]-POST。每一步我们都可以加以防范,比较现实...
反SPAM新思路—换Z-BLOG的验证码! -
Asp中随机产生用户密码的代码
【ASP编程】随机产生用户密码(good),说明:通过随机产生密码,然后将密码EMail给注册用户,你可以确认用户的EMail填写是否正确。 说明:通过随机产生密码,然后将密码EMail给注册用户,你可以确认用户的EMail填写是否正确。自动产生的密码往往安全性更高,同时,你可以过滤那些无效的用户。 把下面...
Asp中随机产生用户密码的代码 -
vbs:把一段文字中指定字符颜色变成红色的正则
【正则表达式】vbs:把一段文字中指定字符颜色变成红色的正则 function c(Tstr,Word) Dim re Set re = new RegExp re.IgnoreCase =True re.Global=True re.pattern = "("&Word&")" ...
vbs:把一段文字中指定字符颜色变成红色的正则 -
vbs:能算出一个字符在一字段里共出现有几次的函数
【正则表达式】Function RegExpTest(patrn, strng) Dim regEx, Matches Set regEx = New RegExp regEx.Pattern = patrn regEx.IgnoreCase = True ‘为真则忽略大小写,否则严格匹配大小写 regEx.Glo...
vbs:能算出一个字符在一字段里共出现有几次的函数 -
正则表达式简单的检查输入email是否合法程序
【正则表达式】function chkEmail(email) on error resume next dim i,l,pos1,pos2 chkEmail=true if isnull(email) then chkEmail=false:exit function pos1= instr(email,"@") pos2=instrRev(email,".") if not(pos1>0) or not&n...
正则表达式简单的检查输入email是否合法程序