Hjælp til form
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>Tilmelding</title>
</head>
Jeg har en form (her under) den virker ok, men jeg ville gerne have den lavet lidt om.
Jeg har ikke brug for de radio buttons (kommer ja/nej).
Jeg vil gerne at bruger indtaster en mail adresse, og at den kommer til at stå som afsender i den mail der sendes med oplysningerne, så kan jeg have et autosvar på min mail konto med svar til bruger (de skal alle have det samme svar)
Her er den form jeg har:
<body>
<%
If lCase(Request.ServerVariables("REQUEST_METHOD")) = "post" Then
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName = "Julefrokost" ' Hvem er mailen fra?
Mailer.FromAddress= "XXXXXXXXX" ' Hvor sendes mail fra?
Mailer.RemoteHost = "192.168.x.x" ' SMTP server
Mailer.AddRecipient "Fest", "YYYYYY.dk" ' E-mailen den skal sendes til
Mailer.Subject = "Tilmelding" ' Emnen på mailen
streng = ""
For i = 1 to Request.Form.Count
If Request.Form.Key(i) <> "url" and Request.Form.Key(i) <> "emailr" then
streng = streng & Request.Form.Key(i) & ": " & Request.Form.Item(i) & vbcrlf & vbcrlf
End if
Next
Mailer.BodyText = streng
' Send e-mail og skriv status
If Mailer.SendMail then
Response.Write "Mailen er afsendt..."
Else
Response.Write "Der skete en fejl: " & Mailer.Response
End if
Set Mailer = Nothing
Else
%>
<form method="post" action="<%=Request.ServerVariables("PATH_INFO")%>" name="send">
<table border="0" width="100%" id="table1">
<tr>
<td width="20%"><font face="Bernard MT Condensed" size="4">Navn(e):</font></td>
<td colspan="2"><font size="4" face="Bernard MT Condensed">
<input type="text" name="Navn 1" size="20"> &
<input type="text" name="Navn 2" size="20"></font></td>
</tr>
<tr>
<td width="20%" height="33">
<font face="Bernard MT Condensed" size="4">Kommer Ja/ Nej:</font></td>
<td width="18%" height="33">
<font size="4" face="Bernard MT Condensed">Ja da<input type="radio" value="Ja" checked name="Kommer"></font></td>
<td width="58%" height="33">
<font size="4" face="Bernard MT Condensed">Øv Nej
<input type="radio" name="Kommer" value="Nej"></font></td>
</tr>
<tr>
<td width="20%"><font face="Bernard MT Condensed" size="4">Jeg/ Vi
kommer:</font></td>
<td><font size="4" face="Bernard MT Condensed">1.
<input type="checkbox" name="1 person" value="ON">Person</font></td>
<td><font size="4" face="Bernard MT Condensed">2.
<input type="checkbox" name="2 personer" value="ON"> Personer</font></td>
</tr>
<tr>
<td width="20%"> </td>
<td colspan="2"> </td>
</tr>
</table>
<p><font size="4" face="Bernard MT Condensed">
<input type="submit" value="Send" name="B1"><input type="reset" value="Nulstil" name="B2"></font></p>
<p> </p>
</form>
<% End if %>
</body>
</html>
