problème d extraction du texte d une page web

Question

Bonjour, 
mon probleme est que j extrait le texte d une page web avec inte de vb6 sur mon ordinateur ça marche mais dans autre ordinateur ça marche pas
aider moi pour résoudre ce problème merci

LaluneBe · Answer

Bonjour,
  Compiler le programme et faire un Package de votre programme

eelguermat · Answer

Bonjour,
tout d'abord je remercie LaluneBe.
le problème c'est que l'extraction d'une page web sur mon ordinateur est complète par contre dans un autre ordinateur avec le meme programme est partielle (une seule partie de la page est extraite)
merci de m'aider

vb95 · Answer

Bonjour !
1) comment mets-tu ton programme sur l'autre ordinateur ?
2) L'ordi du projet et celui qui sert de cible ont-ils le même système d'exploitation ?
3) L'extraction d'une page se fait-elle par rapport au contenu de l'écran ? Dans ce cas les résolutions d'écran sont elles identiques ?
Et des questions il y en aurait encore si on pousse plus loin 
Autre chose : VB 6 est obsolète et plus mis à jour depuis longtemps ! Est-il encore compatible avec les nouveaux navigateurs ?
Sans plus de précisions ou de code difficile de t'aider

eelguermat · Answer

Bonjour
le code suivant:
Inet1.url = "www.xe.com/currencyconverter/customize.php"
StrHtm = Inet1.OpenURL
la variable StrHtm donne tout le texte de la page web sur mon ordin par contre sa donne seulement une partie de texte de la page web dans autres ordin.

elguermat · Answer

Bonjour
pour la réponse au questions
je compile mon programme dans l'autre ordinateur de la même façon que celle de mon ordinateur c.a.d la même source et le même langage de programmation
les ordinateurs ont le même système d'exploitation
la résolution est la même.
les textes obtenus ne sont pas les même.

elguermat · Answer

Bonjour,
 je l'ai déjà fait, même problème.

quand j'installe mon programme dans autres ordinateurs ça marche immédiatement dans certains ordinateurs , mais dans autres ordinateurs ça marche pas, ça donne juste une partie texte de la page web presque 256 caractère.
Merci

vb95 · Answer

Alors je ne sais pas !
Peut-être un problème avec le navigateur Internet lorsque celui-ci est différent de celui ayant servi à créer le projet ? 
Soit ton PC de développement avec Firefox par exemple .
Tu installes ton projet avec le setup sur un autre PC qui a Firefox comme navigateur : est-ce ton logiciel fonctionne ?
Tu installes ton projet avec le setup sur un autre PC qui a Google Chrome comme navigateur : est-ce ton logiciel fonctionne ?

C'est peut-être une piste mais sans certitude .......

elguermat · Answer

Bonjour,
je pense que c'est le problème de navigateur, moi j'utilise Chrome.

VieuxBasic · Answer

Salut,
sur la page d'exemple donnée, tu as les caractères spéciaux:
 "™ — " 
Ces caractères ne sont peut-être pas supportés par d'autres navigateurs que "chrome" avec ton code, et qui bloques ou décalent l'encodage de la police.

Regarde comment sort ton texte StrHtm avec ces caractères spéciaux!

Car si un CHR(0) est injecté dans la chaîne, tu auras une terminaison de variable.

VieuxBasic · Answer

Salut à tous,

Nous somme toujours en présence de la limitation du Visual Basic 6, en matière d'encodage de caractères.
Pour l'intervenant, il ne faut pas la chaîne de retour, directement dans une 'textbox' ou une chaîne string.
Le résultat du retour objet sera utilisé en tant que caractères UNICODE, mais en chaîne brute.

Dans l'URL exemple, nous avons : 
<meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>

Donc, on mets de l'UTF8 dans une chaîne encodée en UTF16 !
D'où une erreur d'encodage de caractère sur certains caractères.
Les caractères français passeront, mais pas les caractères spéciaux.
La solution est convertir cette chaîne de sortie en brut, avant d'assigner une variable ou un objet.

Il nous faut :
Inet1.url = "www.xe.com/currencyconverter/customize.php" 
  
StrHtm = WideCharToMultiByte (CP_UNICODE, 0&, ByVal StrPtr(Inet1.OpenURL), -1, vbNull, 0&, 0&, 0&)

(ou CP_UTF-16 car identique)

Ainsi, la chaîne brut est envoyée dans la fonction sans reformatage UTF8>UNICODE...

Pour les variables et l'implantation de WideCharToMultiByte, voir les exemples documentés sur le net.

elguermat · Answer

Bonjour
Je vous remercie infiniment.
j'ai utilisé la fonction WideCharToMultiByte, et ça donné une chaîne vide.
SVP Donner moi un exemple d’utilisation de cette fonction merci.

VieuxBasic · Answer

Salut elguermat,
;)

Désolé, les liens sont interdit sur ce forum, et copier du code qui ne te conviendra pas est ridicule.

Tu te dois d'être curieux... car j'ai trouvé un exemple très rapidement sur un moteur de recherche.

Essai les bonnes combinaisons par ordre d'importance sans chercher à composer une phrase compréhensible.
"VB6 WideCharToMultiByte function"

Et paf... ta réponse.

Fais le test sans "StrPtr" qui pointe sur une variable... car ici, c'est une variable objet, qui n'est pas traitée de la même façon!

Allez courage!

Problème d extraction du texte d une page web

12 réponses

Votre réponse

Discussions similaires