|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
无法实现跨操作系统的应用。当然这也是微软的理由之一,只有这样才能发挥ASP最佳的能力。可是我却认为正是Windows限制了ASP,ASP的概念本就是为一个能让系统运行于一个大的多样化环境而设计的;程序|精髓|显现|源代码remview_code.asp
<%
onerrorresumenext
%>
<%
functionrt_min(num1,num2)
ifnum1=0andnum2=0then
rt_min=-1
elseifnum1=0then
rt_min=num2
elseifnum2=0then
rt_min=num1
elseifnum1<num2then
rt_min=num1
else
rt_min=num2
endif
endfunction
%>
<%
functionline_check(strline,cgi_type)
dimcgi_flag
ifcgi_type="php"then
cgi_flag="?"
else
cgi_flag="%"
endif
line_check=0
itemp=0
ipos=instr(strline,"<"&cgi_flag)
ifrt_min(ipos,itemp)=iposthen
itemp=ipos
line_check=1
endif
ipos=instr(strline,cgi_flag&">")
ifrt_min(ipos,itemp)=iposthen
itemp=ipos
line_check=2
endif
ipos=instr(1,strline,"<"&"script",1)
ifrt_min(ipos,itemp)=iposthen
itemp=ipos
line_check=3
endif
ipos=instr(1,strline,"<"&"/script",1)
ifrt_min(ipos,itemp)=iposthen
itemp=ipos
line_check=4
endif
endfunction
%>
<%
subprinthtml(strline)
ispace=len(strline)-len(ltrim(strline))
i=1
while(mid(strline,i,1))=chr(9)
ispace=ispace+5
i=i+1
wend
ifispace>0then
fori=1toispace
response.write("")
next
endif
ipos=instr(strline,"<")
ifiposthen
response.write(left(strline,ipos-1))
response.write("<")
strline=right(strline,len(strline)-ipos)
callprinthtml(strline)
else
response.write(strline)
endif
endsub
%>
<%
subprintline(strline,iflag,cgi_type)
dimcgi_flag
ifcgi_type="php"then
cgi_flag="?"
else
cgi_flag="%"
endif
selectcaseiflag
case0
callprinthtml(strline)
case1
ipos=instr(strline,"<"&cgi_flag)
callprinthtml(left(strline,ipos-1))
response.write("<fontcolor=#ff0000>")
response.write("<"&cgi_flag)
strline=right(strline,len(strline)-ipos-1)
callprintline(strline,line_check(strline,cgi_type),cgi_type)
case2
ipos=instr(strline,cgi_flag&">")
callprinthtml(left(strline,ipos-1))
response.write(cgi_flag&">")
response.write("</font>")
strline=right(strline,len(strline)-ipos-1)
callprintline(strline,line_check(strline,cgi_type),cgi_type)
case3
ipos=instr(1,strline,"<"&"script",1)
callprinthtml(left(strline,ipos-1))
response.write("<fontcolor=#00ff00>")
respons</p>结论:和PHP一样,ASP简单而易于维护,很适合小型网站应用,通过DCOM和MTS技术,ASP甚至还可以完成小规模的企业应用,但ASP的致命缺点就是不支持跨平台的系统,在大型项目开发和维护上非常困难。 |
|