[code]<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"><html><head><title>code collection v0.44</title><meta http-equiv="Content-Type" content="text/html; charset=GB2312"><HTA:APPLICATION ...
http://www.jb51.net//article/1434.htm
[code]<%Public Function UbbCode(strContent) Dim re Set re = New RegExp re.IgnoreCase = True &n...
http://www.jb51.net//article/1389.htm
前言：1、上几次讨论右键禁止等问题的时候，有网友问那里有键值表，我今天写了一个javascript，以飨各位有需要者。2、适用于ns浏览器和ie浏览器。 3、代码行。[code]<html><!--//this code by hongseheike--><head><script language="javascript"> ns4 = (document.layers) ? true : false; ...
http://www.jb51.net//article/848.htm
[code]’//转换中文为unicodefunction URLEncoding(vstrIn) dim i dim strReturn,ThisChr,innerCode,Hight8,Low8 strReturn = "" for i = 1 to Len(vstrIn) &...
http://www.jb51.net//article/750.htm
URL编码是指为了将信息通过URL进行传输，所以必须将某些含有特殊意义的字符进行替换的一种编码方式，在asp中我们都知道有一个Server.URLEncode的函数可以完成这个功能。即： 如果有空格就用%20代替，如果有其它字符就用%ASCII代替，如果有汉字等四个字节的字符，就用两个%ASCII来代替。不过有时候我们也需要将经过这种编码的字符串进行解码，但asp并没有提供相关的函数，这给我们处理问题带来了一定的麻烦。其实我们只要知道了编码规则后，就可以用asp代码来实现我们自己的URlDecode函数了。具体实现如下： [code]functi...
http://www.jb51.net//article/731.htm
[code]<%'===========PBlog2UBB代码转换代码==========' Author:PuterJam' CopryrightPBlog2' Update:2005-12-29'===========================================FunctionUBBCode(ByValstrContent...
http://www.jb51.net//article/513.htm
界面如下图：把源代码存为(hta)文件，因为hta文件没有状态栏，所以我这里建议大家存为html文件，这样可以在状态栏下看到NCC扫描的进度，我这里把NCC的maxloop设置为3000，所以文件统计到3000的时候，会自动终止，以防文件夹中文件太多造成运行的负担。如果大家喜欢这样的代码，就请关注"Never Modules"主要功能有-1。可自己选择文件夹，或者单个文件。2。自己选择文件后缀名进行统计3。output information输出的数据有：文件个数，文件的代码字节数，单词个数，代码行数，总代码字节数总代码行数。4。可以把代码统计结果用SaveAs存为html...
http://www.jb51.net//article/358.htm
<%functionChkBadWords(fString) ifnot(isnull(BadWords)orisnull(fString))then bwords=split(BadWords,"|") fori=0toubound(bwords) fString=Replace(fString,bwords(i),string(len(bwords(i)),"*")) ...
http://www.jb51.net//article/41.htm