A continuation from a tutorial writen by Dan - http://www.compsci.ca/v2/viewtopic.php?p=29#29
Appending to text files...
Lets say you have a list of something, i'm going to say names... you wouldnt want to use an array to store all the info in the memory, because you could have anywhere from 1 to 10000 names in this datalist. instead you would store the information in a text file
| code: |
var file,temp:int %declare the files var name,name1:string open:file,"name.txt",get %open file to get the names open:temp,"temp.txt",put % open the temporary file |
this next part you have to copy all of the current names to the temporary file for storage, because as soon as you open a file for writing, then it deletes it all
| code: |
loop exit when eof(file) %exits when you get to the end of the file get:file,name %get the name from the first file put:temp,name %write to the temp file end loop |
now we are going to ask the user for the files he wants to add, and add them to the temporary file, because its already open for putting.
| code: |
put "Enter the names you would like to add" put "Exit with q" loop get name1 exit when name1 = "q" put:temp,name1 end loop |
now we close the connections and delete the old file, then rename the temporary to what the old one was
| code: |
close:file close:temp File.Delete("names.txt") %deletes the old one File.Rename("temp.txt", "names.txt") |
this is my first tut, i hope it was all of some sort of use to you, tell me if you liked it and i'll continue posting tutorials
MOD Edit: a nice extention of reading/writing to a file tutorial...
+15Bits - Tony
), but thank you so much for writing that. I've been looking around for a while now for how to do that, but the tutorials/programs I read used some other weird, complicated method. Thanks for making this so easy to understand 
