mostafa612003
سه شنبه 27 دی 1384, 07:45 صبح
سلام
این متن برنامه ای است که من روی دستگاه خودم به راحتی ایمیل می فرستم ولی وقتی که این برنامه را از روی سرور شبکه که در آن هستم ،اجرا می کنم به من پیغام خطا می دهد
این را می دانم که ورژن IIS دستگاه خودم با سرور متفاوت است ورژن IIS سرور 6 هست
متن برنامه:
<%
dim objCDOSYSMail
Dim objCDOSYSCon
Set objCDOSYSMail = Server.CreateObject("CDO.Message")
Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")
With objCDOSYSCon
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "192.168.1.10"
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
.Fields.Update
Set objCDOSYSMail.Configuration = objCDOSYSCon
e1=request("e1")
e2=Request("sender")
matn=request("matn")
objCDOSYSMail.to="ghaum@yahoo.com"
objCDOSYSMail.from=e2
objCDOSYSMail.subject="Sobh"
objCDOSYSMail.htmlbody=matn
objCDOSYSMail.send
end with
Set objCDOSYSMail = Nothing%>
این هم پیغام خطا:
CDO.Message.1 error '80040222'
The pickup directory path is required and was not specified.
/mailtest.asp, line 46
این هم خط 46:
objCDOSYSMail.send
ممنون
این متن برنامه ای است که من روی دستگاه خودم به راحتی ایمیل می فرستم ولی وقتی که این برنامه را از روی سرور شبکه که در آن هستم ،اجرا می کنم به من پیغام خطا می دهد
این را می دانم که ورژن IIS دستگاه خودم با سرور متفاوت است ورژن IIS سرور 6 هست
متن برنامه:
<%
dim objCDOSYSMail
Dim objCDOSYSCon
Set objCDOSYSMail = Server.CreateObject("CDO.Message")
Set objCDOSYSCon = Server.CreateObject ("CDO.Configuration")
With objCDOSYSCon
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "192.168.1.10"
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
.Fields.Update
Set objCDOSYSMail.Configuration = objCDOSYSCon
e1=request("e1")
e2=Request("sender")
matn=request("matn")
objCDOSYSMail.to="ghaum@yahoo.com"
objCDOSYSMail.from=e2
objCDOSYSMail.subject="Sobh"
objCDOSYSMail.htmlbody=matn
objCDOSYSMail.send
end with
Set objCDOSYSMail = Nothing%>
این هم پیغام خطا:
CDO.Message.1 error '80040222'
The pickup directory path is required and was not specified.
/mailtest.asp, line 46
این هم خط 46:
objCDOSYSMail.send
ممنون