Hi.
I am re-using an RSVP that a former co-worker had set up for a Holiday Invite for our dept. I have figured out everything except for the submit button. The submit button works, but there is code in there telling it to say thank you for submitting your info. This does not work. After the person enters their info and presses submit, it just goes to a blank screen.
I have not changed the code at all from when my former co-worker used it.
Any suggestions?
Here is the code starting with the submit button
<tr>
<td width="100%" colspan="3"> <font size="1"> <br>
</font><input type="submit" value="Submit RSVP"></a>
<!--<input type="reset" value="Reset" name="B2">-->
</form></td>
</tr>
</table>
</td>
</tr>
</table>
</center>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
<p><br>
<br>
</p>
<p> </p>
<p> </p>
</body>
</html>
<%
Else
' Create an instance of the NewMail object.
Set objCDOMail = Server.CreateObject("CDONTS.NewMail"
' Set the properties of the object
' This syntax works fine
'objCDOMail.From = "susie.erickson@bestbuy.com"
' But this gets you the appearance of a real name!
objCDOMail.From = "Communications Holiday Party 2002<name@company.com>"
objCDOMail.To = "name@company.com"
objCDOMail.Bcc = "name@company.com"
objCDOMail.Subject = strFirstName
objCDOMail.Body = strBody
objCDOMail.Send
Set objCDOMail = Nothing
%>
<%
'Response.Write " "
'Response.Write "Thank you! Your information has been submitted and received. "
'Response.Write "If more people need to register please click the back button on your browser."
'Response.Write ""
End If
%>
I am re-using an RSVP that a former co-worker had set up for a Holiday Invite for our dept. I have figured out everything except for the submit button. The submit button works, but there is code in there telling it to say thank you for submitting your info. This does not work. After the person enters their info and presses submit, it just goes to a blank screen.
I have not changed the code at all from when my former co-worker used it.
Any suggestions?
Here is the code starting with the submit button
<tr>
<td width="100%" colspan="3"> <font size="1"> <br>
</font><input type="submit" value="Submit RSVP"></a>
<!--<input type="reset" value="Reset" name="B2">-->
</form></td>
</tr>
</table>
</td>
</tr>
</table>
</center>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
<p><br>
<br>
</p>
<p> </p>
<p> </p>
</body>
</html>
<%
Else
' Create an instance of the NewMail object.
Set objCDOMail = Server.CreateObject("CDONTS.NewMail"
' Set the properties of the object
' This syntax works fine
'objCDOMail.From = "susie.erickson@bestbuy.com"
' But this gets you the appearance of a real name!
objCDOMail.From = "Communications Holiday Party 2002<name@company.com>"
objCDOMail.To = "name@company.com"
objCDOMail.Bcc = "name@company.com"
objCDOMail.Subject = strFirstName
objCDOMail.Body = strBody
objCDOMail.Send
Set objCDOMail = Nothing
%>
<%
'Response.Write " "
'Response.Write "Thank you! Your information has been submitted and received. "
'Response.Write "If more people need to register please click the back button on your browser."
'Response.Write ""
End If
%>