Schrijven naar een .txt bestand

[DaGroove]

Dag iedereen,

Ik heb programma geschreven, en dat slaat een bepaalde waarde op in een text bestandje. Nu is het probleem dat hij de waarde wel opslaat, maar dat er altijd een " " en een enter achter aan komen. Hierdoor wordt het bestand verkeerd ingelzen, en kapt het programma. Hoe lost ik dit op?

mvg

Wouter

 

[Bartuls]

Kun je de code posten waarmee je de gegevens naar het bestandje schrijft en waarmee je de gegevens uit het bestandje leest.
Dan kunnen we kijken wat er mis is.

 

[DaGroove]

Private Sub cmdChangePass_Click()
For i = 1 To Len(txtOldPassword)
letter = Mid(txtOldPassword, i, 1)
nr = (Asc(letter)) * 2 - (Asc(letter) * 49 - 5 / 2 + 3 + 90 - 4 + 2586)
pasCoded = pasCoded + nr
Next i

For i = 1 To Len(txtNewPassword)
letter = Mid(txtNewPassword, i, 1)
nr = (Asc(letter)) * 2 - (Asc(letter) * 49 - 5 / 2 + 3 + 90 - 4 + 2586)
txtPassword = txtPassword + nr

Next i

If txtOldPassword.Tag = pasCoded Then
Kill App.Path + "password.txt"

Open App.Path + "password.txt" For Output As #1
Print #1, txtPassword
Close #1
Else
MsgBox "Er heeft zich een fout opgetreden. Weet u zeker dat uw oude password goed is?"
End If

End Sub

-----Bovengegegeven code schrijft naar txt bestand----

----Code die alles inleest----
Open App.Path + "password.txt" For Input As #1
txtPassword.Tag = Input$(LOF(1), #1)
Close #1

 

[Bartuls]

Uit de VB Help:

Note If, at some future time, you want to read the data from a file using the Input # statement, use the Write # statement instead of the Print # statement to write the data to the file. Using Write # ensures the integrity of each separate data field by properly delimiting it, so it can be read back in using Input #. Using Write # also ensures it can be correctly read in any locale.

Als je de gegevens wegschrijft met behulp van Write # in plaats van Print # zou het goed moeten gaan.

 

[DaGroove]

Ik zal eens proberen...

tnx

W

 

[Dippo]

Het maakt opzich ook niet uit dat je Print gebruikt, als je maar Line Input #1, <string> gebruikt.
Dan mogen de " er gewoon wel staan.

 

[DaGroove]

Ik heb inmiddels gevonden hoe het werkt:

Open "bestandje.txt" as #1
line input #1, variableWaarinHetGeladenWordt
close #1

danke


mvg

Wouter