asp+xml实现多语言网站的解放方案

asp+|xml|网站|多语言

新建两个存储语言项的xml文件,放到Languages目录下:
zh-cn.xml




以下是引用片段:
<?xml version="1.0" encoding="utf-8"?>
<Languages>
    <aboutus>关于我们</aboutus>
    <product>产品展示</product>
</Languages>

english.xml




以下是引用片段:
<?xml version="1.0" encoding="utf-8"?>
<Languages>
    <aboutus>About us</aboutus>
    <product>Products</product>
</Languages>

公用函数(方法)Functions.asp,放到Comm目录下:




以下是引用片段:
<%
’-------------------
’函数名:getLang();
’参数Lang:当前语言;
’参数Litem:设定的语言项;
’示例:Call getLang("zh-cn","aboutus");
’Author:Huerreson,huerreson@msn.com
’-------------------
Function getLang(ByVal Lang,Litem)
    Dim xmlDom
    If objCheck("Microsoft.XMLDOM") then  
        Set xmlDom = Server.CreateObject("Microsoft.XMLDOM")
    elseif objCheck("Microsoft.XMLDOM") then
        Set xmlDom = Server.CreateObject("MSXML2.DOMDocument")
    else 
        Response.Write("服务器不支持’Microsoft.XMLDOM’及’MSXML2.DOMDocument’,无法使用本功能")
    End if
    xmlDom.async = false
    xmlDom.load(Server.MapPath("Languages/"& Lang &".xml"))
    Response.Write(xmlDom.documentElement.selectSingleNode(Litem).text)
    Set xmlDoc = Nothing
    Set xmlDom = Nothing
End Function
’-------------------
’函数名:objCheck();
’参数ObjName:对象名称;
’示例:Call objCheck("Microsoft.XMLDOM");
’Author:Huerreson,huerreson@msn.com
’-------------------
Function objCheck(ObjName)
  on error resume next
  objCheck = false
  Set Obj = Server.CreateObject (ObjName)
  If -2147221005 <> Err then
    objCheck = true
  end if
  Set Obj = nothing
End Function
%>

asp+xml实现多语言网站应用实例:

以下是引用片段:
<!-- 
==多语言版本解决方案==
Author:Huerrseon,huerreson@msn.com 
-->
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="Comm/functions.asp" -->
<style type="text/css">
#NavMenu{border-bottom:1px dashed #000;}
</style>
<%
Dim LangQuery
LangQuery = lCase(Request.QueryString("lang"))
If Not (IsNull(LangQuery) or LangQuery = "") Then
    LangQuery  = LangQuery
else
    LangQuery = "default"
End if
%>
<div id="NavMenu"><%Call getLang(LangQuery,"aboutus")%></div>
<div id="SwitchLangBar">语言切换<a href="?lang=zh-cn">简体中文</a>--<a href="?lang=english">Englsih</a></div>

时间: 2024-11-05 16:37:49

asp+xml实现多语言网站的解放方案的相关文章

用ASP技术进行动态WAP网站开发实例

 第一节:WAP的潜能 这些日子,我们常听到WAP技术,一种手机上网的技术.从技术上讲,移动电话不可能和PC来竞争,移动电话的屏幕只能容下很少的字符,它的带宽也是很受限制,而且输入也很笨拙.那我为什么还要 介绍它了,嘿嘿,这里有两个主要的我认为WAP一定有成功的因素. 随处性: 只要你有手机,你到哪里都可以访问wap网站. 帐单机构: 在不久的将来,我们就能通过我们的手机来支付我们的一切费用,查询很多的信息.只是我们的手机费用中又多了一项费用"WAP服务费". 这样我们就能用手机支付我

ASP XML操作类代码_应用技巧

复制代码 代码如下: Class XMLClass Private objXml Private xmlDoc Private xmlPath '//============================================================ ' Sub Class_initialize Set objXml = Server.CreateObject("MSXML2.DOMDocument") objXml.preserveWhiteSpace = tru

ASP XML操作类代码

复制代码 代码如下:Class XMLClass Private objXml Private xmlDoc Private xmlPath '//============================================================ ' Sub Class_initialize Set objXml = Server.CreateObject("MSXML2.DOMDocument") objXml.preserveWhiteSpace = true

【原创】ASP+XML制作菜单管理!

menu.asp  这个是前台执行部分 以下是引用片段:QUOTE: <% '读取XML文件函数 Function YCMS_menu() dim menu_temp,m Set goxml=Server.CreateObject("Microsoft.XMLDOM")     goxml.load(Server.MapPath("menu.xml")) Set goroot=goxml.documentElement.selectSingleNode(&qu

ASP+XML制作菜单管理!

menu.asp  这个是前台执行部分 QUOTE: <%'---------------------------------------'作者:野 草'日期:2006年4月24日'Q  Q:94440079'51群:21643964(51JS.COM的群)'网站:http://www.yecaoweb.com OR http://www.yecaoweb.net'---------------------------------------'读取XML文件函数Function YCMS_men

利用ASP+XML打造个性化留言本

asp+|xml 一.读者指引 读者指引帮助你掌握本文的梗概.以免你看了大半才明白这编文章不适合你,给你造成视觉污染. 如果你正在用ASP+XML写一些程序,或者你正在学XML那就值得一看. 阅读本文须具备的知识,对ASP有基本的了解,对XML和DOM有基本了解,如果你不了解那么你通过学习本文基本上能够撑握ASP+XML和DOM的应用,并能根据本文范写出自已更高级的ASP+XML程序. 二.基本思想 本文思想是基于用ASP和DOM来读取和存储XML数据,并利用XML数据来存储留言信息,达到同用数

用ASP+XML打造留言本(1)

一.读者指引 读者指引帮助你掌握本文的梗概.以免你看了大半才明白这编文章不适合你,给你造成视觉污染. 如果你正在用ASP+XML写一些程序,或者你正在学XML那就值得一看. 阅读本文须具备的知识,对ASP有基本的了解,对XML和DOM有基本了解,如果你不了解那么你通过学习本文基本上能够撑握ASP+XML和DOM的应用,并能根据本文范写出自已更高级的ASP+XML程序. 二.基本思想 本文思想是基于用ASP和DOM来读取和存储XML数据,并利用XML数据来存储留言信息,达到同用数据库存储数据的功能

使用ASP+XML制作菜单管理程序

menu.asp  这个是前台执行部分 以下是menu.asp代码:<% '--------------------------------------- '作者:野 草 '日期:2006年4月24日 'Q  Q:94440079 '51群:21643964(51JS.COM的群) '网站:http://www.yecaoweb.com OR http://www.yecaoweb.net '--------------------------------------- '读取XML文件函数 F

用ASP+XML打造留言本

asp+|xml 用ASP+XML打造留言本 来源:www.yesky.com 一.读者指引 读者指引帮助你掌握本文的梗概.以免你看了大半才明白这编文章不适合你,给你造成视觉污染. 如果你正在用ASP+XML写一些程序,或者你正在学XML那就值得一看. 阅读本文须具备的知识,对ASP有基本的了解,对XML和DOM有基本了解,如果你不了解那么你通过学习本文基本上能够撑握ASP+XML和DOM的应用,并能根据本文范写出自已更高级的ASP+XML程序. 二.基本思想 本文思想是基于用ASP和DOM来读