仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 550|回复: 8
打印 上一主题 下一主题

[学习教程] ASP编程:几个ASP好用的自界说函数

[复制链接]
山那边是海 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:46:19 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
问题是他们究竟是喜欢他们是使用软件时,速度快还是速度慢好.(当然在3秒以内).无论是他们输入资料时,查找资料时,分析资料时.函数cLeft(string,length)前往指定命目标从字符串的右边算起的字符,辨别单双字节。
如:
DimMyString,LeftString
MyString="笔墨测试VBSCript"
LeftString=cLeft(MyString,10)
前往"笔墨测试VB"。

MyRandc(n)天生随机字符,n为字符的个数
如:
response.writeMyRandn(10)
输入10个随机字符

MyRandn(n)天生随机数字,n为数字的个数
如:
response.writeMyRandn(10)
输入10个随机数字

formatQueryStr(str)格局化sql中的like字符串.
如:
q=Request("q")
q=formatQueryStr(q)
sql="select*from[table]whereaalike%"&q&"%"
GetRnd(min,max) 前往min-max之间的一个随机数
如:
response.writeGetRnd(100,200)
输入年夜于100到200之间的一个随机数
函数代码:
functioncLeft(str,n)
dimstr1,str2,alln,Islefted
str2=""
alln=0
str1=str
Islefted=false
ifisnull(str)then
cleft=""
exitfunction
endif
fori=1tolen(str1)
nowstr=mid(str1,i,1)
ifasc(nowstr)<0then
alln=alln+2
else
alln=alln+1
endif
if(alln<=n)then
str2=str2&nowstr
else
Islefted=true
exitfor
endif
next
ifIsleftedthen
str2=str2&".."
endif
cleft=str2
endfunction

functionMyRandc(n)天生随机字符,n为字符的个数
dimthechr
thechr=""
fori=1ton
dimzNum,zNum2
Randomize
zNum=cint(25*Rnd)
zNum2=cint(10*Rnd)
ifzNum2mod2=0then
zNum=zNum+97
else
zNum=zNum+65
endif
thechr=thechr&chr(zNum)
next
MyRandc=thechr
endfunction

functionMyRandn(n)天生随机数字,n为数字的个数
dimthechr
thechr=""
fori=1ton
dimzNum,zNum2
Randomize
zNum=cint(9*Rnd)
zNum=zNum+48
thechr=thechr&chr(zNum)
next
MyRandn=thechr
endfunction
functionformatQueryStr(str)格局化sql中的like字符串
dimnstr
nstr=str
nstr=replace(nstr,chr(0),"")
nstr=replace(nstr,"","")
nstr=replace(nstr,"[","[[]")
nstr=replace(nstr,"%","[%]")
formatQueryStr=nstr
endfunction
functionGetRnd(min,max)
Randomize
GetRnd=Int((max-min+1)*Rnd+min)
endfunction
缺点:正版成本价格贵(盗版就不说了)、不够安全,大多数服务器用windows系统,没有linux安全
简单生活 该用户已被删除
沙发
发表于 2015-1-19 23:13:48 | 只看该作者
Session:这个存储跟客户端会话过程的数据,默认20分钟失效
再现理想 该用户已被删除
板凳
发表于 2015-1-25 19:07:43 | 只看该作者
完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。
乐观 该用户已被删除
地板
发表于 2015-2-3 14:43:06 | 只看该作者
最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。
老尸 该用户已被删除
5#
发表于 2015-2-9 03:16:44 | 只看该作者
哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的?
不帅 该用户已被删除
6#
发表于 2015-2-26 19:50:57 | 只看该作者
学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点:
分手快乐 该用户已被删除
7#
发表于 2015-3-16 07:26:39 | 只看该作者
他的语法和设计思路和VB完全相同,导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是,相当多的ASP教程混合了Javascript,VBscript等等脚本语言,搞的初学者。
莫相离 该用户已被删除
8#
发表于 2015-3-22 21:09:46 | 只看该作者
兴趣爱好,那么你无须学编程,申请一个域名和空间,在网上下载一些免费开源的CMS系统,你不用改代码,只须熟悉它们的后台操作,像office一样简单方便,很快就能建一个站点,很多站长都是这样做的
因胸联盟 该用户已被删除
9#
发表于 2015-3-22 21:09:47 | 只看该作者
运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-24 10:35

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表