ASP教程之asp国标转年夜五码
ActiveServerPage技术为应用开发商提供了基于脚本的直观、快速、高效的应用开发手段，极大地提高了开发的效果。在讨论ASP的安全性问题之前，让我们来看看ASP是怎么工作的。<%==================================================
函数名：gb2big5
作用：国标码转年夜五码
参数：Text------字符串
netyum(杨嵩)
QQ:8025628
时间：2004年6月28日
==================================================
Functiongb2big5(Text)
DimAdos,Max,i,c,b,h,l
IfIsNull(Text)OrText=""ThenExitFunction
SetAdos=Server.CreateObject("Adodb.Stream")
Ados.Mode=3
Ados.Type=1
Ados.Open
Ados.LoadFromFile(Server.MapPath("gb-big5.table"))
Text=Server.UrlEnCode(Text)
b=""
Max=Len(Text)
Fori=1ToMax
c=Mid(Text,i,1)
Ifc="%"Then
h=eval("&h"+Mid(Text,i+1,2))
Ifh<128Then
b=b&chr(h)
i=i+2
Else
Ifisvalidhex(mid(Text,i,3))Then
Ifisvalidhex(mid(Text,i+3,3))Then
l=eval("&h"+Mid(Text,i+4,2))
Ados.Position=(h-160)*510+(l-1)*2
b=b&bytes2BSTR(Ados.Read(2))
i=i+5
Else
b=b&""
i=i+3
EndIf
EndIf
EndIf
Else
Ifc="+"Then
b=b&""
Else
b=b&c
EndIf
EndIf
Next
SetAdos=Nothing
gb2big5=b
EndFunction
Functionisvalidhex(str)
isvalidhex=true
str=ucase(str)
IfLen(str)3Thenisvalidhex=false:ExitFunction
ifLeft(str,1)"%"Thenisvalidhex=false:ExitFunction
c=Mid(str,2,1)
IfNot(((c>="0")And(c<="9"))Or((c>="A")And(c<="Z")))Thenisvalidhex=false:ExitFunction
c=Mid(str,3,1)
IfNot(((c>="0")And(c<="9"))Or((c>="A")And(c<="Z")))Thenisvalidhex=false:ExitFunction
EndFunction
Functionbytes2BSTR(vIn)
DimstrReturn
Dimi,ThisCharCode,NextCharCode
strReturn=""
Fori=1ToLenB(vIn)
ThisCharCode=AscB(MidB(vIn,i,1))
IfThisCharCode<&H80Then
strReturn=strReturn&Chr(ThisCharCode)
Else
NextCharCode=AscB(MidB(vIn,i+1,1))
strReturn=strReturn&Chr(CLng(ThisCharCode)*&H100+CInt(NextCharCode))
i=i+1
EndIf
Next
bytes2BSTR=strReturn
EndFunction
%>
</p>帮助用户快速实现各种应用服务，ASP商有整合各方面资源的能力，可在短期内为用户提供所需的解决方案。例如，典型的ERP安装，如果要在客户端安装的话需要半年到二年的时间，但是美国的一些ASP商如USI和CORIO能在90—120天内提供ERP应用方案。 我想问如何掌握学习节奏(先学什么再学什么)最好详细点? 以上是语言本身的弱点，在功能方面ASP同样存在问题，第一是功能太弱，一些底层操作只能通过组件来完成，在这点上是远远比不上PHP/JSP，其次就是缺乏完善的纠错/调试功能，这点上ASP/PHP/JSP差不多。 你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。 完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。 我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。 我就感觉到ASP和一些常用的数据库编程以及软件工程方面的思想是非常重要的。我现在也在尝试自己做网页，这其中就用到了ASP，我想它的作用是可想而知的。 Server:这个表示的服务器，操作服务器的一些东西使用这个，如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件 兴趣爱好，那么你无须学编程，申请一个域名和空间，在网上下载一些免费开源的CMS系统，你不用改代码，只须熟悉它们的后台操作，像office一样简单方便，很快就能建一个站点，很多站长都是这样做的
页:
[1]