%@LANGUAGE="VBSCRIPT"%> <% if (cStr(Request("Submit")) <> "") Then Dim objCDO Set objCDO = Server.CreateObject("CDONTS.NewMail") objCDO.From = "eamil" objCDO.To = "cliff@intergraphic.com" objCDO.CC = "" objCDO.Subject = "Gift Message" objCDO.Body = "test" objCDO.Send() Set objCDO = Nothing Response.Redirect(thanks.htm) End If %>
|
|
|
|