;;;but the problem is still there
Is the error the same as your first post? Difficult to help with sucha a hairy description. think about someone else helping you who has not read all the posts in this topic. Whats the exact error and where does it occur in the code you sent them?
;;;they told me that win 2003 and xp are in two different domains but they use the same smtp server.
Sounds like a smoke screen to me. Who cares where the boxes are and weather they use the same SMTP service. As a developer its your job to write bug free code. It is the poeple with admin access's job to ensure the SMTP service is working. Ask them to use command line and send a nessage to establish if the service is working. Any network admin can do this is 10 seconds - This all sounds awfully hard!!
;;;Could it be that they have a firewall that prevents the
Once again you are not a network admin, nor have the access. Sounds like you are developing a site on a box which is run by cowboys. I suggest you document your discussions with them.
Remember posting exact errors will give you answers quicker. Dont let them sauy it doesnt work, turn off friendly errors and post the unfriendly error here.
FYI CDOSYS is the reccomended method for boxes >= 2003 server however here are other options:
Use CDO:
<%
Set cdoConfig=server.CreateObject("CDO.Configuration")
cdoConfig.Fields.Item(theSchema & "smtpserver")="xxx.xx.xx"
set cdoMessage=server.CreateObject("CDO.Message")
cdoMessage.Configuration=cdoConfig
cdoMessage.From="
[email protected]"
cdoMessage.To="
[email protected] m"
cdoMessage.Subject="Test CDO"
cdoMessage.TextBody="Using CDO"
cdoMessage.Send
Set cdoMessage=Nothing
Set cdoConfig=Nothing
Response.write("CDO - Mail was Sent")
%>
use CDONTS:
<%
Dim objMail
Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.From = "
[email protected]"
objMail.Subject = "CDONTS Test"
objMail.To = "
[email protected]"
objMail.Body = "sent using CDONTS"
objMail.Send
Response.write("CDONTS - Mail was Sent")
set objMail = nothing
%>
Where authentication is required:
<%
Set cdoConfig = CreateObject("CDO.Configuration")
With cdoConfig.Fields
.Item(cdoSendUsingMethod) = cdoSendUsingPort
.Item(cdoSMTPServer) = "1xx.xx.xx"
.Item(cdoSMTPAuthenticate) = 1
.Item(cdoSendUsername) = "aValiduserName"
.Item(cdoSendPassword) = "aValidPassword"
.Update
End With
Set cdoMessage = CreateObject("CDO.Message")
With cdoMessage
Set .Configuration = cdoConfig
.From = "
[email protected]"
.To = "
[email protected]"
.Subject = "Test external CDO"
.TextBody = "Testing external authenticated mail sending from frsyws02"
.Send
End With
Set cdoMessage = Nothing
Set cdoConfig = Nothing
%>
You have CDOSYS in a post above. If one of these methods dont wotk for you you need to give these cowboy administators a shake up
Wind is your friend
Matt