home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 March / Chip_2000-03_cd.bin / tema / Tatousek / scripts / freemail.asp < prev   
Text File  |  1999-12-22  |  8KB  |  323 lines
  1. <%@ LANGUAGE="JavaScript" %>
  2. <%
  3.  
  4.             JMail = Server.CreateObject("JMail.SMTPMail");
  5.             JMail.ServerAddress = "mail.tatousek.cz";
  6.             
  7.             version = 1.40;
  8.  
  9.  
  10.          if (Request.Form("odesilatel_email").Count == 0)
  11.                {
  12.            odesilatel_email = "robot@jtwds.cz"
  13.                }
  14.  
  15.          else
  16.           
  17.            odesilatel_email = Request.Form ("odesilatel_email");
  18.  
  19.  
  20.  
  21.          if (Request.Form("odesilatel_jmeno").Count == 0)
  22.                {
  23.            odesilatel_jmeno = "Robot systemu JT WebDesign Studio - http://www.jtwds.cz"
  24.                }
  25.  
  26.          else
  27.           
  28.            odesilatel_jmeno = Request.Form ("odesilatel_jmeno");
  29.  
  30.  
  31.  
  32.          if (Request.Form("subject").Count == 0)
  33.                {
  34.            subject = "Udaje z formulare";
  35.                }
  36.            else
  37.  
  38.            subject = Request.Form ("subject");
  39.  
  40.  
  41.          if (Request.Form("polozka_1_nazev").Count != 0)
  42.                {
  43.            polozka_1_nazev = Request.Form ("polozka_1_nazev") + ": "
  44.                }
  45.            else
  46.  
  47.           polozka_1_nazev = "";
  48.  
  49.  
  50.  
  51.          if (Request.Form("polozka_2_nazev").Count != 0)
  52.                {
  53.            polozka_2_nazev = Request.Form ("polozka_2_nazev") + ": "
  54.                }
  55.            else
  56.  
  57.  
  58.           polozka_2_nazev = "";
  59.  
  60.  
  61.  
  62.          if (Request.Form("polozka_3_nazev").Count != 0)
  63.                {
  64.            polozka_3_nazev = Request.Form ("polozka_3_nazev") + ": "
  65.                }
  66.            else
  67.  
  68.           polozka_3_nazev = "";
  69.  
  70.  
  71.  
  72.  
  73.          if (Request.Form("polozka_4_nazev").Count != 0)
  74.                {
  75.            polozka_4_nazev = Request.Form ("polozka_4_nazev") + ": "
  76.                }
  77.            else
  78.  
  79.           polozka_4_nazev = "";
  80.  
  81.  
  82.  
  83.          if (Request.Form("polozka_5_nazev").Count != 0)
  84.                {
  85.            polozka_5_nazev = Request.Form ("polozka_5_nazev") + ": "
  86.                }
  87.            else
  88.  
  89.           polozka_5_nazev = "";
  90.  
  91.  
  92.  
  93.          if (Request.Form("polozka_6_nazev").Count != 0)
  94.                {
  95.            polozka_6_nazev = Request.Form ("polozka_6_nazev") + ": "
  96.                }
  97.            else
  98.  
  99.           polozka_6_nazev = "";
  100.  
  101.  
  102.  
  103.          if (Request.Form("polozka_7_nazev").Count != 0)
  104.                {
  105.            polozka_7_nazev = Request.Form ("polozka_7_nazev") + ": "
  106.                }
  107.            else
  108.  
  109.           polozka_7_nazev = "";
  110.  
  111.  
  112.  
  113.          if (Request.Form("polozka_8_nazev").Count != 0)
  114.                {
  115.            polozka_8_nazev = Request.Form ("polozka_8_nazev") + ": "
  116.                }
  117.            else
  118.  
  119.           polozka_8_nazev = "";
  120.  
  121.  
  122.  
  123.          if (Request.Form("polozka_9_nazev").Count != 0)
  124.                {
  125.            polozka_9_nazev = Request.Form ("polozka_9_nazev") + ": "
  126.                }
  127.            else
  128.  
  129.           polozka_9_nazev = "";
  130.  
  131.  
  132.  
  133.          if (Request.Form("polozka_10_nazev").Count != 0)
  134.                {
  135.            polozka_10_nazev = Request.Form ("polozka_10_nazev") + ": "
  136.                }
  137.            else
  138.  
  139.           polozka_10_nazev = "";
  140.         
  141.  
  142.  
  143.  
  144.          if (Request.Form("polozka_1_body").Count != 0)
  145.                {
  146.            polozka_1_body = Request.Form ("polozka_1_body")
  147.                }
  148.            else
  149.  
  150.           polozka_1_body = "";
  151.  
  152.  
  153.  
  154.          if (Request.Form("polozka_2_body").Count != 0)
  155.                {
  156.            polozka_2_body = Request.Form ("polozka_2_body")
  157.                }
  158.            else
  159.  
  160.  
  161.           polozka_2_body = "";
  162.  
  163.  
  164.  
  165.          if (Request.Form("polozka_3_body").Count != 0)
  166.                {
  167.            polozka_3_body = Request.Form ("polozka_3_body")
  168.                }
  169.            else
  170.  
  171.           polozka_3_body = "";
  172.  
  173.  
  174.  
  175.  
  176.          if (Request.Form("polozka_4_body").Count != 0)
  177.                {
  178.            polozka_4_body = Request.Form ("polozka_4_body")
  179.         }
  180.         else
  181.  
  182.           polozka_4_body = "";
  183.  
  184.  
  185.  
  186.          if (Request.Form("polozka_5_body").Count != 0)
  187.                {
  188.            polozka_5_body = Request.Form ("polozka_5_body")
  189.                }
  190.            else
  191.  
  192.           polozka_5_body = "";
  193.  
  194.  
  195.  
  196.          if (Request.Form("polozka_6_body").Count != 0)
  197.                {
  198.            polozka_6_body = Request.Form ("polozka_6_body")
  199.                }
  200.            else
  201.  
  202.           polozka_6_body = "";
  203.  
  204.  
  205.  
  206.          if (Request.Form("polozka_7_body").Count != 0)
  207.                {
  208.            polozka_7_body = Request.Form ("polozka_7_body")
  209.                }
  210.            else
  211.  
  212.           polozka_7_body = "";
  213.  
  214.  
  215.  
  216.          if (Request.Form("polozka_8_body").Count != 0)
  217.                {
  218.            polozka_8_body = Request.Form ("polozka_8_body")
  219.                }
  220.            else
  221.  
  222.           polozka_8_body = "";
  223.  
  224.  
  225.  
  226.          if (Request.Form("polozka_9_body").Count != 0)
  227.                {
  228.            polozka_9_body = Request.Form ("polozka_9_body")
  229.                }
  230.            else
  231.  
  232.           polozka_9_body = "";
  233.  
  234.  
  235.  
  236.          if (Request.Form("polozka_10_body").Count != 0)
  237.                {
  238.            polozka_10_body = Request.Form ("polozka_10_body")
  239.                }
  240.            else
  241.  
  242.           polozka_10_body = "";
  243.  
  244.  
  245.  
  246. ;
  247.   
  248.             JMail.Sender = (odesilatel_email);
  249.             JMail.SenderName = (odesilatel_jmeno);
  250.             JMail.Subject = (subject);
  251.             JMail.AddRecipient (Request.Form ("email"));
  252.  
  253.  
  254.  
  255.          if (Request.Form ("zakazat_hlavicku") != "ano")
  256.                {
  257.  
  258.          JMail.AppendText ("Odesilatel: " + odesilatel_jmeno + "\n");
  259.          JMail.AppendText ("E-Mail: " + odesilatel_email + "\n" + "\n");
  260.            };
  261.  
  262.          if (Request.Form ("technicke_informace") == "ano")
  263.                {
  264.          JMail.AppendText ("USER_IP: " + Request.ServerVariables("REMOTE_ADDR") + "\n");
  265.          JMail.AppendText ("HTTP_HOST: " + Request.ServerVariables("HTTP_HOST") + "\n");
  266.          JMail.AppendText ("HTTP_REFERER: " + Request.ServerVariables("HTTP_REFERER") + "\n");
  267.          JMail.AppendText ("HTTP_USER_AGENT: " + Request.ServerVariables("HTTP_USER_AGENT") + "\n" + "\n");
  268.           
  269.  
  270.                };
  271.  
  272.             JMail.AppendText (polozka_1_nazev + polozka_1_body + "\n");
  273.             JMail.AppendText (polozka_2_nazev + polozka_2_body + "\n");
  274.             JMail.AppendText (polozka_3_nazev + polozka_3_body + "\n");
  275.             JMail.AppendText (polozka_4_nazev + polozka_4_body + "\n");
  276.             JMail.AppendText (polozka_5_nazev + polozka_5_body + "\n");
  277.             JMail.AppendText (polozka_6_nazev + polozka_6_body + "\n");
  278.             JMail.AppendText (polozka_7_nazev + polozka_7_body + "\n");
  279.             JMail.AppendText (polozka_8_nazev + polozka_8_body + "\n");
  280.             JMail.AppendText (polozka_9_nazev + polozka_9_body + "\n");
  281.             JMail.AppendText (polozka_10_nazev + polozka_10_body + "\n");
  282.  
  283.  
  284.  
  285.             JMail.AddHeader ("Originating-IP", Request.ServerVariables("REMOTE_ADDR"));
  286.             JMail.AddHeader ("Generated by JT WebDesign Server - http://www.jtwds.cz, version: ", version);
  287.  
  288.             JMail.Execute ();
  289.  
  290.            if (Request.Form("url").Count != 0)
  291.  
  292.                        {
  293.           Response.Redirect (Request.Form ("url"))
  294.  
  295.                        }
  296.  
  297.           else
  298.  
  299.           {  %>
  300.  
  301. <html>
  302. <head>
  303. <title>JT WebDesign Studio - Odeslßno...</title>
  304. <meta name="Copyright" content="JT WebDesign Studio - Jiri Tatousek - http://www.jtwds.cz">
  305. <meta name="Copyright" content="JT WebDesign Studio - Jiri Tatousek - info@jtwds.cz">
  306. <meta http-equiv="Content-Type" content="text/html; charset=windows-1250">
  307. <body text="#000000" bgcolor="#FFFFFF">
  308. </head>
  309.  
  310. <center><b><font face="Arial CE, Arial" size="3">VßÜ formulß° byl odeslßn</font></b></center>
  311.  
  312. <br>
  313.  
  314. <center><a href="<% Response.Write (Request.ServerVariables ("HTTP_REFERER")) %>" target="_self">Zp∞t na odkazujφcφ strßnku</a></center>
  315.  
  316. </body>
  317. </html>
  318.  
  319.  
  320.      <%     };
  321.  
  322.  
  323. %>