@Echo off

Rem :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

Rem  CorreLog Sigma Web Framework, Simple Contact Form.

Rem  This file is an example of a simple contact form, written as a 
Rem  Microsoft DOS batch file. The batch file creates an input form, 
Rem  and stores comments in the ".\comments.txt" file, in the root 
Rem  directory of this installation.

Rem  Save this file as sigma-web\900_Comment.cmd, or some other
Rem  suitable location within the sigma-web folder. This will create
Rem  a "Contact" tab at the top of the display.

Rem  This code has been placed in the public domain by:
Rem  CorreLog, Inc. 
Rem  http://www.CorreLog.com

Rem  Rights to use and modify this program for any reason and purpose 
Rem  is hereby granted to any and all parties. CorreLog, Inc. 
Rem  accepts no liabilities and makes no claims about any use of this 
Rem  program, or any adaptation of this program, whatsoever. 

Rem :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

Rem  Start the form:

Sigcmd.exe sg_form /sigma-cgi/web.exe?%0%

Rem  Branch on submit to display a receipt:

if exist %S_WIN32_POST% goto DISPLAY_RECEIPT

Rem  Display the form:

Echo ^<center^>
Echo ^<p^> Enter your name: 
Echo ^<br^> ^<input name=name size=50 value=""^>
Echo ^<p^> Enter your e-mail address:
Echo ^<br^> ^<input name=email size=50 value=""^>
Echo ^<p^> Enter your comment: (200 chars max)
Echo ^<br^> ^<textarea name=comment cols=40 rows=5^>
Echo ^</textarea^>
Echo ^<p^> Click to add comment:
Echo ^<input type=submit^>
Echo ^</center^>
Echo ^</form^>
goto EXIT

Rem ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

:DISPLAY_RECEIPT

Rem  Save the info to a file, and display a receipt.

Echo ------------------ >> ..\comments.txt
Sigcmd.exe sg_get_date  >> ..\comments.txt
type %S_WIN32_POST%     >> ..\comments.txt
Echo.                   >> ..\comments.txt

Rem  Display this return HTML document.

Echo ^<center^>
Echo Thank you for your comment.
Echo ^<p^>
Sigcmd.exe sg_link /sigma-cgi/web.exe?%0%
Echo Add another comment...
Echo ^</a^>
Echo ^<p^>
Echo ^<center^>

Rem ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

:EXIT

Rem  We are finished.