[RESOLVED] Save file without using save dialog?

[xypherx]

Im using this to load items into a listbox without open dialog how would i save the updated list to the same file, using the same kind of code?

Private Sub cmdLoad_Click()
Dim fnum As Integer
Dim file_line As String

    fnum = FreeFile
    Open txtFile.Text For Input As fnum
    Do While Not EOF(fnum)
        Line Input #fnum, file_line
        lstLines.AddItem file_line
    Loop
End Sub