[ASP] Encodage

Encodage [ASP] - ASP - Programmation

Marsh Posté le 01-03-2004 à 00:09:52    

Je dois réaliser une appli qui télécharge à distance des pages en jap, anglais, hébreu, russe dans des charset donc très divers et enregistrer le résultat de ces pages sur le disque de mon serveur en UTF-8.  
 
J'ai cherché un peu sur le web et on parle de la méthode adodb.stream qui permet de changer l'encodage.  
 
 

Code :
  1. <%@ language=vbscript enablesessionstate=false
  2. CodePage=65001%>
  3. <%
  5. sFile = server.mappath("canon.htm" )
  6. sFile2 = server.mappath("canon2.htm" )
  7. sURL = "http://www.canon.ru/"
  9. 'Récupération de la page
  11. Set objXMLHTTP = server.CreateObject("MSXML2.serverXMLHTTP" )
  12. objXMLHTTP.Open "GET", sURL, False
  13. objXMLHTTP.Send
  15. 'Ecriture du fichier 1 en binaire sans modif qui reste en cyrillique
  16. set fichier1 = server.CreateObject("ADODB.Stream" )
  17. fichier1.type = 1
  18. fichier1.open
  19. fichier1.write objXMLHTTP.responseBody
  20. fichier1.savetofile sFile, 2
  21. fichier1.close
  22. set fichier1 = nothing
  25. 'Ecriture du fichier 2 mais en précisant le charset UTF-8
  26. Set fichier2 = server.CreateObject("ADODB.Stream" )
  27. fichier2.Open
  28. fichier2.LoadFromFile sfile
  29. fichier2.Charset = "UTF-8"
  30. fichier2.SaveToFile sFile2,  2
  31. fichier2.Close
  32. set fichier2 = nothing
  36. %>


 
 
Je pensais que celà allait traduire le fichier 2 en UTF-8 alors qu'à premiere vue, il n y a que les entetes qui sont modifié et celà reste un fichier cyrillique au lieu d etre un UTF-8


Message édité par InterSQL le 01-03-2004 à 00:10:33
Reply

Marsh Posté le 01-03-2004 à 00:09:52   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed