|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
缺点:正版成本价格贵(盗版就不说了)、不够安全,大多数服务器用windows系统,没有linux安全转换国际化仿佛是一个十分盛行的标语了,一个网站没有英文版最少也要弄个繁体版,究竟都是汉字,翻译起来不会那末贫苦:P
一样平常的繁简转换是利用字典,经由过程GB的内码算出BIG5字符在字典中的地位,读取显现之,用fso应当能够完成。这里先容的办法思绪更复杂一些,用Dictionary工具,就是字典,呵呵,dicGb2Big5(gb)就是对应的BIG5。比起盘算内码再依照地位读取字符复杂的多吧:)
为了削减开支,把字典放在Application中,即在global.asa中创建两个application的字典工具
<OBJECTid=objGb2Big5progid="Scripting.Dictionrary"runat="server"scope="application">
</OBJECT>
<OBJECTid=objBig52Gbprogid="Scripting.Dictionrary"runat="server"scope="application">
</OBJECT>
在application_onstart中给字典增加项目
……
objGb2Big5.Add"啊","摆"
objGb2Big5.Add"阿",""
objGb2Big5.Add"埃","J"
……
……
objBig52Gb.Add"摆","啊"
objBig52Gb.Add"","阿"
objBig52Gb.Add"J","埃"
……
字典项良多,就不都写了
做好了字典,利用的时分只需查一下就好了:)
functiongb2big5(str)
dimi,l,k,t,rtn
l=len(str)
rtn=""
fori=1tol
k=mid(str,i,1)
ifascw(k)>=0andascw(k)<128then
t=k
else
ifobjGb2Big5.Exists(k)then
t=objGb2Big5.Item(k)
else
t=""
endif
endif
rtn=rtn&t
next
gb2big5=rtn
endfunction
functionbig52gb(str)
dimi,l,k,t,rtn
l=len(str)
rtn=""
fori=1tol
k=mid(str,i,1)
ifascw(k)>=0andascw(k)<128then
t=k
else
ifobjBig52Gb.Exists(k)then
t=objBig52Gb.Item(k)
else
t=""
endif
endif
rtn=rtn&t
next
big52gb=rtn
endfunction
测试一下看看吧
<%=gb2big5("繁简转换测试")%>
上面的网站就是用这类办法完成的
http://tingfei.com繁简转换的链接在页面左上角
</p>ASP.NET和ASP的比较,技术上比较已经没什么可说的了.新一代在大部分程度来说当然是比旧一代好了.关键看你对所做软件的理解了.因人而定.会写的话也可能比ASP.NET写得更有效率和更方便重用 |
|