S
sagelike
Guest
I'm trying to get an ASP form to parse and send email use Mailenable's COM object: MEASP.dll.
The form seems to be parse however it generates and error because it can't create an object:
ProcessForm.asp companyname=&unit=&street=&city=&province=&postalcode=&phone=&firstname=&lastname=&email=&password=&=submit&PageType=Demo|28|ASP_0178_:_80070005|Server.CreateObject_Access_Error 80 - xx.xx.xx.xx HTTP/1.1 Mozilla/5.0+(Windows;+U;+Windows+NT+5.1;+en-US;+rv:1.8.1.3)+Gecko/20070309+Firefox/2.0.0.3
I've added the IUSR_domain to the USERS group with read/execute permissions which is already part of MEASP.dll permissions. Also tried adding the IUSR_domain directly to MEASP.dll. No luck.
All I get is the above error. Here's the ASP code:
<form action="Processing/ProcessForm.asp">
WHICH CALLS THIS:
<%
Const gAddressBadChars = "<>*?&#[]'=""%"
Function ValidSMTPAddress(AliasName)
If Len(AliasName) <= 0 Or Len(AliasName) > 250 Then
ValidSMTPAddress = False
Exit Function
Else
' Loop and check chars
If InStr(1,AliasName,"@") <= 0 Then
ValidSMTPAddress = False
Exit Function
Else
Dim AliasIndex
For AliasIndex = 1 to Len(AliasName)
If Instr(1,gAddressBadChars,mid(aliasname,AliasIndex,1)) > 0 Then
ValidSMTPAddress = False
Exit Function
End If
Next
End If
End If
ValidSMTPAddress = True
End Function
Function SendEmail(FromAddress,FromName,ToAddress,CCAddress,BCCAddress,Subject,Message,AttachmentLocation,AttachmentName)
set oMail = server.CreateObject("MEMail.Message")
oMail.ContentType = "text/html"
oMail.MailFrom = FromAddress
oMail.MailFromDisplayName = FromName
oMail.MailTo = ToAddress
if CCAddress <> "0" then
oMail.MailCC = CCAddress
end if
if BCCAddress <> "0" then
oMail.MailBCC = BCCAddress
end if
if AttachmentName <> "0" then
oMail.AttachmentFilename = AttachmentLocation
oMail.AttachmentName = AttachmentName
end if
oMail.Subject = Subject
oMail.MessageBody = Message
oMail.SendMessage
set oMail = nothing
End Function
%>
I'm really stumped and this problem seems similar to another issue migrating a mssql database to this server.
Any help or ideas would be appreciated.
Cheers
G
The form seems to be parse however it generates and error because it can't create an object:
ProcessForm.asp companyname=&unit=&street=&city=&province=&postalcode=&phone=&firstname=&lastname=&email=&password=&=submit&PageType=Demo|28|ASP_0178_:_80070005|Server.CreateObject_Access_Error 80 - xx.xx.xx.xx HTTP/1.1 Mozilla/5.0+(Windows;+U;+Windows+NT+5.1;+en-US;+rv:1.8.1.3)+Gecko/20070309+Firefox/2.0.0.3
I've added the IUSR_domain to the USERS group with read/execute permissions which is already part of MEASP.dll permissions. Also tried adding the IUSR_domain directly to MEASP.dll. No luck.
All I get is the above error. Here's the ASP code:
<form action="Processing/ProcessForm.asp">
WHICH CALLS THIS:
<%
Const gAddressBadChars = "<>*?&#[]'=""%"
Function ValidSMTPAddress(AliasName)
If Len(AliasName) <= 0 Or Len(AliasName) > 250 Then
ValidSMTPAddress = False
Exit Function
Else
' Loop and check chars
If InStr(1,AliasName,"@") <= 0 Then
ValidSMTPAddress = False
Exit Function
Else
Dim AliasIndex
For AliasIndex = 1 to Len(AliasName)
If Instr(1,gAddressBadChars,mid(aliasname,AliasIndex,1)) > 0 Then
ValidSMTPAddress = False
Exit Function
End If
Next
End If
End If
ValidSMTPAddress = True
End Function
Function SendEmail(FromAddress,FromName,ToAddress,CCAddress,BCCAddress,Subject,Message,AttachmentLocation,AttachmentName)
set oMail = server.CreateObject("MEMail.Message")
oMail.ContentType = "text/html"
oMail.MailFrom = FromAddress
oMail.MailFromDisplayName = FromName
oMail.MailTo = ToAddress
if CCAddress <> "0" then
oMail.MailCC = CCAddress
end if
if BCCAddress <> "0" then
oMail.MailBCC = BCCAddress
end if
if AttachmentName <> "0" then
oMail.AttachmentFilename = AttachmentLocation
oMail.AttachmentName = AttachmentName
end if
oMail.Subject = Subject
oMail.MessageBody = Message
oMail.SendMessage
set oMail = nothing
End Function
%>
I'm really stumped and this problem seems similar to another issue migrating a mssql database to this server.
Any help or ideas would be appreciated.
Cheers
G