Parfois, nous souhaitons fournir une prise en charge multilingue pour nos pages Web. Il est trop compliqué d'utiliser une seule page Web pour une seule langue. Heureusement, Google propose une fonction d'outil linguistique. Voici comment l'utiliser pour convertir des pages Web entre plusieurs langues. .
Auteur : Taote.com
Source : http://www.tot.name
Remarque : Veuillez indiquer la source de réimpression
de lan.htm
<form>
<select name="lan">
<option value="en|de">Anglais vers allemand</option>
<option value="en|es">Anglais vers espagnol</option>
<option value="en|fr">Anglais vers français</option>
<option value="en|it">Anglais vers italien</option>
<option value="en|pt">Anglais vers portugais</option>
<option value="en|ja">Anglais vers japonais BETA</option>
<option value="en|ko">Anglais vers coréen BETA</option>
<option value="en|zh-CN" >Anglais traduit en chinois (simplifié) BETA</option>
<option value="de|en">Traduction de l'allemand vers l'anglais</option>
<option value="de|fr">Traduction de l'allemand vers le français</option>
<option value="es|en">Espagnol vers anglais</option>
<option value="fr|en">Français vers Anglais</option>
<option value="fr|de">Français vers Allemand</option>
<option value="it|en">Italien vers anglais</option>
<option value="pt|en">Portugais vers anglais</option>
<option value="ja|en">Japonais vers anglais BETA</option>
<option value="ko|en">Coréen vers anglais BETA</option>
<option value="zh-CN|en">Chinois (simplifié) traduit en anglais BETA</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','')">
</sélectionner>
</form>
Le contenu de lan.htm est utilisé pour sélectionner la langue à traduire, y compris la langue originale et la langue à traduire. Il nous suffit de copier le contenu de lan.htm sur la page qui fournit une traduction multilingue.
traduire.asp
<html>
<tête>
<title>Traduction en ligne</title>
<méta http-equiv="Content-Type" content="text/html; charset=utf-8">
</tête>
<corps>
<%
'en cas d'erreur, reprendre ensuite
' Si la vitesse Internet est très lente, vous pouvez régler l'heure suivante. Unité seconde
Serveur.ScriptTimeout = 999999
'================================================== = =======
'Fonction d'encodage des caractères
'================================================== = =======
Fonction BytesToBstr (corps, code)
objstream obscur
set objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Ouvrir
objstream.Écrire le corps
objstream.Position = 0
objstream.Type = 2
objstream.Charset = code
BytesToBstr = objstream.ReadText
objstream.Fermer
définir objstream = rien
End Function
'Obtenir la position d'occurrence d'une chaîne de ligne dans une autre chaîne
Fonction Nouvellechaîne(wstr,strng)
Nouvellechaîne=Instr(lcase(wstr),lcase(strng))
si Nouvellechaîne<=0 alors Nouvellechaîne=Len(wstr)
Fonction de fin
'Remplacer la fonction de chaîne
fonction ReplaceStr(ori,str1,str2)
RemplacerStr=remplacer(ori,str1,str2)
fonction de fin
'================================================== = ====
fonction ReadXml (url, code, début, fin)
set oSend=createobject("Microsoft.XMLHTTP")
SourceCode = oSend.open ("GET",url,false)
oEnvoyer.envoyer()
ReadXml=BytesToBstr(oSend.responseBody,code )
si(start="" ou end="") alors
autre
start=Nouvellechaîne(ReadXml,start)
ReadXml=milieu(ReadXml,début)
se termine = Nouvelle chaîne (ReadXml, se termine)
ReadXml=gauche(ReadXml,fins-1)
finir si
fonction de fin
URL sombre, réseau local
urlpage=requête("urls")
lan=requête("lan")
%>
<form method="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">
</form>
<%
faible transURL
transURL=" http://216.239.39.104/translate_c?hl=zh-CN&ie=UTF-8&oe=UTF-8&langpair="&server.URLEncode(lan)&"&u="&urlpage&"&prev=/langage_tools "
si (len (urlpage)> 3) alors
getcont=ReadXml(transURL,"gb2312","","")
réponse.Write(getcont)
terminer si
%>
</corps>
</html>
traduire.asp implémente la fonction de traduction, qui est implémentée à l'aide des outils linguistiques de Google.
Notez que la prise en charge multilingue étant fournie, le codage utilisé dans le fichier Translate.asp est « utf-8 » qui prend en charge tous les caractères.