Aujourd'hui, lorsque je corrigeais le programme UTF-8 dans la barre de recherche, j'ai constaté que le document de format UTF-8 généré avait un code brouillé et que le fichier d'origine était
Le code de create_html.asp est le suivant:
La copie de code est la suivante:
<% @ Lingots = "vbscript" codepage = "65001"%>
<%
setObjrs = server.createObject ("scripting.fileSystemObject")
Conn = server.mappath ("example.xml")
setStream = Objrs.OpenTextFile (Conn, 1, True, -2)
contenu = stream.readall
Response.Write (Contenu)
stream.close
%>
La fonction pour implémenter ce code est: lire le texte, y compris le chinois de l'exemple.xml (format UTF-8), puis le sortir, mais chaque fois que la sortie est brouillée. Ce problème m'a vraiment dérangé pendant longtemps. Plus tard, il a été résolu avec l'aide des forums classiques "Xiao Han" et "Xiao Xiaoyu". Remerciez-les.
Peut-être que j'avais tort au début, mais maintenant le code correct est modifié comme suit, en utilisant le code donné par "Xiao Xiaoyu", y compris le contenu de lecture pour générer un nouveau document de format UTF-8. Le code détaillé est le suivant:
La copie de code est la suivante:
<% @ Lingots = "vbscript" codepage = "65001"%>
<% Réponse.codepage = 65001%>
<% Response.Charset = "UTF-8"%>
<%
'Déclarer les variables
digread_path, write_paht, contenu
'---- Lisez le contenu du fichier --------------------------------------------------------------------------------------------------------------------
FunctionReadTextFile (filepath, charse)
diable
setStm = server.createObject ("adodb.stream")
stm.type = 1'adtypebinary, lisez selon les données binaires
STM.Mode = 3'AdModeReadWrite, seuls 3 peuvent être utilisés ici pour utiliser d'autres et provoqueront des erreurs.
oupér
stm.loadfromfilefilepath
stm.Position = 0'move le pointeur vers le point de départ
STM.TYPE = 2'Text Data
STM.Charset = Charset
ReadTextFile = stm.readText
close
setStm = rien
Finition de fin
'--- Écrivez dans le fichier ------------------------------
SubWriteTextFile (FilePath, FileContent, Charset)
diable
setStm = server.createObject ("adodb.stream")
stm.type = 2'adtypeText, données de texte
STM.MODE = 3'ADMODERERDWRITE, LIRE ET ÉCRIRE, si ce paramètre utilise 2, il provoquera une erreur.