Add to CSV File csv_add.html
<html> <title>Add to CSV File</title> <body bgcolor=white><br><br>
<font color=darkblue>Add to CSV File</font><br> Fill out form below and submit.<br><br>
<< IF Error_Msg != "ERROR" THEN DISPLAY Error_Msg /DISPLAY /IF Error_Msg="ERROR" >>
<form method=post action=addtocsv> <table border=1 width=50%><tr> <td>Your Name:</td><td><input type=text name=csv_Name size=20>
</td></tr><tr><td>Phone:</td><td> <input type=text name=csv_Phone size=20></td> </tr><tr><td>Company:</td><td>
<input type=text name=csv_Company size=20></td> </tr><tr><td>Email:</td><td><input type=text name=csv_Email size=20> </td></tr><tr><td align=center colspan=2> <input type=submit value="ADD TO CSV FILE"></td>
</tr></table></form> </body> </html>
<<OVERLAY addtocsv IF COUNT(csv_Email,"@") = 0 OR COUNT(csv_Name," ") = 0 THEN Error_Msg="<font color=red><b>Bad email or name.</font>" GOTO "csv_add.html" /IF APPEND ROW(csv_Name,csv_Phone,csv_Company,csv_Email) TO FILE="csv_data.txt" TS="," /APPEND Error_Msg = csv_Name + " added to CSV File." csv_Name = "ERROR" csv_Email = "ERROR" csv_Company = "ERROR" csv_Phone = "ERROR" GOTO "csv_home.html"
>>
|