I have a listbox named urlsv
I am using this code to save a file
Dim file As FolderItem
Dim fileStream as TextOutputStream
file=GetSaveFolderItem("","URL Database")
file.MacType = "Text"
If file<> Nil then
fileStream=file.CreateTextFile
fileStream.WriteLine urlsv.text
fileStream.Close
end if
It only saves one url if the person enters more than one url the
other urls don't get saved
I am using this to add a url to the list
IF urlfield.text <> "" then
urlsv.addrow urlfield.text
else
MSGBOX "No URL Found in entry field."
end if
How can I get it to save all the urls entered into the listbox?
Brian
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
