[Equivalent .NET]

Fermé

Utilisateur anonyme - 21 déc. 2005 à 13:54
Utilisateur anonyme - 22 déc. 2005 à 13:00

Bonjour,

Est-ce que quelqu'un pourrait me donner un équivalent de cette ligne en VB .NET s'uil vous plait ?

Open "Fichier.txt" For Output As #1

A voir également:

[Equivalent .NET]
Paint net - Télécharger - Dessin & Illustration
Net framework - Télécharger - Divers Utilitaires
Equivalent word gratuit - Guide
Paint net mac ✓ - Forum MacOS
Darkino net - Guide

9 réponses

Réponse 1 / 9

teebo Messages postés 33491 Date d'inscription jeudi 14 octobre 2004 Statut Modérateur Dernière intervention 24 février 2011 1 793
21 déc. 2005 à 14:56

Salut,

http://tinyurl.com/74yc5 (MSDN)

Réponse 2 / 9

Utilisateur anonyme
21 déc. 2005 à 15:44

ok merci beaucoup et est-ce que tu sais comment placer le contenu d'une Richtextbox dans un fichier texte ? (en utilisant une savefiledialog) ?

Réponse 3 / 9

teebo Messages postés 33491 Date d'inscription jeudi 14 octobre 2004 Statut Modérateur Dernière intervention 24 février 2011 1 793
21 déc. 2005 à 15:56

Ben tu as déjà ouvert ton fichier (en utilisant le savedialog), tu prends la propriété text de ta richtextbox et tu la colles dans le fichier non?
J'ai l'impression que avec l'intelisense de studio tu devrais savoir faire ça tout seul non?

Réponse 4 / 9

Utilisateur anonyme
21 déc. 2005 à 16:25

Et bien écoute j'ai bien peur que non lol. En fait j'ai un problème avec les savefiledialog: j'arrive à créer le fichier texte dans un répertoire voulu mais le problème c'est que ce fichier est totalement vièrge. Moi, je souhaite que dans ce fameux fichier le texte de ma RichTextBox soit enregistré. Tiens mon code actuel:

Private Sub EnregistrerToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EnregistrerToolStripMenuItem.Click
On Error Resume Next
Dim s As String
Dim myStream As IO.Stream
Dim saveFileDialog1 As New SaveFileDialog()
SaveFileDialog1.InitialDirectory = "c:\Programmes CN\" & SaveFileDialog1.FileName
SaveFileDialog1.Filter = "Fichiers texte(*.txt)|*.txt"
SaveFileDialog1.FilterIndex = 2
SaveFileDialog1.RestoreDirectory = True
If SaveFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
myStream = SaveFileDialog1.OpenFile()
If Not (myStream Is Nothing) Then
'Il manque cette partie je pense
myStream.Close()
End If
End If
End Sub

Tu peux m'aider s'il te plait.

teebo Messages postés 33491 Date d'inscription jeudi 14 octobre 2004 Statut Modérateur Dernière intervention 24 février 2011 1 793
21 déc. 2005 à 16:43

Donc tu as déja le maniement de la "savedialog" box.

Il te manque un :

myStream.Write(myRichText.Text)

Par contre il faudra peut être changer

 Dim myStream As IO.Stream

 Dim myStream As IO.StreamWriter

et peut être changer deux trois bricoles pour l'initialisation.

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

Posez votre question

Réponse 5 / 9

Utilisateur anonyme
21 déc. 2005 à 21:58

J'ai un problème si je change la ligne:

Dim myStream As IO.StreamWriter

alors j'ai une erreur sur la ligne:

myStream = saveFileDialog1.OpenFile

avec l'erreur: Value of type 'System.IO.Stream' cannot be converted to 'System.IO.TextWriter'.

Réponse 6 / 9

teebo Messages postés 33491 Date d'inscription jeudi 14 octobre 2004 Statut Modérateur Dernière intervention 24 février 2011 1 793
22 déc. 2005 à 09:51

Ca fait partie des petits changements dont je parlais, il faut que tu dises:

myStream=new IO.StreamWriter(saveFileDialog1.FileName)

(Note générale, je ne connais pas VB.Net, seulement C# donc j'essaye de mettre la bonne syntaxe mais c'est sans garantie, par contre les fonctions sont les bonnes :) )

Réponse 7 / 9

Utilisateur anonyme
22 déc. 2005 à 11:57

Ok merci beaucoup ca marche sans problème.

Par contre je souhaiterais également programmer un OpenFileDialog; voici mon code jusqu'à maintenant:

On Error Resume Next
Dim s As String
Dim myStream As IO.TextReader
Dim OpenFileDialog1 As New OpenFileDialog()
OpenFileDialog1.InitialDirectory = "c:\Programmes CN\" & OpenFileDialog1.FileName
OpenFileDialog1.Filter = "Fichiers texte(*.txt)|*.txt"
OpenFileDialog1.FilterIndex = 2
OpenFileDialog1.RestoreDirectory = True
If OpenFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
myStream = New IO.StreamReader(OpenFileDialog1.FileName)
If Not (myStream Is Nothing) Then
'myStream.Read(SaveFileDialog1.Text) ERREUR ICI
myStream.Close()
End If
End If

Tu sais comment résoudre le problème parce que la boîte s'ouvre mais quand je sélectionne le fichier le contenu n'apparait pas dans ma richtextbox

Réponse 8 / 9

teebo Messages postés 33491 Date d'inscription jeudi 14 octobre 2004 Statut Modérateur Dernière intervention 24 février 2011 1 793
22 déc. 2005 à 12:10

Il faut que tu utilises:

http://tinyurl.com/8xv2k (MSDN)

cette fonction...

Il faut aussi que tu aprennes à utiliser MSDN, soit la version internet, soit la version locale si tu en as une.

Réponse 9 / 9

Utilisateur anonyme
22 déc. 2005 à 13:00

Désolé mais ca ne fait pas très mlogtemps que j'utilise VB.NET j'ai encore du mal. Tiens mon code:

On Error Resume Next
Dim myStream As IO.StreamReader
Dim openFileDialog1 As New OpenFileDialog()
openFileDialog1.InitialDirectory = "c:\Programmes CN\"
openFileDialog1.Filter = "Fichiers texte(*.txt)|*.txt"
openFileDialog1.FilterIndex = 2
openFileDialog1.RestoreDirectory = True
If openFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
myStream = New IO.StreamReader(SaveFileDialog1.FileName)
If Not (myStream Is Nothing) Then
' Insert code to read the stream here.
myStream.Close()
End If
End If

Encore une instruction manquante au même endroit.

Discussions similaires

Photo commençant par ce lien : https://mmsp.onoffapp.net/

a propos de youppie

Quel est l'équivalent 40 GO d'internet en heures ?

ERR_UNKNOWN_URL_SCHEME : Problème de redirection

Processeur 98% gestionnaire des taches

Discussions similaires

Newsletters