Comment créer un fichier .txt
vide à l'emplacement C:\my files\2010
à l'aide de VB.NET?
Voici une seule ligne qui créera (ou écrasera ) le fichier:
File.Create("C:\my files\2010\SomeFileName.txt").Dispose()
Remarque: appeler Dispose () garantit la fermeture de la référence au fichier.
Vous pouvez également vouloir vérifier si le fichier existe déjà pour éviter de le remplacer par accident (à moins que ce ne soit bien entendu l'idée
Dim filepath as String = "C:\my files\2010\SomeFileName.txt"
If Not System.IO.File.Exists(filepath) Then
System.IO.File.Create(filepath).Dispose()
End If
Vous pouvez essayer d’écrire dans le dossier Documents. Voici une fonction de "débogage" que j'ai créée pour les besoins de débogage de mon projet:
Private Sub writeDebug(ByVal x As String)
Dim path As String = System.Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments)
Dim FILE_NAME As String = path & "\mydebug.txt"
MsgBox(FILE_NAME)
If System.IO.File.Exists(FILE_NAME) = False Then
System.IO.File.Create(FILE_NAME).Dispose()
End If
Dim objWriter As New System.IO.StreamWriter(FILE_NAME, True)
objWriter.WriteLine(x)
objWriter.Close()
End Sub
Il existe d'autres dossiers standard auxquels vous pouvez accéder via l'objet "SpecialFolder".
open C:\myfile.txt for append as #1
write #1, text1.text, text2.text
close()
C'est le code que j'utilise dans Visual Basic 6.0 . Cela m'aide à créer un fichier txt sur mon lecteur, à y écrire deux données, puis à fermer le fichier ... Essayez-le ...
Vous pouvez simplement utiliser ceci
FileOpen(1, "C:\my files\2010\SomeFileName.txt", OpenMode.Output)
FileClose(1)
Cela ouvre le fichier remplace ce qu'il contient et ferme le fichier.