تو را خدا كمك كنيد

(azar) · Oct 8, 2004

بخدا من اينقدر اين موضوع را دنبال كردم و مزاحم همكارا شدم شرمنده و خسته شدم ولي چكار كنم كه نياز واجب به آن دارم

رستش من تمام تاپيكهاي مربوط به ارسال فورم به ايميل را خواندم و آزمايش كردم ولي جواب كامل نگرفتم . لطفا اگه يكي محبت كنه يك نمونه از آن چيزي را كه خودش ازش جواب گرفته را برام بفرسته ممنونش ميشم

ضمنا آن فايلهايي را كه yaghi تو تاپيكش گذاشته را آزمايش كردم و وقتي دكمه ارسال را ميزنم اين پيغام خطا مياد
undefind variable for name البته براي تمام متغيرهايي كه بكار رفته بعدش هم فقط فيلدهاي خالي به آدرس ايميلم فرستاده ميشه .

از مدير محترم انجمن تقاضا دارم كه مشكل گشاي من باشند ممنونم.

miladanimator · Oct 8, 2004

مشكلتو كامل بگو شايد من بتونم كمكت كنم
البته اگه مشكلت ربطي به اي.اس.پي داره

Mikhak · Oct 8, 2004

آره منم تازه ديدم مشكلتو بگو
-------------
سينا

mohsenshahbazi · Oct 8, 2004

mikhak گفت:
آره منم تازه ديدم مشكلتو بگو
-------------
سينا

اي بابا گفت كه
يه فرم ميخواد براي ارسال اطلاعات به ميل
يه فرم هم اون آقاي ياغي گذاشته براش كار نكرده
همين

من يكي دارم قشنگ كار ميكنه ولي با PHP هستش
تا فردا ميزارم همين جا

محسن

Mikhak · Oct 8, 2004

آقا شما بزار عزيز
--------------
سينا

Mikhak · Oct 8, 2004

ديگه نزنين لطفا
--------
سينا

AliReza26 · Oct 9, 2004

اينم يه مثال براي فرستادن محتواي فورم به ايميل با استفاده از JMail :

mailform.htm

کد:

&lt;html>
&lt;form method=post action=sendmail.asp>
From email: &lt;input type=text name=sender>&lt;br>
To email: &lt;input type=text name=receiver>&lt;br>
Subject: &lt;input type=text name=subject>&lt;br>
Body: &lt;textarea name=body>&lt;/textarea>&lt;br>
&lt;input type=submit>
&lt;/form>
&lt;/html>

sendmail.asp

کد:

&lt;%

' Put your SMTP Mail server here. If you do not know, ask your network administrator 
smtpServer = "smtp.yourSMTPServerNameHere.com" 
smtpPort = 25 

' --- 
dim sender, subject, body, smtpServer, smtpPort 
' Now gets the data from Form 
sender = Request.Form("sender") 
receiver = Request.Form("receiver") 
subject = Request.Form("subject") 
body = Request.Form("body") 

Set mail = CreateObject ("JMail.SMTPMail") 
mail.ServerAddress = smtpServer &amp; ":" &amp; smtpPort 
mail.Sender = sender 
mail.Subject = subject 
mail.AddRecipient receiver 
mail.ContentType = "text/html" ' or you can put 'text/plain' for plain text email 
mail.ISOEncodeHeaders = false 
mail.ContentTransferEncoding = "8bit" 
mail.Body = body 

' 1 - highest priority (Urgent) ' 3 - normal ' 5 - lowest 
mail.Priority = 3 


' Add sender's IP address (not required, but useful for web-based email) 
mail.AddHeader "Originating-IP", Request.ServerVariables ("REMOTE_ADDR") 

' Actually send mail 
objJMail.Silent = True 
  
Dim bSuccess 
bSuccess = objJMail.Execute() 
  
' Check for exceptions 
If bSuccess = False Then 
    ' An error occurred 
    Response.Write "&lt;p>An error occurred, the email was not sent.&lt;/p>" 
Else 
    ' No errors occurred 
    Response.Write "&lt;p>Thank you, your email was sent.&lt;/p>" 
End If 

set mail = nothing 

Response.write "Email sent OK!" 
%>

iman_ebru · Oct 9, 2004

اگه php هم ميخواي بگو من برات بنويسم

jspro · Oct 9, 2004

آقایون مرام همتونو طبق طبق!
ایولز !

(azar) · Oct 9, 2004

از تمام دوستاني كه ميخوان محبت كنن ممنونم . php و asp هردو را سرورم پشتيباني ميكنه لطفا برام بزاريد.

javad58 · Oct 9, 2004

سلام
قبل از همه از عليرضا تشكر مي كنم كه كد اون رو آماده كرده
من پيشنهاد ميكنم بدون نوشتن كد با استفاده از Dreamveawer MX 2004 اين صفحات رو توليد كنيد دريم براي اين كارا عاليه
موفق باشيد

(azar) · Oct 10, 2004

هنوز منتظر پاسخ دوستان هستم

mehdi_sabzeie · Nov 22, 2004

آقايو
اگه امكان داره فرم ارسال ايميل را با استفاده ار كامپوننت CDOSYS را كه امتحان كرده ايد و جواب داده اينجا بگذاريد.
مردم از بسكه كد ها جواب نداد
هاست من CDOSYS را ساپورت مي كند.

AliReza26 · Nov 24, 2004

کد:

&lt;%
Dim sMsg 
Dim sTo 
Dim sFrom 
Dim sSubject 
Dim sTextBody 

sTo = "[email protected]"
sFrom = "[email protected]"
sSubject = "subject text"
sTextBody = "body text"

Dim objMail
Set objMail = Server.CreateObject("CDO.Message")


objMail.From = sFrom 
objMail.To = sTo 
objMail.Subject= sSubject 
objMail.TextBody = sTextBody 

objMail.Send 

Set objMail = Nothing
%>

mehdi_sabzeie · Nov 24, 2004

آقا ببخشيد ها كار نكرد
!!!!!!!!!!!!!!!!!!!!!!!!!!

HABAL · Nov 24, 2004

لطفا فقط سوال نكنيد...يكم هم خودتون بگرديد....

I just googlize it : Sendmail form script

See the result

هم PHP هم ASP هم CGI توش هست

ـــــــــــــــــــــ

AliReza26 · Nov 27, 2004

mehdi_sabzeie گفت:
آقا ببخشيد ها كار نكرد
!!!!!!!!!!!!!!!!!!!!!!!!!!

8O
error چيه؟؟؟؟؟؟

mehdi_sabzeie · Nov 29, 2004

خطايي كه مي دهد اين است:
Create Object failed. Can not create CDO.Message
در خط بعد:
ُِDatabase is ReadOnly
Error 80081
در حالي كه من اصلا ديتابيس ندارم.