File: register.tml

package info (click to toggle)
tclws 3.5.0-1
  • links: PTS
  • area: main
  • in suites: forky, sid, trixie
  • size: 944 kB
  • sloc: tcl: 7,976; makefile: 18
file content (48 lines) | stat: -rw-r--r-- 1,605 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
[mypage::header "Tcl Web Server Registration"]

<form action="http://www.tcl.tk/mail/forminfo" method="POST">
<input type="hidden" name="product" value="WebServer">
<input type="hidden" name="version" value="$Httpd(server)">
<input type="hidden" name="sendto" value="welch@acm.org">
<input type="hidden" name="subject" value="Register WebServer">

<p>
If you are unable to post the registration form, an informal
note to [html::mailto welch@acm.org "Register WebServer"] would be appreciated.

<p>
Ahem, this form is all great and everything, but I don't have a good
"email this form data" handler running, so the mail will go into
the bit bucket.  The best thing to do is introduce yourself on
the tclhttpd mailing list.

<p>
<h2>User Registration</h2>
<table>
[html::textInputRow "Name" name]
[html::textInputRow "Email" emailaddr]
<tr>[html::cell colspan=2 [html::checkSet noemail {} {
    "<b>Do not</b> contact me about new releases" 1
}]]</tr>
[html::textInputRow "Title" title]
[html::textInputRow "Company" company]
</table>
<p>How do you plan to use the server?<br>
<textarea name="why" cols=60 rows=4>
</textarea>
<p>

For more general comments, please send email to
<a href=mailto:welch@acm.org>welch@acm.org</a>.
There is also a mailing list for users of the Tcl Web Server.
You can join this list by
visiting
<a href="http://lists.sourceforge.net/mailman/listinfo/tclhttpd-users">http://lists.sourceforge.net/mailman/listinfo/tclhttpd-users</a>.
Send mail to the list at [html::mailto tclhttpd-users@lists.sourceforge.net]
<p>
[html::submit "Register (test)"]
<br>
</form>


[mypage::footer]