Thread obsoleto input output per vb08

[Mort3x]

salve ho un problema con un po d codici

seguo la guida di R3trosaction

http://www.sciax2.it/forum/guide-e-t...put-45349.html

cecando d trasformarli in vb8

sn riuscito solo a fare questo

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim Secret As IO.StreamReader = New System.IO.StreamReader("secret.ini")
end sub

ma qnd poi scrivo

me.textbox1 = Secret

mi da errore

Errore 1 Impossibile convertire il valore di tipo 'System.IO.StreamWriter' in 'System.Windows.Forms.TextBox'. C:\Users\Andrea\AppData\Local\Temporary Projects\test\Form1.vb 9 23 test


cosa faccio ??


:ciao::ciao:

 

[R3tr0s]

per vb8 mi sembra che è uguale :S


invece di print in vb8 puoi usare write
:lol:

 

[Mort3x]

r3tro e diverso puoi aiutarmi ho provato con write ma nn fa

 

[R3tr0s]

dimmi il codice competo che inserisci..

 

[Mort3x]

io provo il tuo codice riesco a modificarlo ma mi da come errori gli #

 

[R3tr0s]

per esempio per scrivere in un file devi fare:

Open app.path +"\" + "nomefile.estensione" For Output As #1
Print #1, Text1
Close #1

fai così?

 

[Mort3x]

Write App.Path + "\" + "secret.ini", For Input As #1
Me.Textbox1 = Input(LOF(1), #1)
Close #1
Me.TextBox1.Text = Me.Text
End Sub

le scritte in rosso le da come errori

 

[R3tr0s]

che c'entra write la :S

devi mettere Open

scrivi così:

Open App.Path + "\" + "secret.ini", For Input As #1
Textbox1 = Input(LOF(1), #1)
Close #1
TextBox1.Text = me.Text
End Sub

ripeto non lo so molto bene vb8 :S

 

[PaoloNike]

ho convertito questa mattina i codici della guida di r3tros, leggete qui