Иногда нам нужно обеспечить многоязычную поддержку для наших веб-страниц. Использовать одну веб-страницу для одного языка слишком сложно. К счастью, Google предоставляет функцию языкового инструмента. Вот как ее можно использовать для преобразования веб-страниц между несколькими языками. .
Автор: Taote.com
Источник: http://www.tot.name
Примечание: Для перепечатки укажите источник
lan.htm
<form>
<select name="лан">
<option value="en|de">с английского на немецкий</option>
<option value="en|es">с английского на испанский</option>
<option value="en|fr">с английского на французский</option>
<option value="en|it">с английского на итальянский</option>
<option value="en|pt">с английского на португальский</option>
<option value="en|ja">БЕТА-версия с английского на японский</option>
<option value="en|ko">БЕТА-версия с английского на корейский</option>
<option value="en|zh-CN" >Английский перевод на китайский (упрощенный) БЕТА</option>
<option value="de|en">Перевод с немецкого на английский</option>
<option value="de|fr">Перевод с немецкого на французский</option>
<option value="es|en">С испанского на английский</option>
<option value="fr|en">С французского на английский</option>
<option value="fr|de">С французского на немецкий</option>
<option value="it|en">С итальянского на английский</option>
<option value="pt|en">С португальского на английский</option>
<option value="ja|en">БЕТА-версия с японского на английский</option>
<option value="ko|en">БЕТА-версия с корейского на английский</option>
<option value="zh-CN|en">Китайский (упрощенный) переведен на английский БЕТА</option>
<input style="FONT-SIZE: 12px" type="button" value="Go->" name="Button1" onClick="javascript:window.open('translate.asp?urls='+document.location+ '&lan='+lan.value,'_self','')">
</выбрать>
</форма>
Содержимое файла lan.htm используется для выбора языка для перевода, включая исходный язык и язык для перевода. Нам нужно только скопировать содержимое lan.htm на страницу, обеспечивающую многоязычный перевод.
Translate.asp
<html>
<голова>
<title>Онлайн-перевод</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<тело>
<%
'в случае ошибки продолжить дальше
' Если скорость Интернета очень низкая, вы можете настроить следующее время. Единица секунды
Сервер.ScriptTimeout = 999999
'============================================== = =======
'Функция кодировки символов
'============================================== = =======
Функция BytesToBstr(тело,код)
тусклый объектный поток
set objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Открыть
objstream.Напишите тело
objstream.Position = 0
objstream.Type = 2
objstream.Charset = код
BytesToBstr = objstream.ReadText
objstream.Close
установить objstream = ничего
Конечная функция
'Получить позицию вхождения строки в другую строку
Функция Newsstring(wstr,strng)
Newstring=Instr(lcase(wstr),lcase(strng))
если Newstring<=0, то Newsstring=Len(wstr)
Конечная функция
'Заменить строковую функцию
функция replaceStr(ori,str1,str2)
replaceStr=заменить(ori,str1,str2)
конечная функция
'============================================== = ====
функция ReadXml(url,код,начало,окончание)
set oSend=createobject("Microsoft.XMLHTTP")
SourceCode = oSend.open ("GET",url,false)
oSend.send()
ReadXml=BytesToBstr(oSend.responseBody,code )
если(start="" или end="") тогда
еще
start=Новостная строка(ReadXml,start)
ReadXml=mid(ReadXml,start)
Концы = Строка новостей (ReadXml, концы)
ReadXml=влево(ReadXml,ends-1)
конец, если
конечная функция
тусклый URL-адрес, локальная сеть
urlpage=запрос("URL")
локальная сеть = запрос («лан»)
%>
<form метод="post" action="translate.asp">
<input type="text" name="urls" size="150" value="<%=urlpage%>">
<input type="hidden" name="lan" value="<%=lan%>">
<input type="submit" value="submit">
</форма>
<%
тусклый трансURL
transURL=" http://216.239.39.104/translate_c?hl=zh-CN&ie=UTF-8&oe=UTF-8&langpair="&server.URLEncode(lan)&"&u="&urlpage&"&prev=/language_tools "
если(len(urlpage)>3), то
getcont=ReadXml(transURL,"gb2312","","")
ответ.Запись(getcont)
конец, если
%>
</тело>
</html>
Translate.asp реализует функцию перевода, которая реализована с помощью языковых инструментов Google.
Обратите внимание: поскольку обеспечивается поддержка нескольких языков, в файле Translate.asp используется кодировка «utf-8», которая поддерживает все символы.