home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 March / Chip_2000-03_cd.bin / tema / Tatousek / scripts / formmail.asp next >
Encoding:
Text File  |  1999-12-22  |  17.9 KB  |  743 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.          if (Request.Form("polozka_11_nazev").Count != 0)
  144.                {
  145.            polozka_11_nazev = Request.Form ("polozka_11_nazev") + ": "
  146.                }
  147.            else
  148.  
  149.           polozka_11_nazev = "";
  150.  
  151.  
  152.  
  153.          if (Request.Form("polozka_12_nazev").Count != 0)
  154.                {
  155.            polozka_12_nazev = Request.Form ("polozka_12_nazev") + ": "
  156.                }
  157.            else
  158.  
  159.           polozka_12_nazev = "";
  160.  
  161.  
  162.  
  163.          if (Request.Form("polozka_13_nazev").Count != 0)
  164.                {
  165.            polozka_13_nazev = Request.Form ("polozka_13_nazev") + ": "
  166.                }
  167.            else
  168.  
  169.           polozka_13_nazev = "";
  170.  
  171.  
  172.  
  173.          if (Request.Form("polozka_14_nazev").Count != 0)
  174.                {
  175.            polozka_14_nazev = Request.Form ("polozka_14_nazev") + ": "
  176.                }
  177.            else
  178.  
  179.           polozka_14_nazev = "";
  180.  
  181.  
  182.  
  183.          if (Request.Form("polozka_15_nazev").Count != 0)
  184.                {
  185.            polozka_15_nazev = Request.Form ("polozka_15_nazev") + ": "
  186.                }
  187.            else
  188.  
  189.           polozka_15_nazev = "";
  190.  
  191.  
  192.  
  193.          if (Request.Form("polozka_16_nazev").Count != 0)
  194.                {
  195.            polozka_16_nazev = Request.Form ("polozka_16_nazev") + ": "
  196.                }
  197.            else
  198.  
  199.           polozka_16_nazev = "";
  200.  
  201.  
  202.  
  203.          if (Request.Form("polozka_17_nazev").Count != 0)
  204.                {
  205.            polozka_17_nazev = Request.Form ("polozka_17_nazev") + ": "
  206.                }
  207.            else
  208.  
  209.           polozka_17_nazev = "";
  210.  
  211.  
  212.  
  213.          if (Request.Form("polozka_18_nazev").Count != 0)
  214.                {
  215.            polozka_18_nazev = Request.Form ("polozka_18_nazev") + ": "
  216.                }
  217.            else
  218.  
  219.           polozka_18_nazev = "";
  220.  
  221.  
  222.  
  223.          if (Request.Form("polozka_19_nazev").Count != 0)
  224.                {
  225.            polozka_19_nazev = Request.Form ("polozka_19_nazev") + ": "
  226.                }
  227.            else
  228.  
  229.           polozka_19_nazev = "";
  230.  
  231.  
  232.  
  233.          if (Request.Form("polozka_20_nazev").Count != 0)
  234.                {
  235.            polozka_20_nazev = Request.Form ("polozka_20_nazev") + ": "
  236.                }
  237.            else
  238.  
  239.           polozka_20_nazev = "";
  240.  
  241.  
  242.  
  243.          if (Request.Form("polozka_21_nazev").Count != 0)
  244.                {
  245.            polozka_21_nazev = Request.Form ("polozka_21_nazev") + ": "
  246.                }
  247.            else
  248.  
  249.           polozka_21_nazev = "";
  250.  
  251.  
  252.  
  253.          if (Request.Form("polozka_22_nazev").Count != 0)
  254.                {
  255.            polozka_22_nazev = Request.Form ("polozka_22_nazev") + ": "
  256.                }
  257.            else
  258.  
  259.           polozka_22_nazev = "";
  260.  
  261.  
  262.  
  263.          if (Request.Form("polozka_23_nazev").Count != 0)
  264.                {
  265.            polozka_23_nazev = Request.Form ("polozka_23_nazev") + ": "
  266.                }
  267.            else
  268.  
  269.           polozka_23_nazev = "";
  270.  
  271.  
  272.  
  273.          if (Request.Form("polozka_24_nazev").Count != 0)
  274.                {
  275.            polozka_24_nazev = Request.Form ("polozka_24_nazev") + ": "
  276.                }
  277.            else
  278.  
  279.           polozka_24_nazev = "";
  280.  
  281.  
  282.  
  283.          if (Request.Form("polozka_25_nazev").Count != 0)
  284.                {
  285.            polozka_25_nazev = Request.Form ("polozka_25_nazev") + ": "
  286.                }
  287.            else
  288.  
  289.           polozka_25_nazev = "";
  290.  
  291.  
  292.  
  293.          if (Request.Form("polozka_26_nazev").Count != 0)
  294.                {
  295.            polozka_26_nazev = Request.Form ("polozka_26_nazev") + ": "
  296.                }
  297.            else
  298.  
  299.           polozka_26_nazev = "";
  300.  
  301.  
  302.  
  303.          if (Request.Form("polozka_27_nazev").Count != 0)
  304.                {
  305.            polozka_27_nazev = Request.Form ("polozka_27_nazev") + ": "
  306.                }
  307.            else
  308.  
  309.           polozka_27_nazev = "";
  310.  
  311.  
  312.  
  313.          if (Request.Form("polozka_28_nazev").Count != 0)
  314.                {
  315.            polozka_28_nazev = Request.Form ("polozka_28_nazev") + ": "
  316.                }
  317.            else
  318.  
  319.           polozka_28_nazev = "";
  320.  
  321.  
  322.  
  323.          if (Request.Form("polozka_29_nazev").Count != 0)
  324.                {
  325.            polozka_29_nazev = Request.Form ("polozka_29_nazev") + ": "
  326.                }
  327.            else
  328.  
  329.           polozka_29_nazev = "";
  330.  
  331.  
  332.  
  333.          if (Request.Form("polozka_30_nazev").Count != 0)
  334.                {
  335.            polozka_30_nazev = Request.Form ("polozka_30_nazev") + ": "
  336.                }
  337.            else
  338.  
  339.           polozka_30_nazev = "";
  340.         
  341.  
  342.  
  343.  
  344.          if (Request.Form("polozka_1_body").Count != 0)
  345.                {
  346.            polozka_1_body = Request.Form ("polozka_1_body")
  347.                }
  348.            else
  349.  
  350.           polozka_1_body = "";
  351.  
  352.  
  353.  
  354.          if (Request.Form("polozka_2_body").Count != 0)
  355.                {
  356.            polozka_2_body = Request.Form ("polozka_2_body")
  357.                }
  358.            else
  359.  
  360.  
  361.           polozka_2_body = "";
  362.  
  363.  
  364.  
  365.          if (Request.Form("polozka_3_body").Count != 0)
  366.                {
  367.            polozka_3_body = Request.Form ("polozka_3_body")
  368.                }
  369.            else
  370.  
  371.           polozka_3_body = "";
  372.  
  373.  
  374.  
  375.  
  376.          if (Request.Form("polozka_4_body").Count != 0)
  377.                {
  378.            polozka_4_body = Request.Form ("polozka_4_body")
  379.         }
  380.         else
  381.  
  382.           polozka_4_body = "";
  383.  
  384.  
  385.  
  386.          if (Request.Form("polozka_5_body").Count != 0)
  387.                {
  388.            polozka_5_body = Request.Form ("polozka_5_body")
  389.                }
  390.            else
  391.  
  392.           polozka_5_body = "";
  393.  
  394.  
  395.  
  396.          if (Request.Form("polozka_6_body").Count != 0)
  397.                {
  398.            polozka_6_body = Request.Form ("polozka_6_body")
  399.                }
  400.            else
  401.  
  402.           polozka_6_body = "";
  403.  
  404.  
  405.  
  406.          if (Request.Form("polozka_7_body").Count != 0)
  407.                {
  408.            polozka_7_body = Request.Form ("polozka_7_body")
  409.                }
  410.            else
  411.  
  412.           polozka_7_body = "";
  413.  
  414.  
  415.  
  416.          if (Request.Form("polozka_8_body").Count != 0)
  417.                {
  418.            polozka_8_body = Request.Form ("polozka_8_body")
  419.                }
  420.            else
  421.  
  422.           polozka_8_body = "";
  423.  
  424.  
  425.  
  426.          if (Request.Form("polozka_9_body").Count != 0)
  427.                {
  428.            polozka_9_body = Request.Form ("polozka_9_body")
  429.                }
  430.            else
  431.  
  432.           polozka_9_body = "";
  433.  
  434.  
  435.  
  436.          if (Request.Form("polozka_10_body").Count != 0)
  437.                {
  438.            polozka_10_body = Request.Form ("polozka_10_body")
  439.                }
  440.            else
  441.  
  442.           polozka_10_body = "";
  443.  
  444.  
  445.  
  446.          if (Request.Form("polozka_11_body").Count != 0)
  447.                {
  448.            polozka_11_body = Request.Form ("polozka_11_body")
  449.                }
  450.            else
  451.  
  452.           polozka_11_body = "";
  453.  
  454.  
  455.  
  456.          if (Request.Form("polozka_12_body").Count != 0)
  457.                {
  458.            polozka_12_body = Request.Form ("polozka_12_body")
  459.                }
  460.            else
  461.  
  462.           polozka_12_body = "";
  463.  
  464.  
  465.  
  466.          if (Request.Form("polozka_13_body").Count != 0)
  467.                {
  468.            polozka_13_body = Request.Form ("polozka_13_body")
  469.                }
  470.            else
  471.  
  472.           polozka_13_body = "";
  473.  
  474.  
  475.  
  476.          if (Request.Form("polozka_14_body").Count != 0)
  477.                {
  478.            polozka_14_body = Request.Form ("polozka_14_body")
  479.                }
  480.            else
  481.  
  482.           polozka_14_body = "";
  483.  
  484.  
  485.  
  486.          if (Request.Form("polozka_15_body").Count != 0)
  487.                {
  488.            polozka_15_body = Request.Form ("polozka_15_body")
  489.                }
  490.            else
  491.  
  492.           polozka_15_body = "";
  493.  
  494.  
  495.  
  496.          if (Request.Form("polozka_16_body").Count != 0)
  497.                {
  498.            polozka_16_body = Request.Form ("polozka_16_body")
  499.                }
  500.            else
  501.  
  502.           polozka_16_body = "";
  503.  
  504.  
  505.  
  506.          if (Request.Form("polozka_17_body").Count != 0)
  507.                {
  508.            polozka_17_body = Request.Form ("polozka_17_body")
  509.                }
  510.            else
  511.  
  512.           polozka_17_body = "";
  513.  
  514.  
  515.  
  516.          if (Request.Form("polozka_18_body").Count != 0)
  517.                {
  518.            polozka_18_body = Request.Form ("polozka_18_body")
  519.                }
  520.            else
  521.  
  522.           polozka_18_body = "";
  523.  
  524.  
  525.  
  526.          if (Request.Form("polozka_19_body").Count != 0)
  527.                {
  528.            polozka_19_body = Request.Form ("polozka_19_body")
  529.                }
  530.            else
  531.  
  532.           polozka_19_body = "";
  533.  
  534.  
  535.  
  536.          if (Request.Form("polozka_20_body").Count != 0)
  537.                {
  538.            polozka_20_body = Request.Form ("polozka_20_body")
  539.                }
  540.            else
  541.  
  542.           polozka_20_body = "";
  543.  
  544.  
  545.  
  546.          if (Request.Form("polozka_21_body").Count != 0)
  547.                {
  548.            polozka_21_body = Request.Form ("polozka_21_body")
  549.                }
  550.            else
  551.  
  552.           polozka_21_body = "";
  553.  
  554.  
  555.  
  556.          if (Request.Form("polozka_22_body").Count != 0)
  557.                {
  558.            polozka_22_body = Request.Form ("polozka_22_body")
  559.                }
  560.            else
  561.  
  562.           polozka_22_body = "";
  563.  
  564.  
  565.  
  566.          if (Request.Form("polozka_23_body").Count != 0)
  567.                {
  568.            polozka_23_body = Request.Form ("polozka_23_body")
  569.                }
  570.            else
  571.  
  572.           polozka_23_body = "";
  573.  
  574.  
  575.  
  576.          if (Request.Form("polozka_24_body").Count != 0)
  577.                {
  578.            polozka_24_body = Request.Form ("polozka_24_body")
  579.                }
  580.            else
  581.  
  582.           polozka_24_body = "";
  583.  
  584.  
  585.  
  586.          if (Request.Form("polozka_25_body").Count != 0)
  587.                {
  588.            polozka_25_body = Request.Form ("polozka_25_body")
  589.                }
  590.            else
  591.  
  592.           polozka_25_body = "";
  593.  
  594.  
  595.  
  596.          if (Request.Form("polozka_26_body").Count != 0)
  597.                {
  598.            polozka_26_body = Request.Form ("polozka_26_body")
  599.                }
  600.            else
  601.  
  602.           polozka_26_body = "";
  603.  
  604.  
  605.  
  606.          if (Request.Form("polozka_27_body").Count != 0)
  607.                {
  608.            polozka_27_body = Request.Form ("polozka_27_body")
  609.                }
  610.            else
  611.  
  612.           polozka_27_body = "";
  613.  
  614.  
  615.  
  616.          if (Request.Form("polozka_28_body").Count != 0)
  617.                {
  618.            polozka_28_body = Request.Form ("polozka_28_body")
  619.                }
  620.            else
  621.  
  622.           polozka_28_body = "";
  623.  
  624.  
  625.  
  626.          if (Request.Form("polozka_29_body").Count != 0)
  627.                {
  628.            polozka_29_body = Request.Form ("polozka_29_body")
  629.                }
  630.            else
  631.  
  632.           polozka_29_body = "";
  633.  
  634.  
  635.  
  636.          if (Request.Form("polozka_30_body").Count != 0)
  637.                {
  638.            polozka_30_body = Request.Form ("polozka_30_body")
  639.                }
  640.            else
  641.  
  642.           polozka_30_body = "";
  643.  
  644.  
  645.  
  646. ;
  647.   
  648.             JMail.Sender = (odesilatel_email);
  649.             JMail.SenderName = (odesilatel_jmeno);
  650.             JMail.Subject = (subject);
  651.             JMail.AddRecipient (Request.Form ("email"));
  652.  
  653.  
  654.  
  655.          if (Request.Form ("zakazat_hlavicku") != "ano")
  656.                {
  657.  
  658.          JMail.AppendText ("Odesilatel: " + odesilatel_jmeno + "\n");
  659.          JMail.AppendText ("E-Mail: " + odesilatel_email + "\n" + "\n");
  660.            };
  661.  
  662.          if (Request.Form ("technicke_informace") == "ano")
  663.                {
  664.          JMail.AppendText ("USER_IP: " + Request.ServerVariables("REMOTE_ADDR") + "\n");
  665.          JMail.AppendText ("HTTP_HOST: " + Request.ServerVariables("HTTP_HOST") + "\n");
  666.          JMail.AppendText ("HTTP_REFERER: " + Request.ServerVariables("HTTP_REFERER") + "\n");
  667.          JMail.AppendText ("HTTP_USER_AGENT: " + Request.ServerVariables("HTTP_USER_AGENT") + "\n" + "\n");
  668.           
  669.  
  670.                };
  671.  
  672.             JMail.AppendText (polozka_1_nazev + polozka_1_body + "\n");
  673.             JMail.AppendText (polozka_2_nazev + polozka_2_body + "\n");
  674.             JMail.AppendText (polozka_3_nazev + polozka_3_body + "\n");
  675.             JMail.AppendText (polozka_4_nazev + polozka_4_body + "\n");
  676.             JMail.AppendText (polozka_5_nazev + polozka_5_body + "\n");
  677.             JMail.AppendText (polozka_6_nazev + polozka_6_body + "\n");
  678.             JMail.AppendText (polozka_7_nazev + polozka_7_body + "\n");
  679.             JMail.AppendText (polozka_8_nazev + polozka_8_body + "\n");
  680.             JMail.AppendText (polozka_9_nazev + polozka_9_body + "\n");
  681.             JMail.AppendText (polozka_10_nazev + polozka_10_body + "\n");
  682.             JMail.AppendText (polozka_11_nazev + polozka_11_body + "\n");
  683.             JMail.AppendText (polozka_12_nazev + polozka_12_body + "\n");
  684.             JMail.AppendText (polozka_13_nazev + polozka_13_body + "\n");
  685.             JMail.AppendText (polozka_14_nazev + polozka_14_body + "\n");
  686.             JMail.AppendText (polozka_15_nazev + polozka_15_body + "\n");
  687.             JMail.AppendText (polozka_16_nazev + polozka_16_body + "\n");
  688.             JMail.AppendText (polozka_17_nazev + polozka_17_body + "\n");
  689.             JMail.AppendText (polozka_18_nazev + polozka_18_body + "\n");
  690.             JMail.AppendText (polozka_19_nazev + polozka_19_body + "\n");
  691.             JMail.AppendText (polozka_20_nazev + polozka_20_body + "\n");
  692.             JMail.AppendText (polozka_21_nazev + polozka_21_body + "\n");
  693.             JMail.AppendText (polozka_22_nazev + polozka_22_body + "\n");
  694.             JMail.AppendText (polozka_23_nazev + polozka_23_body + "\n");
  695.             JMail.AppendText (polozka_24_nazev + polozka_24_body + "\n");
  696.             JMail.AppendText (polozka_25_nazev + polozka_25_body + "\n");
  697.             JMail.AppendText (polozka_26_nazev + polozka_26_body + "\n");
  698.             JMail.AppendText (polozka_27_nazev + polozka_27_body + "\n");
  699.             JMail.AppendText (polozka_28_nazev + polozka_28_body + "\n");
  700.             JMail.AppendText (polozka_29_nazev + polozka_29_body + "\n");
  701.             JMail.AppendText (polozka_30_nazev + polozka_30_body + "\n");
  702.  
  703.  
  704.  
  705.             JMail.AddHeader ("Originating-IP", Request.ServerVariables("REMOTE_ADDR"));
  706.             JMail.AddHeader ("Generated by JT WebDesign Server - http://www.jtwds.cz, version: ", version);
  707.  
  708.             JMail.Execute ();
  709.  
  710.            if (Request.Form("url").Count != 0)
  711.  
  712.                        {
  713.           Response.Redirect (Request.Form ("url"))
  714.  
  715.                        }
  716.  
  717.           else
  718.  
  719.           {  %>
  720.  
  721. <html>
  722. <head>
  723. <title>JT WebDesign Studio - Odeslßno...</title>
  724. <meta name="Copyright" content="JT WebDesign Studio - Jiri Tatousek - http://www.jtwds.cz">
  725. <meta name="Copyright" content="JT WebDesign Studio - Jiri Tatousek - info@jtwds.cz">
  726. <meta http-equiv="Content-Type" content="text/html; charset=windows-1250">
  727. <body text="#000000" bgcolor="#FFFFFF">
  728. </head>
  729.  
  730. <center><b><font face="Arial CE, Arial" size="3">VßÜ formulß° byl odeslßn</font></b></center>
  731.  
  732. <br>
  733.  
  734. <center><a href="<% Response.Write (Request.ServerVariables ("HTTP_REFERER")) %>" target="_self">Zp∞t na odkazujφcφ strßnku</a></center>
  735.  
  736. </body>
  737. </html>
  738.  
  739.  
  740.      <%     };
  741.  
  742.  
  743. %>