Public Sub enregistrement(ByVal user As String, ByVal pass As String) Dim fp As New System.IO.FileStream(".pass", FileMode.OpenOrCreate, FileAccess.Write) Dim str As New StreamWriter(fp,Encoding.UTF8)'permet d'enregistrer convenablement les accents str.BaseStream.Seek(0, SeekOrigin.End) str.WriteLine(user & ":" & pass) str.Write(user & ":" & pass & ControlChars.CrLf)'c tout a fait pareil mais bon c pour montrer str.Flush()'ca sert a rien vu que des qu'on ferme la "connexion" la memoire est automatiquement vidée... mais bon c pour montrer a quoi cette fonction sert str.Close() ftp() End Sub
Merci pour ton code, il m'a servi a effectuer une lecture de texte contenant des accents. Cependant pour se faire, j'ai du utiliser Encoding.UTF7 sinon avec UTF8, mes caractères accentués n'aparaissaient pas.
Merci beaucoup Ronanry, votre code marche impecc, et merci à Lapatoshe aussi car il m'a fallu aussi utiliser UTF7 pour que les accents soient gardés.
ravi que ce bout de code serve encore 7 ans apres :)
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte
1 873 542 membres 54 nouveaux aujourd'hui 16 151 membres club