PDA

View Full Version : Server.CreateObject Failed



mostafa612003
یک شنبه 22 مرداد 1385, 07:35 صبح
این پیغام خطا ار از این خط برنامه ام می گیرد:
Set Mail = Server.CreateObject("Persits.MailSender")

چرا؟
چه کاری باید انجام بدهم
ممنون

aligh662000
یک شنبه 22 مرداد 1385, 10:54 صبح
ممکنه به خاطر این باشه که رو سرور داخلی اجرا می کنی اگه بری رو سرور اینترنت درست میشه

Behrouz_Rad
یک شنبه 22 مرداد 1385, 11:11 صبح
چون DLL ای که باعث ایجاد اون شی میشه وجود نداره!

mostafa612003
دوشنبه 23 مرداد 1385, 07:20 صبح
روی سرور خودم این برنامه مشکلی ندارد و ایمیل را می فرستد ولی وقتی که روی سرور دیگر می گذارم با این مشکل برخورد می کنم.
این dll را از کجا پیدا کنم؟

متشکرم

Behrouz_Rad
دوشنبه 23 مرداد 1385, 08:34 صبح
باید ببینی نام DLL ای که این شی رو ایجاد می کنه چیه! (احتمالا باید در پوشه ی system32 باشه)
از روی سرور خودت بر روی سرور مقصد کپیش کن.

موفق باشی.

mehrad.net
سه شنبه 24 مرداد 1385, 19:02 عصر
ولی اون dll باید رو سرور register بشه.که بعید می دونم اجازه ی همچین کاری داده بشه.

3nitro
سه شنبه 24 مرداد 1385, 23:58 عصر
ببینید میتونید ادمین سرور رو راضی کنید ؟!
http://zixzix.persiangig.com/smiles/trans15.gif

mostafa612003
شنبه 28 مرداد 1385, 10:05 صبح
از کجا باید بفهمم که نام DLL ای که این شی رو ایجاد می کنه چیه! ؟؟؟
dll هم نام با این شی روی دستگاهم نیست

aligh662000
شنبه 28 مرداد 1385, 17:31 عصر
اینه اسمش aspemail.dll

mehrad.net
شنبه 28 مرداد 1385, 19:40 عصر
فکر می کنم که اسمش persists باشه.

mostafa612003
یک شنبه 29 مرداد 1385, 07:42 صبح
نه aspemail.dll و نه persists هیچکدام روی دستگاهم نیست
متشکرم

aligh662000
دوشنبه 30 مرداد 1385, 12:18 عصر
اقا این هم منبع که نگی علی الکی می گه!!!
http://support.persits.com/show.asp?code=PS02061296

mostafa612003
یک شنبه 19 شهریور 1385, 08:30 صبح
سلام
من aspemail.exe را روی سرور نصب کردم
الان دیگر پیغام خطای بالا را نمیدهد ولی ایمیل را هم نمی فرستد ولی از سیستم خودم هیچ مشکلی ندارم
به نظر شما چرا ایمیل را نمی فرستد؟
متشکرم
این هم کل برنامه:
<%
strHost = "mail.parsonline.net"
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = strHost
Mail.From = "Z@yahoo.com"
Mail.FromName = Mail.EncodeHeader(Request("name"),"utf-8")
'Mail.CharSet = "UTF-8"*****************************************"
'Mail.ContentTransferEncoding = "Quoted-Printable"*****************************
Mail.AddAddress ( "mostafa612003@yahoo.com")
' message subject
Mail.Subject = "Salam!"
Mail.Body = "<html> ...................</html>"
Mail.IsHTML = True
strErr = ""
bSuccess = False
On Error Resume Next ' catch errors
Mail.Send ' send message
If Err <> 0 Then ' error occurred
strErr = Err.Description
response.write strErr
else
response.redirect "accept.html"
End If
%>

mostafa612003
چهارشنبه 22 شهریور 1385, 07:34 صبح
کسی نیست علت این مشکل را بداند؟

لوک خوش شانس
چهارشنبه 22 شهریور 1385, 09:44 صبح
آقا Persits یه کامپونت هست که باید روی لوکال و سرور نصب شده باشه . شما اجازه ندارید که این کامپونت رو روی سرور نصب کنید باید وب مستر هزینه های اونو تغبل کنه و روی سرور به صورت مجاز نصبش کنه . تا این کامپونت نصب نشده نمیتونی از این دستورات مربوط به این کامپونت استفاده کنی .

mostafa612003
چهارشنبه 22 شهریور 1385, 11:24 صبح
ممنون
چگونه باید به صورت مجاز روی سرور آن را نصب کنم؟
آیا راه دیگری به غیر از استفاده از کمپننت برای ارسال ایمیل در اینترنت وجود دارد؟
متشکرم

لوک خوش شانس
چهارشنبه 22 شهریور 1385, 15:00 عصر
ممنون
چگونه باید به صورت مجاز روی سرور آن را نصب کنم؟
آیا راه دیگری به غیر از استفاده از کمپننت برای ارسال ایمیل در اینترنت وجود دارد؟
متشکرم
میتونی از کامپونت های خود Microsoft کمک بگیری .
بهترین کامپونت برای ارسال ایمیل CDOSYS هست .
قبلاً اینجا برنامه کاملشپ گزاشتم . همینطور یه تاپیک در پرشین تولز تحت عنوان [ تمام مسائل در مورد ایمیل ] نمونه های مختلفی از این برنامه های ارسال ایمیل رو قرار داده ام جستجو کن پیدا می کنی

mostafa612003
یک شنبه 26 شهریور 1385, 09:14 صبح
خیلی متشکرم
ولی من چیزی پیدا نکردم
اگر برایتان زحمت نیست لینک آن را برایم بگذارید
خیلی متشکرم

لوک خوش شانس
سه شنبه 28 شهریور 1385, 15:57 عصر
این هم لینک انواع برنامه های ایمیل
http://www.forum.persiantools.com/t40899.html

mostafa612003
چهارشنبه 29 شهریور 1385, 09:45 صبح
خیلی متشکرم
من این برنامه ها راکه روی دستگاه خودم اجرا میکنم جواب می دهد و ایمیل را می فرستد
اما وقتی آنها را روی هاستم می گذارم پیغام خطایی نمی دهد ولی ایمیل را هم نمی فرستد
چرا؟

لوک خوش شانس
چهارشنبه 29 شهریور 1385, 11:51 صبح
همونجا مشکلتو بگو تا متفعش کنم

mostafa612003
شنبه 01 مهر 1385, 08:34 صبح
من نتونستم آنجا مشکلم را بازگو کنم
مشکلم این است که وقتی برنامه را روی سرور می گذارم هیچ پیغام خطایی نمایش داده نمی شود ولی ایمیل را هم نمی فرسته
این برنامه ای است که استفاده کردم:
<%@ Language=VBScript %>

<%

' Reference to Microsoft ActiveX Data Objects 2.5 Library
' Reference to Microsoft CDO for Windows 2000 Library

Dim iMsg
Dim iConf
Dim Flds

set iMsg = CreateObject("CDO.Message")
set iConf = CreateObject("CDO.Configuration")

' Set the configuration fields.
Set Flds = iConf.Fields

' Set the proxy server to be used.
' TODO: Set "someproxy:80" to the name of your proxy server.
'Flds("http://schemas.microsoft.com/cdo/configuration/urlproxyserver") = "someproxy:80"

' Set if this is a local server.
Flds("http://schemas.microsoft.com/cdo/configuration/urlproxybypass") = "<local>"

' Set the option to retrieve the latest content directly from the server.
Flds("http://schemas.microsoft.com/cdo/configuration/urlgetlatestversion") = True
Flds.Update

' Set the message properties.
With iMsg

Set .Configuration = iConf
' Create the MIME representation of the Web page in the message.
' TODO: Change the To and From fields to valid e-mail addresses.
.CreateMHTMLBody "http://www.example.com"
.To = "ghaum@yahoo.com"
.From = "info@sobh.org"
.Subject = "Sample MHTML message..."
.Send
End With

%>__________________

================================================== ====================