<%@LANGUAGE="VBSCRIPT"%> <% mes = "" IsSuccess = false sTo = Trim(Request.Form("FriendEmail1")) sCc = Trim(Request.Form("FriendEmail2")) sBcc = "admin@avakashvedh.com" sFrom = Trim(Request.Form("YourEmail")) sSubject = "Please visit - www.Avakashvedh.com website" sName = Trim(Request.Form("Name")) sMailServer = "127.0.0.1" sBody = sBody & "Dear " & Request.Form("FriendName1") sBody = sBody & ", " & Request.Form("FriendName2") & vbCrLf sBody = sBody & "Namaskaar " & vbCrLf sBody = sBody & " "& vbCrLf sBody = sBody & "Khagolshastravail Marathitil Pahili Website" & vbCrLf sBody = sBody & " " & vbCrLf sBody = sBody & "http://www.avakashvedh.com" & vbCrLf sBody = sBody & " " & vbCrLf sBody = sBody & "Pahaayalaa visaru nakaa" & vbCrLf sBody = sBody & " " & vbCrLf sBody = sBody & Request.Form("YourMessage") & vbCrLf sBody = sBody & " " & vbCrLf sBody = sBody & "Aapala Krupabhilashi" & vbCrLf sBody = sBody & Request.Form("YourName") & vbCrLf sBody = sBody & vbCrLf if Request("__action")="TestEMail" then TestEMail() end if Sub TestEMail() Set objMail = Server.CreateObject("CDO.Message") Set objConf = Server.CreateObject("CDO.Configuration") Set objFields = objConf.Fields With objFields .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = sMailServer .Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 10 .Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 .Update End With With objMail Set .Configuration = objConf .From = sFrom .To = sTo .Cc = sCc .Bcc = sBcc .Subject = sSubject .TextBody = sBody End With Err.Clear on error resume next objMail.Send if len(Err.Description) = 0 then Response.Redirect "mitranna_kalava_thanks.html" else Response.Redirect "mitranna_kalava_thanks.html" end if Set objFields = Nothing Set objConf = Nothing Set objMail = Nothing End sub %> Avakashvedh - First Marathi Website on Astronomy
 
 
 

 
 
 
 
पहिले पान
हा महिना
सुरुवात
ओळख सूर्यमालेची
लेख आणि कथा
इतर माहिती
अंतराळ
खगोलीय गोष्टी
भारतीय खगोलशास्त्रज्ञ
भारतीय खगोलशास्त्र
प्रश्नोत्तरे
अधिक माहिती
निरीक्षणे
खरेदी करा
डाऊनलोड
आमची ओळख
 
 
 

मोफत सभासदत्व
 

अवकाशवेध.कॉमचे मोफत सभासद होण्यासाठी इथे क्लिक करा.
 

मित्र-मैत्रिणींना कळवा
\

अवकाशवेध.कॉम बद्दल आपल्या
मित्र-मैत्रिणींना सांगा.
 

पहिल्या पानावर जाण्यासाठी इथे क्लिक करा.
 

अवकाशवेध.कॉम बद्दल आपल्या मित्र-मैत्रिणींना कळवा.
खालिल जागेमध्ये आपले नाव व ई-मेल तसेच त्याखालिल जागेमध्ये आपल्या मित्र-मैत्रीणींची नावे तसेच ई-मेल भरुन पाठविल्यास अवकाशवेध.कॉम बद्दल त्यांना आपल्यानावाने माहितीचा ई-मेल जाईल.
 

आपले नाव

   आपला ई-मेल
  
         
  मित्राचे नाव १
   मित्राचा ई-मेल १
  
         
  मित्राचे नाव २
   मित्राचा ई-मेल २
  
         
  इतर काही लिहायचे असल्यास खाली लिहा.
  
     
  ...  
 
 
 
 
अक्षरांचा आकार वाढवा  /  अक्षरांचा आकार पुर्ववत करा

वर जाण्यासाठी

अवकाशवेध.कॉम वरील माहिती संबंधी