Répétez apres moi :J'aime PBAdonf. J'aime PBAdonf. J'aime PBAdonf.

Le forum (ô combien francophone) des utilisateurs de Powerbuilder.

Recherche rapide

Annonce

Certaines rubriques, dont des cours, sont uniquement visibles par les membres du forum ^^.
Dans la rubrique Liens & Références, vous avez accès à un sommaire de téléchargement, profitez-en !
Il existe maintenant un nouveau TOPIC "Votre CV en Ligne" accessible uniquement par demande.

#1 28-10-2022 08:35:01

poff  
Membre Geek
Date d'inscription: 18-03-2010
Messages: 27
Pépites: 148
Banque: 0

Bugs PB 12.6 lecture fichier

Bonjour à tous,

J'utilise Pb PB 12.6 Build 3506.

J'ai un réel soucis lors de la lecture d'un fichier zip ansi (par exemple 186 955 caractères).



****** Test n° 1 ******

Code: pb

lblob_lect = blob("")
li_file = FileOpen(ls_fic_64_ansi,StreamMode!,Read!,Shared!,Append!,EncodingANSI!) 
ll_len_blob = FileReadEx(li_file,lblob_lect)
FileClose(li_file)


-> La chaine lue lblob_lect a la bonne longueur mais on récupère des caractères chinois.




****** Test n° 2 ******

Code: pb

lblob_lect = blob("")
OleObject lole_fso

// TristateFalse (0) Ouvre le fichier en ASCII.
// TristateTrue (-1) Ouvre le fichier en Unicode.
// TristateUseDefault (-2) Ouvre le fichier en utilisant le paramètre système par défaut
lnTristate = -1

lole_fso = create OleObject
li_ret = lole_fso.ConnectToNewObject("Scripting.FileSystemObject")
lblob_lect = lole_fso.OpenTextFile(ls_fic_64,1,true,lnTristate).readall()

ll_len_blob = len(lblob_lect)
destroy lole_fso


-> lnTristate = 0  -> La chaine lue lblob_lect fait 10 caractères et visiblement les 10 caractères sont corrects
-> lnTristate = -1 -> La chaine lue lblob_lect n'a pas la bonne longueur et on récupère des caractères chinois
-> lnTristate = -2 -> La chaine lue lblob_lect fait 10 caractères et visiblement les 10 caractères sont corrects


****** Test n° 3 ******

Code: pb

OleObject lole_objStream
blob lblob_data

lblob_lect = blob("")

lole_objStream = create OleObject
li_ret = lole_objStream.ConnectToNewObject("ADODB.Stream")


lole_objStream.CharSet = "us-ascii"
lole_objStream.Open
lole_objStream.LoadFromFile(ls_fic_64_ansi)

lblob_lect = lole_objStream.ReadText()
ll_len_blob = len(lblob_lect)

lole_objStream.close()
destroy lole_objStream


-> La chaine lue lblob_lect fait 10 caractères et visiblement les 10 caractères sont corrects




Merci d'avance pour votre aide

Jean-Paul

Hors ligne

 

#2 28-10-2022 10:23:01

xlat  
0xc0000005
Award: bf
Lieu: Tanger (طنج)
Date d'inscription: 04-12-2010
Messages: 717
Pépites: 11,337
Banque: 100,221,387,868,884,300
Site web

Re: Bugs PB 12.6 lecture fichier

Salut,
Est-ce que tu ne chercherais pas à lire un fichier texte ANSI à l'intérieur d'un fichier ZIP (binaire) ?


https://lut.im/eJINqa9o/vAtyxD0h "Don't believe everything you read on the Internet"
    -- Abraham Lincoln

www.ngs.ma

Hors ligne

 

#3 28-10-2022 10:47:05

poff  
Membre Geek
Date d'inscription: 18-03-2010
Messages: 27
Pépites: 148
Banque: 0

Re: Bugs PB 12.6 lecture fichier

Non, je veux lire tout un fichier zip ANSI afin de le stocker dans une variable blob pour ensuite la crypter en base64 et uploader un site web.
Par ailleurs, quand j'ouvre un fichier avec notepad ou notepad++ et que l'encodage est réputé UTF8, l'ordre  FileEncoding(«fichier») Retourne EncodingANSI!.

Hors ligne

 

#4 28-10-2022 13:42:33

xlat  
0xc0000005
Award: bf
Lieu: Tanger (طنج)
Date d'inscription: 04-12-2010
Messages: 717
Pépites: 11,337
Banque: 100,221,387,868,884,300
Site web

Re: Bugs PB 12.6 lecture fichier

Mais un fichier zip étant un fichier binaire tu ne peux le lire en clair sans passer par une lib...


https://lut.im/eJINqa9o/vAtyxD0h "Don't believe everything you read on the Internet"
    -- Abraham Lincoln

www.ngs.ma

Hors ligne

 

#5 28-10-2022 13:51:50

poff  
Membre Geek
Date d'inscription: 18-03-2010
Messages: 27
Pépites: 148
Banque: 0

Re: Bugs PB 12.6 lecture fichier

« passer par une lib... » Quid ?

Hors ligne

 

#6 28-10-2022 15:11:36

xlat  
0xc0000005
Award: bf
Lieu: Tanger (طنج)
Date d'inscription: 04-12-2010
Messages: 717
Pépites: 11,337
Banque: 100,221,387,868,884,300
Site web

Re: Bugs PB 12.6 lecture fichier


https://lut.im/eJINqa9o/vAtyxD0h "Don't believe everything you read on the Internet"
    -- Abraham Lincoln

www.ngs.ma

Hors ligne

 

#7 31-10-2022 10:04:58

buck  
Modérateur
Lieu: Dijon
Date d'inscription: 31-07-2008
Messages: 747
Pépites: 1,028,843
Banque: 171,170,849,654

Re: Bugs PB 12.6 lecture fichier

Bonjour,

Ou passer au minimum à une version Powerbuilder 2019, la compression zip est nativement prise en charge (CompressorObject).

Hors ligne

 

Pied de page des forums

Propulsé par FluxBB 1.2.22