Shoutbox

i was just sorting out my systme, and i thought about adding an option to create a user. so how would i go about doing this?
would i have to write the information to a file? if so how ?

i have written a code i think i got the basics, but i want to know how to put the information in the file in the format userame|password
the code doesnt work, as in i type in the info and click ok but it just disappears and nothing appears in the txt file. also how do i mask the password characters?

code:

---

Dim Filename As String

Private Sub cmdCancel_Click()
Unload Me
End Sub

Private Sub cmdOK_Click()
    Dim Username As String
    Dim Password As String
    Username = txtUsername.Text
    Password = txtPassword.Text
    Open Filename For Append As #1
    Write #1, Username, Password
    Close #1
    txtUsername.Text = " "
    txtPassword.Text = " "
    txtUsername.SetFocus
End Sub

Private Sub Form_Load()
    Filename = App.Path & "\login.txt"
End Sub

---