El 11 de abril de 2009, ya había completado la implementación del código, pero nunca tuve tiempo de escribir este artículo, así que hoy me tomé el tiempo para compensar este artículo y también para nuestros entusiastas de ASP Entregar una deliciosa sopa para llenar la brecha en la conversión de codificación ASP. Antecedentes del artículo:
Un día, un colega me mostró un artículo sobre CSDN sobre clasificaciones de lenguajes de programación. Vi que VB estaba muy bien clasificado, así que dije que asp (vbscript) es bastante bueno. Como resultado, me refutó y dijo que ASP no es bueno y que muchas cosas son difíciles de lograr. ¿Qué dije? He desarrollado ASP durante varios años y no he encontrado nada difícil de implementar, a menos que esté dentro del alcance de lenguajes que no son de secuencias de comandos, como aplicaciones multiproceso (por supuesto, ASP también puede simular tareas multiproceso), etc. Como resultado, habló sobre subprocesos múltiples, conversión de código, etc. Dijo que había dedicado mucho esfuerzo a convertir el código sin éxito, por lo que sentía que ASP era demasiado débil. Al escuchar esto, supimos que su base de programación no era lo suficientemente sólida y que su conocimiento de ASP era muy limitado (y luego dijo que no conocía ni usaba varios objetos básicos de ASP de uso común. Casi me desmayo. En el pasado - Ni siquiera había usado esto antes y me dije que ASP es débil. , parece... Soy tan mayor que ni siquiera entiendo que no hay base ni derecho a hablar. Jaja...), así que, en un ataque de ira, me di cuenta del problema de la codificación ASP. conversión mutua ese fin de semana. Déjele ver qué es ASP. ¡En realidad menosprecia tanto a ASP que se enoja mucho con solo pensarlo! ¡Por supuesto, mi investigación también llena el vacío en la investigación sobre conversión de codificación en el desarrollo ASP hasta ahora!
Ahora, vayamos al grano. Primero, comprendamos el proceso de conversión de codificación. Si queremos convertir la codificación de un fragmento de texto, necesitamos conocer el conjunto de codificación correspondiente al texto actual y luego usar la codificación correspondiente. configurado para leerlo. ¡Esta es la premisa es que la codificación se convierte correctamente (si este paso es incorrecto, el código convertido será una serie de códigos confusos)! Bien, después de encontrar la codificación actual y leerla correctamente, podemos usar el objeto Stream con la codificación de destino configurada para guardar el contenido en el archivo especificado. ¡En este punto, nuestra conversión de codificación es exitosa!
Echemos un vistazo a la implementación del código específico de la conversión de codificación ASP:
Copie el código de código de la siguiente manera:
'Convertir contenido de codificación El contenido a convertir, cset codificación de destino, ruta absoluta del archivo de destino de destino
Función TransferCharSet(contenido, cset, destino)
Corriente de objetos tenue
Establecer Objstream = Server.CreateObject(adodb.stream)
objstream.Modo =3
objstream.Charset = cset
objstream.Tipo = 2
objstream.Abrir
objstream.Escribir contenido de texto
objstream.Posición = 0
objstream.SaveToFile destino,2
objstream.Cerrar
establecer objstream = nada
Función final
'Lee el contenido especificado usando la codificación correspondiente
Función obtener contenido (ruta)
Corriente de objetos tenue
Establecer Objstream = Server.CreateObject (Adodb.Stream)
objstream.Charset = GetCharSetName(ruta)
objstream.Tipo = 2
objstream.Modo =3
'objstream.Charset = código
objstream.Abrir
Ruta Objstream.LoadFromFile
objstream.Posición = 0
getcontent = objstream.ReadText
objstream.Cerrar
establecer objstream = nada
Función final
'Obtiene el nombre de codificación del contenido especificado
Función GetCharSetName(ruta)
Establecer objstream=server.createobject(Adodb.Stream)
objstream.Tipo=1
objstream.modo=3
objstream.abierto
objstream.Posición=0
ruta objstream.loadfromfile
bintou=objstream.read(2)
Si AscB(MidB(bintou,1,1))=&HEF y AscB(MidB(bintou,2,1))=&HBB Entonces
GetCharSetName=utf-8
De lo contrario, si AscB (MidB (bintou, 1,1)) = & HFF y AscB (MidB (bintou, 2,1)) = & HFE entonces
GetCharSetName=unicode
Demás
GetCharSetName=gb2312
Terminar si
objstream.cerrar
Establecer objstream = nada
Función final
Bien, después de este fragmento de código, ¡nuestro trabajo de conversión está completo! Espero que este artículo pueda brindar ayuda e inspiración a los entusiastas de ASP y otros entusiastas de los idiomas.
Finalmente lo que quiero decir es que aprender y usar lenguajes de programación no es difícil. Lo importante es usar más tu cerebro y pensar en cómo implementar las funciones que necesitas, en lugar de culpar a los demás y decir que el lenguaje es. demasiado débil.
Bueno, les deseo a todos una feliz programación. Escribiré sobre la conversión de codificación de asp aquí y publicaré más artículos originales personales interesantes en el futuro.