Empfohlen: ASP Basic Tutorial: Andere häufig verwendete Komponenten von ASP Wenn Sie ASP verwenden, um serverseitige Anwendungen zu schreiben, müssen Sie sich auf ActiveX-Komponenten für die Funktionen der leistungsstarken Webanwendungen verlassen, z.
Manchmal möchte ich mehrsprachige Unterstützung für unsere Webseiten bieten. Es ist zu problematisch, eine Webseite für eine Sprache zu verwenden. Glücklicherweise bietet Google Sprach -Toolfunktionen. Im Folgenden wird beschrieben, wie Sie es verwenden, um Webseiten zwischen mehreren Sprachen zu konvertieren.
Lan.htm
| Das Folgende ist der zitierte Inhalt: <form> <select name = lan> <Option Value = EN | DE> Englisch zu Deutsch </Option> <Option Value = en | ES> Englische Übersetzung in Spanisch </Option> <Option Value = en | Fr> Englische Übersetzung in Französisch </Option> <Option value = en | it> Englische Übersetzung in Italienisch </option> <Option Value = en | Pt> Englische Übersetzung in Portugiesisch </Option> <Option Value = en | Ja> Englische Übersetzung in die japanische Beta </Option> <Option Value = en | Ko> Englische Übersetzung in die koreanische Beta </Option> <Option Value = en | ZH-CN> Englische Übersetzung in chinesische (vereinfachte chinesische) Beta </Option> <Option Value = de | en> Deutsch bis Englisch </Option> <Option Value = de | Fr> Deutsch zu Französisch </Option> <Option Value = ES | EN> Spanische Übersetzung in Englisch </Option> <Option Value = Fr | EN> Französische Übersetzung in Englisch </Option> <Option Value = Fr | DE> Französische Übersetzung in Deutsch </Option> <Option Value = it | en> Italienisch zu Englisch </Option> <Option Value = Pt | EN> Portugiesische Übersetzung in Englisch </Option> <Option value = ja | en> japanisch bis englischer Beta </option> <Option Value = Ko | EN> Koreanische Übersetzung in die englische Beta </Option> <Option Value = ZH-CN | EN> Chinesische (vereinfachte) Übersetzung in die englische Beta </option> <Eingabestil = Schriftgröße: 12px Typ = Button Value = Go- & GT; name = button1 onclick = javaScript: window.open ('translate.asp? urls =' document.location '& lan =' lan.value, '_ self', '')> </select> </form> |
Der Inhalt in lan.htm wird verwendet, um die zu übersetzende Sprache auszuwählen, einschließlich der Originalsprache und der Sprache, in die übersetzt werden soll. Wir müssen nur den Inhalt in lan.htm auf eine Seite kopieren, die mehrsprachige Übersetzung bietet.
translate.asp
| Das Folgende ist der zitierte Inhalt: <html> <kopf> <title> Online -Übersetzung </title> <meta http-äquiv = content-type content = text/html; charset = utf-8> </head> <body> <% 'Bei der nächsten Fehlerbehebung als nächstes „Wenn die Internetgeschwindigkeit sehr langsam ist, können Sie die folgende Zeit anpassen. Einheit Sekunden Server.ScriptTimeout = 999999 "============================================================================================================ 'Zeichenkodierfunktion "============================================================================================================ Funktion byTestObstr (Körper, Code) Dimer Objstream Setzen Sie objstream = server.createObject (adodb.stream) objstream.type = 1 objstream.mode = 3 objstream.open objstream.write Body objstream.position = 0 objstream.type = 2 objstream.charset = code ByTestObstr = objstream.readText objstream.close objstream einstellen = nichts Endfunktion 'Rufen Sie die Auftrittsposition der Linienzeichenfolge in einer anderen Zeichenfolge ab Funktion Newsstring (WSTR, STRNG) NewsString = Instring (Lase (WSTR), Lase (strng)) Wenn NewsString <= 0 dann Newsstring = len (WSTR) Endfunktion 'Die Zeichenfolge ersetzen Funktion ersetzen (ORI, STR1, STR2) Ersetzen = ersetzen (ori, str1, str2) Endfunktion "============================================================================================== Funktion readxml (URL, Code, Start, endet) Setzen Sie osend = createObject (microsoft.xmlhttp) SourceCode = Osend.open (GET, URL, FALSE) osend.send () Readxml = byTestObstr (osend.responseBody, Code) if (start = oder endet =) dann anders Start = Newsstring (readxml, start) Readxml = Mid (readxml, starten) endet = newString (readxml, endet) Readxml = links (readxml, endet 1) Ende wenn Endfunktion DIM -URLPAGE, LAN URLPAGE = Anfrage (URLs) LAN = Anfrage (LAN) %> <formmethode = post action = translate.asp> <Eingabetyp = Textname = URLS Größe = 150 Wert = <%= URLPAGE%>> <Eingabetyp = HIDDEN NAME = lan value = <%= lan%>> <Eingabe type = value = surven> </form> <% Dim transurl transurl = http: //216.239.39.104/translate_c? if (len (urlpage)> 3 dann getCont = readxml (transurl, gb2312 ,,) response.write (getCont) Ende wenn %> </body> </html> |
Translate.asp implementiert die Übersetzungsfunktion, die mithilfe von Google -Sprachtools implementiert wird.
Beachten Sie, dass die von der Datei "Translate.asp) verwendete Kodierung von mehrsprachiger Unterstützung UTF-8 ist, das alle Zeichen unterstützt.
Share: Machen Sie das Popup-Fenster "gehorsam" ein wenig Popups werden beim Eingeben einiger Websites beim Surfen im Internet angezeigt. Es kann eine freundliche Begrüßung vom Webmaster zu Ihnen sein, oder es kann eine wichtige Ankündigung der Website, der Website -Anzeigen usw. sein. Wenn Sie sie jedoch schlecht verwenden, fühlen sich die Menschen gelangweilt. Wie man Pop-ups funktioniert, ohne das Surfen zu beeinflussen