View/Edit #2473:tell_www_body

Name(s): tell_www_body

1: player:tell("<HTML><br><br><form method='get' action='http://www.moo.ca/", toint(this), "'>")
2: player:tell("<input type='text' name='suggestion' value='Enter your suggestion'><input type='hidden' name='command' value='submit'><input type='submit' name='submit' value='Submit'>")
3: player:tell("</form>")
4: if ((x = listassoc(dobj, "command")) && x[2] == "submit")
5:   suggestion = $www:parse_GET("suggestion")
6:   $mail_agent:send_message(this, {#2473}, {tostr("Recorded suggestion from browser user.")}, {suggestion})
7:   player:tell("Suggestion sent!")
8: endif
9: "Last modified by Dax (#789) on Tue May  3 14:09:34 2005 MDT."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Even (#9982)

You are not logged in.