home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 March / Chip_2001-03_cd1.bin / bonus / shop / zavereb.asp < prev    next >
Text File  |  2000-07-25  |  9KB  |  231 lines
  1. <%@ Language=VBScript %>
  2. <html>
  3.  
  4. <head>
  5. <meta http-equiv="Content-Type" content="text/html; charset=windows-1250">
  6. <title>Formulß° k odeslßnφ z EB</title>
  7. <script language="JavaScript">
  8. <!--
  9. function opravdu () {
  10. ok = 1 ;
  11. if (document.forms[0].Jmeno.value == "") {
  12.         alert ('Bohu₧el jste nezapsali do formulß°e VaÜe jmΘno.\nDopl≥te jej a opakujte odeslßnφ !') ;
  13.         document.forms[0].Jmeno.focus() ;
  14.         ok = 0 ;
  15. }
  16. if (ok == 1) {
  17. if (document.forms[0].Mesto.value == "" && document.forms[0].Ulice.value == "") {
  18.         alert ('Bohu₧el jste nezapsali do formulß°e ani Φßst adresy.\nDopl≥te ji a opakujte odeslßnφ !') ;
  19.         document.forms[0].Mesto.focus() ;
  20.         ok = 0 ;
  21. }
  22. }
  23. if (ok == 1) {
  24. if (document.forms[0].PSC.value == "") {
  25.         alert ('Bohu₧el jste nezapsali do formulß°e PS╚.\nDopl≥te jej a opakujte odeslßnφ !') ;
  26.         document.forms[0].PSC.focus() ;
  27.         ok = 0 ;
  28. }
  29. }
  30. if (ok == 1) {
  31. if (document.forms[0].DIC.value == "") {
  32.         if (confirm ('Nezadali jste VaÜe DI╚. \nPokud jej nezadßte, nebude Vßm zaslßn da≥ov² doklad.\n\nChcete DI╚ zadat nynφ ?')) {
  33.         document.forms[0].DIC.focus() ;
  34.         ok = 0 ;
  35.         }
  36. }
  37. }
  38. if (ok == 1) {
  39.     if (confirm("Opravdu chcete VaÜi objednßvku odeslat ?") == true) { 
  40.         document.forms[0].submit() 
  41.         }
  42.     }
  43. }
  44. if (top.header.document.data.box5.value == "") {
  45. alert ('Nejprve prosφm zkontrolujte obsah svΘ objednßvky.')
  46. parent.document.location = "podramec2.htm"
  47. }
  48. var vs1 = Math.random() ;
  49. var mezi = vs1.toString() ;
  50. var vs2 = mezi.substring(3,12) ;
  51. var vs = parseFloat(vs2) ;
  52. var hledejpom = top.header.document.data.box5.value ;
  53. pozpom1 = hledejpom.lastIndexOf("cena objednßvky:") + 17 ;
  54. pozpom2 = hledejpom.lastIndexOf(",- KΦ vΦetn∞") ;
  55. var cena = hledejpom.substring(pozpom1, pozpom2) + ".00";
  56. if (cena == "0.00") {
  57. parent.document.location = "podramec.htm"
  58. }
  59. // --></script>
  60.  
  61. <base>
  62. </head>
  63.  
  64. <body bgcolor="#FFFFFF">
  65. <% 
  66. On Error Resume Next
  67. idu = Session("Id")
  68. if (idu > 0) then
  69. soubor = "../_private/user.mdb"
  70. zdroj = "DBQ=" & Server.MapPath(soubor)
  71. set objConn = server.createobject("adodb.connection")
  72. objConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & zdroj
  73. set A = objConn.execute("SELECT * FROM user WHERE id = " & idu)
  74. firma = A(3)
  75. osoba = A(4)
  76. ulice = A(5)
  77. mesto = A(6)
  78. psc = A(7)
  79. ico = A(8)
  80. dic = A(9)
  81. email = A("email")
  82. A.Close
  83. Set A = Nothing
  84. objConn.Close
  85. Set objConn = Nothing
  86. else
  87. firma = ""
  88. osoba = ""
  89. ulice = ""
  90. mesto = ""
  91. psc = ""
  92. ico = ""
  93. dic = ""
  94. email = "@"
  95. end If
  96. %>
  97. <script LANGUAGE="JavaScript">
  98. <!--
  99. document.write('<form method="POST" action="okeb.asp?vs=' + vs + '&cena=' + cena + '" name="objednavka">') ;
  100. // -->
  101. </script>
  102.  
  103.  
  104. <div align="left">
  105.  
  106. <table border="0" cellpadding="3" cellspacing="0" width="98%" bordercolor="#FFFFFF">
  107.   <tr>
  108.     <td width="100%" bgcolor="#FFFFFF"><p align="center"><font face="Verdana" color="#000080"><strong>Odeslßnφ
  109.     objednßvky</strong></font> </td>
  110.   </tr>
  111.   <tr align="center">
  112.     <td width="100%" bgcolor="#FFFFFF"><table width="100%">
  113.       <tr>
  114.         <td width="33%"><img src="expandia.gif" hspace="10" align="left" vspace="5" WIDTH="89"
  115.         HEIGHT="31"></td>
  116.         <td width="34%"><p align="center"><small><strong><font face="Verdana">Bezhotovostnφ
  117.         platba pro klienty<br>
  118.         Expandia Banky</font></strong></small> </td>
  119.         <td width="34%" align="center"><img src="expandia.gif" hspace="10" align="right"
  120.         vspace="5" WIDTH="89" HEIGHT="31"></td>
  121.       </tr>
  122.     </table>
  123.     </td>
  124.   </tr>
  125.   <tr align="center">
  126.     <td width="100%" align="center" bgcolor="#FFFFFF"> <table border="0" width="100%" cellspacing="0"
  127.     cellpadding="3">
  128.       <tr>
  129.         <td colspan="2" bgcolor="#C0C0C0" width="100%"><font face="Verdana" color="#000080"><strong>Zadejte
  130.         prosφm VaÜe ·daje: </strong></font></td>
  131.       </tr>
  132.       <tr>
  133.         <td bgcolor="#E5E5E5" align="right" colspan="2"><p align="left"><font face="Verdana"><small><small>Pro
  134.         pohyb mezi polo₧kami pou₧φvejte tabelßtor nebo myÜ</small></small></font> </td>
  135.       </tr>
  136.       <tr>
  137.         <td width="10%" bgcolor="#E5E5E5" align="right" nowrap><small><font face="Verdana">JmΘno</font></small></td>
  138.         <td bgcolor="#E5E5E5" align="left" width="90"><p align="left"><font face="Verdana"><input
  139.         type="text" name="Jmeno" size="35" value="<%= osoba %>"></font></td>
  140.       </tr>
  141.       <tr>
  142.         <td width="10%" bgcolor="#E5E5E5" align="right" nowrap><small><font face="Verdana">Firma</font></small></td>
  143.         <td bgcolor="#E5E5E5" align="left" width="90"><p align="left"><font face="Verdana"><input
  144.         type="text" name="Firma" size="35" value="<%= firma %>"></font></td>
  145.       </tr>
  146.       <tr>
  147.         <td width="10%" bgcolor="#E5E5E5" align="right" nowrap><small><font face="Verdana">Ulice</font></small></td>
  148.         <td bgcolor="#E5E5E5" align="left" width="90"><p align="left"><font face="Verdana"><input
  149.         type="text" name="Ulice" size="35" value="<%= ulice %>"></font></td>
  150.       </tr>
  151.       <tr>
  152.         <td width="10%" bgcolor="#E5E5E5" align="right" nowrap><small><font face="Verdana">M∞sto</font></small></td>
  153.         <td bgcolor="#E5E5E5" align="left" width="90"><p align="left"><font face="Verdana"><input
  154.         type="text" name="Mesto" size="35" value="<%= mesto %>"></font></td>
  155.       </tr>
  156.       <tr>
  157.         <td width="10%" bgcolor="#E5E5E5" align="right" nowrap><small><font face="Verdana">PS╚</font></small></td>
  158.         <td bgcolor="#E5E5E5" align="left" width="90"><font face="Verdana"><input type="text"
  159.         name="PSC" size="6" value="<%= psc %>"></font></td>
  160.       </tr>
  161.       <tr>
  162.         <td width="10%" bgcolor="#E5E5E5" align="right" nowrap><small><font face="Verdana">Telefon</font></small></td>
  163.         <td bgcolor="#E5E5E5" align="left" width="90"><p align="left"><font face="Verdana"><input
  164.         type="text" name="Telefon" size="20"></font></td>
  165.       </tr>
  166.       <tr>
  167.         <td width="10%" bgcolor="#E5E5E5" align="right" nowrap><small><font face="Verdana">Fax</font></small></td>
  168.         <td bgcolor="#E5E5E5" align="left" width="90"><p align="left"><font face="Verdana"><input
  169.         type="text" name="Fax" size="20"></font></td>
  170.       </tr>
  171.       <tr>
  172.         <td width="10%" bgcolor="#E5E5E5" align="right" nowrap><small><font face="Verdana">E-mail</font></small></td>
  173.         <td bgcolor="#E5E5E5" align="left" width="90"><p align="left"><font face="Verdana"><input
  174.         type="text" name="Email" size="20" value="<%= email %>"></font></td>
  175.       </tr>
  176.       <tr>
  177.         <td width="10%" bgcolor="#E5E5E5" align="right" nowrap><small><font face="Verdana">I╚O</font></small></td>
  178.         <td bgcolor="#E5E5E5" align="left" width="90"><p align="left"><font face="Verdana"><input
  179.         type="text" name="ICO" size="20" value="<%= ico %>"></font></td>
  180.       </tr>
  181.       <tr>
  182.         <td width="10%" bgcolor="#E5E5E5" align="right" nowrap><small><font face="Verdana">DI╚</font></small></td>
  183.         <td bgcolor="#E5E5E5" align="left" width="90"><p align="left"><font face="Verdana"><input
  184.         type="text" name="DIC" size="20" value="<%= dic %>"></font></td>
  185.       </tr>
  186.     </table>
  187.     <table border="0" cellspacing="0" cellpadding="3" width="100%">
  188.       <tr>
  189.         <td width="100%" colspan="2" bgcolor="#C0C0C0"><strong><font face="Verdana"
  190.         color="#000080">VaÜe objednßvka (rekapitulace):</font></strong></td>
  191.       </tr>
  192.       <tr>
  193.         <td bgcolor="#E5E5E5" width="10%" valign="top" align="right" nowrap><p align="right"><small><font
  194.         face="Verdana">╚φslo</font></small> </td>
  195.         <td bgcolor="#E5E5E5" width="90%"><input type="text" name="Cislo_obj" size="20"></td>
  196.       </tr>
  197.       <tr>
  198.         <td bgcolor="#E5E5E5" width="10%" valign="top" align="right" nowrap><p align="right"><small><font
  199.         face="Verdana">Text</font></small></td>
  200.         <td bgcolor="#E5E5E5" width="90%"><font face="Verdana"><script LANGUAGE="JavaScript">
  201. <!--
  202. document.write('<textarea rows="10" name="Text" readonly cols="45">',top.header.document.data.box5.value + '\nVariabilnφ symbol: ' + vs,'</textarea>') ;
  203. // -->
  204. </script></font></td>
  205.       </tr>
  206.       <tr>
  207.         <td bgcolor="#C0C0C0" width="100%" valign="top" align="right" nowrap colspan="2"><p
  208.         align="left"><font face="Verdana" color="#000080"><strong>VaÜe p°ipomφnky a poznßmky:</strong></font>
  209.         </td>
  210.       </tr>
  211.       <tr>
  212.         <td bgcolor="#E5E5E5" width="10%" valign="top" align="right" nowrap> </td>
  213.         <td bgcolor="#E5E5E5" width="90%"><font face="Verdana"><textarea rows="5" name="Poznamka"
  214.         cols="45"></textarea></font></td>
  215.       </tr>
  216.     </table>
  217.     <p><small><font face="Verdana">Stisknutφm tlaΦφtka "Odeslat"
  218.     objednßvku definitivn∞ odeÜlete na nßÜ server</font></small><font face="Verdana">,<br>
  219.     <small>a budete p°esm∞rovßni na server Expandia Banky k provedenφ ·hrady.</small></font></td>
  220.   </tr>
  221.   <tr align="center">
  222.     <td width="100%" bgcolor="#FFFFFF" align="center">.<input type="button"
  223.     value=" Odeslat a zaplatit " name="SUBMIT" onClick="opravdu ()">.</td>
  224.   </tr>
  225. </table>
  226. </div>
  227.  
  228. <p align="center"> </p>
  229. </body>
  230. </html>
  231.