Comment savoir si un fichier est au format RTF

Résolu
Anonyme209 Messages postés 681 Date d'inscription   Statut Membre Dernière intervention   -  
Anonyme209 Messages postés 681 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je programme un traitement de texte en VB, et j'aimerais savoir comment détecter si le fichier sélectionné est en format RTF (Rich Text Format).
Comme vous le savez, une RichTextBox peut contenir du texte (EX: RichTextBox1.Text) ou du code RTF (EX: RichTextBox1.RTF)
L'opération RichTextBox1.RTF ne marche que si le fichier sélectionné est en RTF.
J'aimerais donc savoir comment faire pour repérer si un fichier est au format RTF.
Ce qui devrai donner un truc du genre: 
If [code de vérification format du fichier (ex "C:\test.txt")] = Format.RTF Then
      RichTextBox1.RTF = System.IO.File.ReadAllText("C:\test.txt")
Else
      RichTextBox1.Text = System.IO.File.ReadAllText("C:\test.txt")
End if

Cdt,

Anonyme209

A voir également:

6 réponses

Réponse 1 / 6
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Bonjour,
Un essai ? 
        Dim LeFichier As String = "C:\Test1\Test2\FichierText.rtf"
        Dim Ext As String = LCase(Microsoft.VisualBasic.Right(LeFichier, 3))
        If Ext = "rtf" Then
            RichTextBox1.LoadFile(LeFichier)
        ElseIf Ext = "txt" Then
            RichTextBox1.Text = System.IO.File.ReadAllText(LeFichier)
        Else
            MsgBox("Ce fichier ne peu être charger dans ce composant")
        End If
A+

0
Réponse 2 / 6
Anonyme209 Messages postés 681 Date d'inscription   Statut Membre Dernière intervention   16
 
Bonjour,

Ta réponse sert à récupérer l'extension.
On peut très bien modifier l'extension manuellement, ce qui fait qu'un fichier ayant pour extension .RTF ne contient pas forcement du code RTF
N'y a t'il pas un moyen pour savoir si le fichier peut être lu par le programme, comme par exemple Word ou OpenOffice?
0
Réponse 3 / 6
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
beh Try /Catch... ça sert à quoi ?
0
Réponse 4 / 6
Anonyme209 Messages postés 681 Date d'inscription   Statut Membre Dernière intervention   16
 
Peut-tu m'expliquer comment on utilise Try /Catch?
Je ne connais pas trop les fonctions Try

Cdt,

Anonyme209
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 6
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Dans VB2010 y a aussi l'aide...
Dans une procédure quelconque tu tape TRY, tu double clic dessus pour le mettre en surbrillance et tu tape F1.
A+
0
Réponse 6 / 6
Anonyme209 Messages postés 681 Date d'inscription   Statut Membre Dernière intervention   16
 
Merci beaucoup,

C'est exactement ce que je cherchais!
Ça marche!

Voici le code: 

Try
      RichTextBox1.Rtf =          System.IO.File.ReadAllText(OpenFileDialog1.FileName)
Catch ex As Exception
      RichTextBox1.Text =   System.IO.File.ReadAllText(OpenFileDialog1.FileName)
End Try
0
Anonyme209 Messages postés 681 Date d'inscription   Statut Membre Dernière intervention   16
 
Ca ne montre pas comment détecter le format d'un fichier,
mais ca sert à détecter si la RichTextBox peut lire le fichier, ce qui est presque pareil.
0

Discussions similaires

question pix mot caché
aorum10 -
astrid-g85 -

6 réponses