You should create a template called 'send_mail_form.html' which contains:
<form name=myform action="db.cgi" method="post">
To:.....
...
<input type="hidden" name="db" value="<%db%>">
<input type="hidden" name="do" value="send_mail">
</form>
- Add the 'send_mail_form' subroutine in Home.pm
$COMPILE{send_mail_form} = <<'END_OF_SUB';
sub send_mail_form {
#-----------------------------------------------------------------------------
#
my ($self, $msg) = @_;
return ('send_mail_form.html', { msg => $msg});
}
END_OF_SUB
- add a link into your template:
<a href="db.cgi?do=send_mail_form">Send Email</a>
Hope that helps.
TheStone.
B.
<form name=myform action="db.cgi" method="post">
To:.....
...
<input type="hidden" name="db" value="<%db%>">
<input type="hidden" name="do" value="send_mail">
</form>
- Add the 'send_mail_form' subroutine in Home.pm
$COMPILE{send_mail_form} = <<'END_OF_SUB';
sub send_mail_form {
#-----------------------------------------------------------------------------
#
my ($self, $msg) = @_;
return ('send_mail_form.html', { msg => $msg});
}
END_OF_SUB
- add a link into your template:
<a href="db.cgi?do=send_mail_form">Send Email</a>
Hope that helps.
TheStone.
B.