advcomputer
Posts: 68
|
| Posted: 02/12/2007, 2:25 PM |
|
Hello,
I know everyone has seen this code before;
Dim Mailer
Set Mailer = Server.CreateObject("Persits.MailSender")
Mailer.From = CCDLookUp("email", "employees", "emp_id=" &_
DBIntranetDB.ToSQL(CCGetUserID(),ccsInteger), DBIntranetDB)
Mailer.FromName = CCDLookUp("emp_name", "employees", "emp_id=" &_
DBIntranetDB.ToSQL(CCGetUserID(), ccsInteger), DBIntranetDB)
Mailer.AddAddress CCDLookUp("email", "employees", "emp_id=" &_
DBIntranetDB.ToSQL(tasks.user_id_assign_to.Value, ccsInteger), DBIntranetDB)
Mailer.Host = "mysmtphost.com"
Mailer.IsHTML = True
Mailer.Subject = "New task for you"
Mailer.Body = "The following task was submitted:<br><br>" &_
"Task ID: " & CCDLookUp("max(task_id)", "tasks", "user_id_assign_by=" &_
DBIntranetDB.ToSQL(CCGetUserID(), ccsInteger), DBIntranetDB) &_
"<br><br>" & tasks.task_desc.Text
Mailer.Send
set Mailer = Nothing
I am attempting email after an inserty, hwoever upon execution (ASP of ciurse) an error comes up that DBIntranetDB is not defined or unknown (i dont have the exact syntax). The connect database is called intranet not DBIntranet.
Any help would be appreciated,
Thanks in advance,
-Jeff
|
 |
 |
peterr
Posts: 5971
|
| Posted: 02/12/2007, 5:49 PM |
|
Jeff,
Try using "DBintranet" in your case. I think that "DBIntranetDB" corresponds to connection name "IntranetDB".
_________________
Peter R.
YesSoftware Forums Moderator
For product support please visit http://support.yessoftware.com |
|
|
|
|
