D
databaseboy2005
I had it all set... then tried to use it at work and it does not work. Here
is my issue. I am trying to save form results to database (mdb) AND email
results to several people. Email is sent at work through ms exchange server,
so the scripts that i used when testing at home do not work within my work
environment. Your help is appreciated!!
The code that i used was refered to me by a FP gen Q mvp
<%
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.To = ""
objCDOMail.From = ""
objCDOMail.Subject = FP_SavedFields("Name")
For Each item in FP_SavedFields
strBody = strBody & item & ": " & FP_SavedFields(item) & VbCrLf
Next
objCDOMail.Body = strBody
objCDOMail.BodyFormat = 1
objCDOMail.MailFormat = 1
objCDOMail.Send
Set objCDOMail = Nothing
%>
is my issue. I am trying to save form results to database (mdb) AND email
results to several people. Email is sent at work through ms exchange server,
so the scripts that i used when testing at home do not work within my work
environment. Your help is appreciated!!
The code that i used was refered to me by a FP gen Q mvp
<%
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.To = ""
objCDOMail.From = ""
objCDOMail.Subject = FP_SavedFields("Name")
For Each item in FP_SavedFields
strBody = strBody & item & ": " & FP_SavedFields(item) & VbCrLf
Next
objCDOMail.Body = strBody
objCDOMail.BodyFormat = 1
objCDOMail.MailFormat = 1
objCDOMail.Send
Set objCDOMail = Nothing
%>