<<
csv_file="edit_csv.txt" # data file /#
csv_x=5 # no of columns /#
csv_y=5 # no of rows /#
csv_w=10 # cell width /#
COPY FILE=csv_file TS="," TO csv.array /COPY # load data /#
>>
<html>
<title>Simple Spreadsheet Editor</title>
<form method=post action=do_csv>
<center>
<table border=1 cellpadding=3 cellspacing=0>
<tr><td align=right bgcolor=#0000FF>
<input type=submit name=mySave value="Save">
<input type=submit name=myLoad value="Load">
</td></tr>
<tr><td>
<table border=0 cellpadding=0 cellspacing=0>
<<
y=1
WHILE y <= csv_y DO
DISPLAY "<tr>" /DISPLAY
x=1
WHILE x <= csv_x DO
DISPLAY "<td><input type=text size="+csv_w+" "+
"name=csv_array["+x+","+y+"]></td>"
/DISPLAY
x=x+1
/WHILE
DISPLAY "</tr>" /DISPLAY
y=y+1
/WHILE
>>
</form>
</table>
</td></tr></table>
</html>
<<OVERLAY do_csv
IF htmlos.clicked="mySave" THEN
COPY csv_array TO FILE=csv_file TS="," /COPY
/IF
GOTO PAGE
>>