Discussion :

[Tropic]

Bonjour,

Voila un exemple qui fonctionne très bien
si je met Option Strict Off

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim TableauString(100) As String 
Dim FF As Integer = FreeFile
FileOpen(FF, "NomFichier", OpenMode.Binary, OpenAccess.Read)
 FileGet(FF, TableauString)
FileClose(FF)

j'ai bien les bonnes valeurs dans TableauString()

Quelle est le typage pour Option Strict On
ou un code équivalent

[Pol63]

ce code n'est pas du vb.net (ou alors du code de compatibilité, auquel cas ne pas l'utiliser !)

[tomlev]

Ca c'est du code VB6... mieux vaut le convertir en VB.NET. Ca doit donner quelque chose comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Dim TableauString As String() = File.ReadAllLines("NomDuFichier")

[Tropic]

bonjour,

Merci d'essayer de me dépanner

c'est du vb.net mais compatibilité

Voila l'equivalent de VB6

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
FF = FreeFile
    Open NomDuFichier For Binary Access Read As FF
        Get FF, , TableauString
    Close FF

J'ai déjà essayé File.ReadAllLines("NomDuFichier")
mais mon TableauString = Nothing

Il faut savoir qu'en VB6
un Put FF, , TableauString n'enregistre pas les lignes avec chr(13)+Chr(10)
mais avec un caractère NULL

Je débute en .net et j'ai le réflexe du code VB6

[tomlev]

c'est du vb.net mais compatibilité

Oui, c'est bien ce que j'avais compris... Mais il vaut mieux laisser tomber cette couche de compatibilité, ça t'apportera que des problèmes. Autant apprendre tout de suite à utiliser les classes .NET

un Put FF, , TableauString n'enregistre pas les lignes avec chr(13)+Chr(10)
mais avec un caractère NULL

aie
Ca c'est moche...
C'est un fichier qui existe déjà et que tu essaies de relire ? ou un fichier écrit par ton programme ? dans le 2e cas, je te suggère d'utiliser plutôt File.WriteAllLines pour l'écrire.

De toutes façons, c'est une drôle d'idée d'écrire du texte dans un fichier en mode binaire

[Tropic]

C'est un fichier qui existe déjà et que j' essaies de relire!
Je n'arrive pas à trouver la bonne méthode.

[Pol63]

au lieu de faire un readalllines, il est possible de faire readalltext, puis de faire un split sur le caractère null, tu auras un tableau de string avec les lignes quand meme
(ou sinon un readallbytes puis un split ou repalce de chr(0) par vbcrlf puis un split pour avoir les lignes)

par contre en .net on utilise plus trop les tableaux, les collections sont beaucoup plus pratique !