PowerBuilder à Donf ! / Fichier texte

poche · 17-04-2007 14:36:04

Comment copier ce qui se trouve dans une variable string dans un fichier texte?

foon · 17-04-2007 14:50:24

Code: pb

string   ls_mystring
integer li_FileNum

ls_mystring = "Mon texte à moi"

li_FileNum = FileOpen("C:\Myfile.TXT", &

        LineMode!, Write!, LockWrite!, Append!)

FileWrite(li_FileNum, ls_mystring )

FileClose(li_FileNum)

poche · 17-04-2007 15:10:06

Et comment faire si je veux écrire à la ligne (simuler la toucher entrer)?
j'ai essayé ça mais sa marche pas:

Code: pb

string   ls_mystring
integer li_filenum

ls_mystring = "Bonjour"
li_filenum = fileopen("C:\bobi1.txt", &
        linemode!, write!, lockwrite!, append!)
filewrite(li_filenum, ls_mystring )
ls_mystring = "Comment vas tu?"
filewrite(li_filenum, ls_mystring )
fileclose(li_filenum)

[edit] [ code=pb ]

Dernière modification par eRaSorZ (17-04-2007 19:17:19)

foon · 17-04-2007 15:12:13

Il existe déjà ton fichier ou non?

foon · 17-04-2007 15:15:44

Si ton fichier "bobi1.txt" existe déjà, essayes le code ci-dessous:

Code: pb

string   ls_mystring
integer li_filenum

ls_mystring = "Bonjour ~r~n"
li_filenum = fileopen("C:\bobi1.txt", &
        linemode!, write!, lockwrite!, append!)
filewrite(li_filenum, ls_mystring )
ls_mystring = "Comment vas tu?"
filewrite(li_filenum, ls_mystring )
fileclose(li_filenum)

poche · 18-04-2007 06:11:33

Quel est la difference entre ~r et ~n?
Et sinon, quel est la commande pour effacer tout le texte du le fichier texte?

erasorz · 18-04-2007 07:10:26

en général Aide Powerbuilder + Google permettent de répondre à pas mal de questions....

poche a écrit:
Quel est la difference entre ~r et ~n?

DOC PB : ~r Carriage return ~n Newline or linefeed

GOOGLE/WIKI: CRLF

Et sinon, quel est la commande pour effacer tout le texte du le fichier texte?

soit tu le supprimes, soit tu écrase avec fileopen en mode Replace! ...

shahin · 18-04-2007 08:14:08

Mais Wikipédia ne donne pas la raison : pourquoi sous Windows, la touche "retour chariot" génére deux caractères ?
L'explication est simple : celà vient des machines à écrire.
Sur les machines à écrire, pour changer de lignes il fallait faire deux choses :
1) faire revenir le rouleau encreur à droite (ou le curseur à gauche) : retour chariot : ~r
2) descendre d'une ligne : ~n

M$ a repris ce système pour MS-DOS et pour des raisons de compatibilité ascendante, on se cogne ça sous Vista

erasorz · 18-04-2007 08:24:16

merci

Doctor Z · 18-04-2007 08:27:14

poche a écrit:
Et comment faire si je veux écrire à la ligne (simuler la toucher entrer)?
j'ai essayé ça mais sa marche pas:
Code: pb
string   ls_mystring
integer li_filenum

ls_mystring = "Bonjour"
li_filenum = fileopen("C:\bobi1.txt", &
        linemode!, write!, lockwrite!, append!)
filewrite(li_filenum, ls_mystring )
ls_mystring = "Comment vas tu?"
filewrite(li_filenum, ls_mystring )
fileclose(li_filenum)
[edit] http://pbadonf.fr/forum/img/puntoolbar/ … bt_pre.png [ code=pb ]

Bonjour,

Si je ne m'abuse, tu peux faire suivre ton string de :

Code: pb

Char (13) + Char (10)

pour obtenir un retour charriot.

poche, pour ton information, voici les caractères spéciaux

~t Tab
~r Carriage return
~n Newline or linefeed
~" Double quote
~' Single quote
~~ Tilde

foon · 18-04-2007 08:27:18

HS
Ouaaah! Je savais pas que Vista était compatible avec les machines à écrire Remington
Fin HS

Dernière modification par foon (18-04-2007 08:29:43)

erasorz · 18-04-2007 08:30:45

Doctor Z a écrit:
Bonjour,

Si je ne m'abuse, tu peux faire suivre ton string de :
Code: pb
Char (13) + Char (10)

CQFD!

Code: pb

char(13)+char(10)='~r~n'

poche · 18-04-2007 08:37:25

Et sinon, quel est la commande pour effacer tout le texte du le fichier texte?
a part :

Code: pb

li_filenum = fileopen("C:\bobi.rtf", &
          linemode!, write!, lockwrite!, Replace!  ) 
filewrite(li_filenum, "" )
fileclose(li_filenum)

[edit] [ code=pb ]

Dernière modification par poche (18-04-2007 08:37:50)

shahin · 18-04-2007 08:58:34

Exactement ce que tu as fait, mais tu peux supprimer la deuxième ligne (fileWrite).

Sinon, pour supprimer le fichier il existe FileDelete

erasorz · 18-04-2007 09:00:03

poche a écrit:
Et sinon, quel est la commande pour effacer tout le texte du le fichier texte?
a part :
Code: pb
li_filenum = fileopen("C:\bobi.rtf", &
          linemode!, write!, lockwrite!, Replace!  ) 
filewrite(li_filenum, "" )
fileclose(li_filenum)

ça ne te conviens pas ? trop de lignes de codes ? fais une fonction f_effacertoutletextedufichiertexte( as_nom_fichier )

erasorz · 18-04-2007 09:02:19

PS : merci d'utiliser la balise [ code=pb ] pour du code powerbuilder

poche · 18-04-2007 09:19:21

Si mon fichier texte n'existe pas, comment le créer par code?

foon · 18-04-2007 09:24:10

Deux solutions:

- Le créer à partir d'une datawindow avec la fonction SaveAs
- utiliser les API windows:
http://pbadonf.fr/forum/viewtopic.php?pid=194#p194

Dernière modification par foon (18-04-2007 09:34:14)

erasorz · 18-04-2007 11:17:01

poche a écrit:
Si mon fichier texte n'existe pas, comment le créer par code?

FileOpen

foon · 18-04-2007 11:31:30

eRaSorZ a écrit:
poche a écrit:
Si mon fichier texte n'existe pas, comment le créer par code?
FileOpen

Oups, effectivement il y a ça dans l'aide PB:

File not found If PowerBuilder does not find the file, it creates a new file, giving it the specified name, if the fileaccess argument is set to Write!.

Permettez-moi de me décerner le

Dernière modification par foon (18-04-2007 11:32:17)

poche · 18-04-2007 12:47:12

Comment savoir combien il y a de lignes dans mon fichier texte?

rincevent · 18-04-2007 12:58:33

Bonjour, merci, au revoir.

(comme ça c'est fait...)

erasorz · 18-04-2007 13:30:01

foon · 19-04-2007 08:00:26

poche a écrit:
Comment savoir combien il y a de lignes dans mon fichier texte?

Bon Poche, je te donne pas le code, mais une manière de procéder:

- Ouvrir le fichier en mode lineMode! et Read!
- Boucler sur le fichier en lisant ligne à ligne avec la fonction FileRead
- Dans la boucle, tu utilises un compteur pour déterminer le nombre de ligne lues
- Après la boucle, ne pas oublier le FileClose

Et voilà...

PB à toute heure et à tout moment. (à parcourir avec modération)

Annonce

#1 17-04-2007 14:36:04

Fichier texte

#2 17-04-2007 14:50:24

Re: Fichier texte

Code: pb

#3 17-04-2007 15:10:06

Re: Fichier texte

Code: pb

#4 17-04-2007 15:12:13

Re: Fichier texte

#5 17-04-2007 15:15:44

Re: Fichier texte

Code: pb

#6 18-04-2007 06:11:33

Re: Fichier texte

#7 18-04-2007 07:10:26

Re: Fichier texte

poche a écrit:

#8 18-04-2007 08:14:08

Re: Fichier texte

#9 18-04-2007 08:24:16

Re: Fichier texte

#10 18-04-2007 08:27:14

Re: Fichier texte

poche a écrit:

Code: pb

Code: pb

#11 18-04-2007 08:27:18

Re: Fichier texte

#12 18-04-2007 08:30:45

Re: Fichier texte

Doctor Z a écrit:

Code: pb

Code: pb

#13 18-04-2007 08:37:25

Re: Fichier texte

Code: pb

#14 18-04-2007 08:58:34

Re: Fichier texte

#15 18-04-2007 09:00:03

Re: Fichier texte

poche a écrit:

Code: pb

#16 18-04-2007 09:02:19

Re: Fichier texte

#17 18-04-2007 09:19:21

Re: Fichier texte

#18 18-04-2007 09:24:10

Re: Fichier texte

#19 18-04-2007 11:17:01

Re: Fichier texte

poche a écrit:

#20 18-04-2007 11:31:30

Re: Fichier texte

eRaSorZ a écrit:

poche a écrit:

#21 18-04-2007 12:47:12

Re: Fichier texte

#22 18-04-2007 12:58:33

Re: Fichier texte

#23 18-04-2007 13:30:01

Re: Fichier texte

#24 19-04-2007 08:00:26

Re: Fichier texte

poche a écrit:

Pied de page des forums