Macro pour lire page source html sur le web
Résolu/Fermé
A voir également:
- Createunoservice
- Lire le coran en français pdf - Télécharger - Histoire & Religion
- Comment supprimer une page sur word - Guide
- Lire epub sur pc - Guide
- Web office - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
1 réponse
OOoForum
Messages postés
3873
Date d'inscription
jeudi 20 mars 2008
Statut
Membre
Dernière intervention
2 janvier 2025
960
24 avril 2015 à 09:02
24 avril 2015 à 09:02
Sans voir le fichier HTML, il est toujours délicat d'apporter une réponse.
Une ouverture en mode binaire pourrait peut être être une solution :
https://forum.openoffice.org/fr/forum/ftopic2372.html
.
Une ouverture en mode binaire pourrait peut être être une solution :
https://forum.openoffice.org/fr/forum/ftopic2372.html
.
24 avril 2015 à 17:14
Effectivement j'ai procédé de la manière suivante:
sf = createUnoService("com.sun.star.ucb.SimpleFileAccess")
fileStream = sf.openFileRead(monurl)
myTextFile = createUnoService("com.sun.star.io.TextInputStream")
myTextFile.InputStream = fileStream
myTextFile.Encoding = "ISO-8859-15"
page_html = ""
Do while not myTextFile.IsEOF
ligne = myTextFile.readLine
page_html = page_html & ligne
Loop
fileStream.closeInput
myTextFile.closeInput
et j'obtiens le source avec les accents et les ç.
Encore merci.
J-Luc