afficher contenu fichier

Le
kamel
Bonjour à tous,

J'aimerais savoir s'il existe un control en VB qui me permettrait d'afficher
le contenu d'un fichier et qui s'actualiserait quand le contenu du fichier
change.

Merci
Kamel
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Jean-marc
Le #15396721
kamel wrote:
Bonjour à tous,



Bonjour,

J'aimerais savoir s'il existe un control en VB qui me permettrait
d'afficher le contenu d'un fichier et qui s'actualiserait quand le
contenu du fichier change.



Non, un tel controle n'existe pas. Mais il est assez facile d'en faire
un en utilisant une Textbox et l'API "ReadDirectoryChangesW" :-)

Bonne prog !

--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
mailto: remove '_no_spam_' ;
FAQ VB: http://faq.vb.free.fr/
Jean-marc
Le #15396711
Jean-marc wrote:

Non, un tel controle n'existe pas. Mais il est assez facile d'en faire
un en utilisant une Textbox et l'API "ReadDirectoryChangesW" :-)

Bonne prog !



En fait on trouve même déjà du code tout prêt :
http://www.planet-source-code.com/URLSEO/vb/scripts/ShowCode!asp/txtCodeId!61052/lngWid!1/anyname.htm

http://www.eggheadcafe.com/aspnet_answers/VisualBasicwinapi/May2006/post26916331.asp

NOTE: le souci c'est que l'API oblige à utiliser un thread. Hors l'IDE de VB
déteste les threads. Il est donc très conseillé de débugger en dehors de
l'IDE,
à grand coup de Msgbox si nécessaire, comme au bon vieux temps!

--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
mailto: remove '_no_spam_' ;
FAQ VB: http://faq.vb.free.fr/
kamel
Le #15396701
Merci bcp à tous les 2

"Jean-marc" de news: 46bf54f8$0$13855$
Jean-marc wrote:

Non, un tel controle n'existe pas. Mais il est assez facile d'en faire
un en utilisant une Textbox et l'API "ReadDirectoryChangesW" :-)

Bonne prog !



En fait on trouve même déjà du code tout prêt :
http://www.planet-source-code.com/URLSEO/vb/scripts/ShowCode!asp/txtCodeId!61052/lngWid!1/anyname.htm

http://www.eggheadcafe.com/aspnet_answers/VisualBasicwinapi/May2006/post26916331.asp

NOTE: le souci c'est que l'API oblige à utiliser un thread. Hors l'IDE de
VB
déteste les threads. Il est donc très conseillé de débugger en dehors de
l'IDE,
à grand coup de Msgbox si nécessaire, comme au bon vieux temps!

--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
mailto: remove '_no_spam_' ;
FAQ VB: http://faq.vb.free.fr/




kamel
Le #15396691
au fait, comment affiche t on la totalité du contenu d'un fichier dans un
textbox ... :)

"Jean-marc" de news: 46bf54f8$0$13855$
Jean-marc wrote:

Non, un tel controle n'existe pas. Mais il est assez facile d'en faire
un en utilisant une Textbox et l'API "ReadDirectoryChangesW" :-)

Bonne prog !



En fait on trouve même déjà du code tout prêt :
http://www.planet-source-code.com/URLSEO/vb/scripts/ShowCode!asp/txtCodeId!61052/lngWid!1/anyname.htm

http://www.eggheadcafe.com/aspnet_answers/VisualBasicwinapi/May2006/post26916331.asp

NOTE: le souci c'est que l'API oblige à utiliser un thread. Hors l'IDE de
VB
déteste les threads. Il est donc très conseillé de débugger en dehors de
l'IDE,
à grand coup de Msgbox si nécessaire, comme au bon vieux temps!

--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
mailto: remove '_no_spam_' ;
FAQ VB: http://faq.vb.free.fr/




Jean-marc
Le #15396681
kamel wrote:
au fait, comment affiche t on la totalité du contenu d'un fichier
dans un textbox ... :)



Hello,

On prend un TextBox, on met la propriété Multiline à True, on
affiche éventuellement les scrollbars (propriété ScrollBars),
puis on lit le fichier d'un bloc, comme ceci:

Function ReadBufferFromFile(ByVal szFileName As String) As String
Dim f As Integer
Dim buf As String

f = FreeFile
Open szFileName For Binary As #f
buf = Space$(LOF(f))
Get #f, , buf
Close #f
ReadBufferFromFile = buf
End Function

puis on affiche comme cela:


Dim fileContent As String
Dim fn As String

fn = "c:data.txt"

fileContent = ReadBufferFromFile(fn)

Text1.Text = fileContent


Il faut en plus vérifier que le fichier existe:
http://faq.vb.free.fr/index.php?question)


N'hésite pas à consulter la FAQ du groupe, tu y trouveras
la réponse à de nombreuses questions, des conseils, des trucs
et astuces utiles, etc. : http://faq.vb.free.fr/


--
Jean-marc Noury (jean_marc_n2)
Microsoft MVP - Visual Basic
mailto: remove '_no_spam_' ;
FAQ VB: http://faq.vb.free.fr/
Publicité
Poster une réponse
Anonyme