请教无为大侠，也希望其他高手帮助！很着急！UP有分！

Bullforg 2003-04-28 04:44:00

我的环境是WIN2000SERVER
现在需要做一套需要发布西班牙文和阿拉伯文的产品发布系统
请教如何来做呢！很感谢任何的帮助！对于其他高手分不是问题！
很着急，在线等待！

...全文

78 21 打赏收藏转发到动态举报

写回复

用AI写文章

21 条回复

切换为时间正序

请发表友善的回复…

发表回复

tao_ao 2003-05-19

打赏
举报

flbz 2003-05-19

打赏
举报

能支持吗？

forestwind 2003-05-19

打赏
举报

听说up有分，友情up一下！

liuqinyi 2003-05-19

打赏
举报

下面的资料也许有用。
基于WEB系统的多语言支持--ASP国际化多语言详细方案
1.ASP部分
a.建立语言包
1.在各个子系统建立"语言包"目录 ,
如BBS--> language -->Simplified
--->Traditional
--->English
2 为每个ASP,js,HTC 建立语言文件,如ACMBBStopic.asp.lang ,treeview.htc.lang ,
用来存放语言全局变量。
如目录Language\English\ ACMBBSShow.asp.lang
Public Const LangRollway="reverse roll"
Public Const LangInvaildUser="invaild user"
Public Const LangMailbox="mail box"
Public Const LangSysSetup="system setup"
Public Const LangACMBBS="Acer BBS"
Public Const LangBulltn="Acer bulltin"
Public Const LangPersnSetup="personal setting"
Public Const LangPublicTools="Public Tools"
如目录Language\ Simplified \ ACMBBSShow.asp.lang
Public Const LangRollway="反向滚动"
Public Const LangInvaildUser="非法用户"
Public Const LangMailbox="邮件资料夹"
Public Const LangSysSetup="系统设置"
Public Const LangACMBBS="明碁网咖"
Public Const LangBulltn="公告栏"
Public Const LangPersnSetup="个人设定"
Public Const LangPublicTools="群组工具"
语言全局变量命名规则;
必须是VBscript 变量定义方式 Public Const
变量名为： "Lang" + Message Descption

b. 设定Global.asa
SUB Session_OnStart
Session.CODEPAGE="1252" '1252En '950繁体 '936简体
Session.Contents("Language")="EngLish" 'EngLish 'Traditional 'Simplified
Session.Contents("StrCharset")="big5" 'iso-8859-1 'big5 'gb2312
End Sub
c. 引用语言包
1.建立 BBS--> language -->script 目录, IncludeLang.vbs
2.在各个asp,js,HTC头部
<Script language=vbscript runat="server" src="./Language/script/IncludeLang.vbs"></Script>
<% call IncludeLangFile("acmMainPageshow.asp.lang",Session.Contents("Language"))%>
3.使用思想
o 将 *.lang 等语言包用Function GetFileContents 读到变量中,
o 使用vbscript中EXECUTE方法在Server执行
IncludeLang.vbs 内容如下

'//'*********************************************************
'// ' Purpose: open include 文件
'// ' Inputs: strIncludeFile 路径
'// ' Returns: All Text
'//'*********************************************************

Function GetFileContents(strIncludeFile)
On Error Resume Next
Dim objFSO
Dim objText
Dim strPage
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objText = objFSO.OpenTextFile(Server.MapPath(strIncludeFile))
GetFileContents= objText.ReadAll
objText.Close
Set objText = Nothing
Set objFSO = Nothing
IF Err Then
Response.Write "Error open this language package file<<" & strIncludeFile & ">>!"
Response.End
END IF
End Function

'//'*********************************************************
'// ' Purpose: 动态 include 文件
'// ' Inputs: strIncludeFile 路径,语言种类
'// ' Returns: 执行变量到全局变量
'//'*********************************************************
Function IncludeLangFile(StrFileName,Language)
On Error Resume Next
dim StrLangPackagePath
dim StrLanguagePath
StrLanguagePath=Language
StrLangPackagePath="./Language/" & StrLanguagePath & "/" & StrFileName
Execute(GetFileContents(StrLangPackagePath))
IF Err Then
Response.Write "Error Include this language package file<<" & strIncludeFile & ">>! check the file's syntax"
Response.End
END IF
End Function
2.图片部分
为带有汉字图片建立 BBS--> language -->simplified-->Image
--->traditional-->Image
--->English -->Image
动态Include
<img src="language/Session.Contents("Language"))/image/AAA.gif">

3.COM部分
使用resource file 控制语言版本,由系统自动判断语言版本

注意： resource file 简体字码必须在简体机器输入，繁体字码必须在繁体机器输入

4.其他

多语言版本参考规则﹕
1.英文翻译长度尽量与汉语长度相当。
2.要符合各个版本的语言习惯。
3.英文版中Title ,text标签文本﹐按钮文本﹐select option 中英文单词首字母大写,但
介词﹐连词 ,冠词使用小写。
4. 英文版中缩写全部使用大写。
5. 英文版中check ,radio ,英文首字母大写.
6. 英文版中状态信息使用小写。

qjrein 2003-05-19

打赏
举报

up一下吧，还没遇到这样的需求

chichuli_4 2003-05-19

打赏
举报

关注

possible_Y 2003-05-19

打赏
举报

用xml+xsl吧

yonghengdizhen 2003-05-19

打赏
举报

关于codepage在这里找吧-->
http://msdn.microsoft.com/workshop/author/dhtml/reference/charsets/charset4.asp?frame=true

zqqych 2003-05-19

打赏
举报

手头的一个资料，希望对你有帮助！

如何实现多语言支持？
具体举例如下：
在global.asax中：
void Application_OnStart(){
Application["RM"]=new ResourceManager("articles",Server.Mappath("resources")
+Enviroment.DirectorySeparatorChar,null);
}
void Application_BeginRequest(Object sender,EventArgs e){
try {
Thread.CurrentThread.CurrentCulture = new
CultureInfo(Request.UserLanguages[0]);
}catch(ArgumentException){
Thread.CurrentThread.CurrentCulture=new CultureInfo("en-us");
}
Thread.CurrentThread.CurrentUICulture = Thread.CurrentThread.CurrentCulture;
}

在default.asax中：
ResourceManager rm;
void Page_Init(Object sender,EventArgs e)
{
rm=(ResouceManager)Application["RM"];
}

输出内容时：
<%= rm.GetString("greetings") %>