1、纯粹的截取字符串 [复制此代码]CODE: function cutstr(thestr1,strlen) dim l,t,c l=len(thestr1) if l1 then exit function t=0 for dxy1=1 to l c=Abs(asc(Mid(thestr1,dxy1,1))) if c255 ...【
查阅全文】
function zhuan(m) '翻译数据 for i=0 to 12 p=m mod 2 if p=1 then have=havei, end if m=int(m/2) if m=0 then zhuan=have exit function end if next end function【
查阅全文】
文章有两文件组成,test.asp 测试演示文件;clsrsa.asp 实现rsa加密与解密的vbs类文件 下面是代码: 1. test.asp % rem 文章标题:在asp中通过vbs类实现rsa加密与解密 % %Option Explicit% !-...【
查阅全文】
*************测字符串长度************** Function CheckStringLength(txt) txt=trim(txt) x = len(txt) y = 0 for ii = 1 to x if asc(mid(txt,ii,1)) 0 or asc(mid(txt,ii,1)) 2...【
查阅全文】
一、使用OWC 什么是OWC? OWC是Office Web Compent的缩写,即Microsoft的Office Web组件,它为在Web中绘制图形提供了灵活的同时也是最基本的机制。在一个intranet环境中,如果可以假设客...【
查阅全文】
今天在做一个小东西,突然发现一个asp的问题,就是在使用request.querystring(str)的时候,如果str中包含特殊的字符(eg.'+')的时候,使用request.querystring(str)接受到的数据中,就完全没有...【
查阅全文】
***************************************************************** ' function ' 作用 :利用流保存文件 ' 参数 :from(远程文件地址),tofile(保存文件位置) '************************...【
查阅全文】
% #######以下是一个类文件,下面的注解是调用类的方法################################################ #注意:如果系统不支持建立Scripting.FileSystemObject对象,那么数据库压缩功能将...【
查阅全文】
asp生成静态页主要涉及三个方面:模板,参数,fso. 1,模板:这个其实就是页面的框架,以下为模板的例子: ###############################这就是一个模板############################### !DOCTYPE h...【
查阅全文】
如何让图片自动缩放以适合界面大小,拿出你的Editplus,打开c_function.asp文件,找到UBBCode函数 If Instr(strType,[image])0 And ZC_UBB_IMAGE_ENABLE Then '[img] objRegExp.Pattern=(\[IMG=...【
查阅全文】