Discussion :

[kazylax]

Bonsoir,

Je viens de trouver un code mais je n'arrive pas a comprendre comment declaré les nom

Vb.net

Code :

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

1
2
3
4
5
6

PrivateSub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load
ofstream fichier;
fichier.open("wolfenstein.txt", ios::out | ios::trunc); 
fichier << nIp << " " << nPort << " " << nPasse << " " << nMod; 

Pouvez vous m'aider pour les déclarations des noms ?

Merci
Cordialement,

[smyley]

C'est du C++ ou du VB.Net ?
En tout cas il faudrait surement explorer les classes de System.IO ( nottement FileStream et StreamWriter ) ...

[Aspic]

C'est du C++ ou du VB.Net ?
En tout cas il faudrait surement explorer les classes de System.IO ( nottement FileStream et StreamWriter ) ...

En tout cas c'est pas du. NET, je déplace dans le C++

[nikko34]

euh le code qu'il a trouvé est peut être du C++, mais à la base ce ne serait pas une question VB?

[kazylax]

Bonjour,

si bien sur mais bon... il déplace les messages sans savoir.
c'est pas grave je ferme le sujet.

Pour info je fait que du VB.net donc merci si ya des reponses

Cordialement,

[Aspic]

Merci de le preciser dans le message d'origine !

On ne peux pas deviner vu que tu postes un code C++ sans un forum VB.NET

Cordialement Aspic

[kazylax]

Comment re mettre un code de se type en vb ?

[Aspic]

Comment re mettre un code de se type en vb ?

Bon je n'y connais rien en C++ donc explique ligne à ligne ce que ton code fait et j'essayerais de te le traduire en VB.NET

[kazylax]

Bonjour,

avec se code je voudrais le mettre dans mon appli en VB 2005
que les cases nIp nport se sauvegarde dans un txt pour que je puisse tout réavoir une fois l'appli re lancer

Avez vous compris ?

Cordialement,

[Aspic]

Bonjour,

avec se code je voudrais le mettre dans mon appli en VB 2005
que les cases nIp nport se sauvegarde dans un txt pour que je puisse tout réavoir une fois l'appli re lancer

Avez vous compris ?

Cordialement,

Oui ca va

Code :

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

1
2
3
4
5
  Private Sub Sauvegarder(ByVal nIp As String, ByVal nPort As Integer, ByVal Npass As String, ByVal Nmod As String)
        Dim flux As New IO.StreamWriter("Chemin de ton fichier texte", False)
        flux.Write(nIp & vbCrLf & nPort.ToString & vbCrLf & Npass & vbCrLf & Nmod) 'ecris les données
        flux.Close() 'ferme le fichier
    End Sub

[kazylax]

Salut,

Normalement il faut pas le mettre dans le Load du form ?

Code :

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

1
2
3
4
5
6
7

PrivateSub Form1_Load(ByVal nIp AsString, ByVal nPort AsInteger, ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load
Dim flux AsNew IO.StreamWriter("saveinfos.txt", False)
flux.Write(nIp & vbCrLf & nPort.ToString) 'ecris les données
flux.Close() 'ferme le fichier
EndSub

Cordialement,