Recomendado: ASP Tutorial básico: otros componentes de ASP comúnmente utilizados Cuando usa ASP para escribir aplicaciones del lado del servidor, debe confiar en los componentes ActiveX a las funciones de aplicaciones web potentes, tales como: debe conectarse a la base de datos, operar la base de datos en línea, etc. 1. Los componentes de las capacidades del navegador son bien conocidos y no lo hacen
A veces quiero proporcionar soporte de varios idiomas para nuestras páginas web. Es demasiado problemático usar una página web para un idioma. Afortunadamente, Google proporciona funciones de herramientas de idiomas. A continuación se describe cómo usarlo para convertir las páginas web entre varios idiomas.
lan.htm
| El siguiente es el contenido citado: <form> <Seleccionar nombre = LAN> <opción valor = en | de> inglés a alemán </opción> <opción valor = en | es> traducción al inglés al español </opción> <opción valor = en | fr> traducción al inglés al francés </opción> <opción valor = en | it> traducción al inglés al italiano </opción> <opción valor = en | pt> traducción al inglés en portugués </opción> <opción valor = en | ja> traducción al inglés en beta japonés </opción> <opción valor = en | ko> traducción al inglés en beta coreana </opción> <opción valor = en | zh-cn> traducción al inglés en chino (chino simplificado) beta </opción> <opción valor = de | en> alemán a inglés </opción> <opción valor = de | fr> alemán a francés </opción> <opción valor = es | en> traducción al español al inglés </opción> <opción valor = fr | en> traducción al francés al inglés </opción> <opción valor = fr | de> traducción francesa en alemán </opción> <opción valor = it | en> italiano a inglés </opción> <opción valor = pt | en> traducción portuguesa al inglés </opción> <opción valor = ja | en> beta beta japonés a inglés </opción> <opción valor = ko | en> traducción coreana al inglés beta </opción> <opción valor = zh-cn | en> traducción china (simplificada) al inglés beta </opción> <input style = font-size: 12px type = button value = go- & gt; name = Button1 onClick = javaScript: window.open ('traduce.asp? urls =' document.location '& lan =' lan.value, '_ self', '')>> </select> </form> |
El contenido en lan.htm se usa para seleccionar el idioma que se traduce, incluido el idioma original y el idioma a traducir. Solo necesitamos copiar el contenido en lan.htm a una página que proporciona traducción multilingüe.
traducir.asp
| El siguiente es el contenido citado: <html> <Evista> <title> Traducción en línea </title> <meta http-oquiv = content-type content = text/html; charset = utf-8> </ablo> <Body> <% 'En el currículum de error a continuación 'Si la velocidad de Internet es muy lenta, puede ajustar la siguiente hora. Unidad segundos Server.scripttimeout = 999999 '======================================================================================================================== 'Función de codificación de personajes '======================================================================================================================== Function bytestobstr (cuerpo, código) dim objstream Establecer objstream = server.createObject (ADODB.Stream) objstream.type = 1 objstream.mode = 3 objstream. objstream.write cuerpo objstream.position = 0 objstream.type = 2 objstream.charset = código Bytestobstr = objstream.readText objstream.close establecer objstream = nada Función final 'Obtenga la posición de ocurrencia de la cadena de línea en otra cadena Funcion Newsstring (WSTR, STRNG) Newsstring = Instr (lcase (WSTR), lcase (strng)) Si Newsstring <= 0 entonces Newsstring = Len (WSTR) Función final 'Reemplazar la función de cadena Función Reemplazo (Ori, STR1, STR2) Reemplazar = reemplazar (ori, str1, str2) función final '============================================================================ función readXml (URL, código, inicio, termina) establecer osend = createObject (Microsoft.xmlhttp) SourCecode = Osend.open (Get, URL, False) Osend.send () ReadXml = bytestobstr (Osend.ResponseBody, código) if (inicio = o termina =) entonces demás Start = Newstring (readXml, inicio) ReadXml = Mid (readxml, inicio) termina = Newstring (readXml, termina) Readxml = izquierda (readXml, termina-1) final si función final Dim URLPage, LAN urlpage = solicitud (URLS) lan = solicitud (LAN) %> <Form Method = Post Action = Translate.asp> <input type = text name = urls size = 150 valor = <%= urlpage%>> <input type = Hidden name = lan value = <%= lan%>> <Entrada tipo = enviar value = enviar> </form> <% Transurl Dim transurl = http: //216.239.39.104/translate_c? hl = zh-cn & ie = utf-8 & oe = utf-8 & langpair = & server.urlencode (lan) && u = & urlpage && prev =/idioma_tools if (len (urlpage)> 3) entonces getCont = readXml (TransUrl, GB2312 ,,) Response.Write (GetCont) final si %> </body> </html> |
traducir.asp implementa la función de traducción, que se implementa utilizando las herramientas de idioma de Google.
Tenga en cuenta que debido a que se proporciona soporte multilingüe, la codificación utilizada por el archivo traduce.asp es UTF-8 que admite todos los caracteres.
Compartir: Haga un poco la ventana emergente "obediente" Las ventanas emergentes aparecerán al ingresar a algunos sitios web mientras navegan por Internet. Puede ser un saludo amable del webmaster para usted, o puede ser un anuncio importante del sitio web, anuncios del sitio web, etc. Pero si lo usa mal, hará que las personas se sientan aburridas. Cómo hacer que las ventanas emergentes funcionen sin afectar la navegación