Here is the code I use to save Names in a .dat file.
How can I check first if the name already exists?
Thank you.
How can I check first if the name already exists?
Thank you.
Code:
Private Sub SaveNamesDat()
'----------------------------------------------------------------------
Dim intFileNbr As String
mstrName = txtName
intFileNbr = FreeFile
Open (App.Path & "\Names.dat") For Append As #intFileNbr
Print #intFileNbr, mstrName
Close #intFileNbr
End Sub