home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 May / Chip_2000-05_cd1.bin / tema / SW602 / Winbase / EShop_demo / ZLOGIN.WWW < prev    next >
Text File  |  2000-03-16  |  10KB  |  286 lines
  1. {$$3220259799 .                              }<!doctype html public "-//W3C//DTD HTML 3.2 Final//EN">
  2.  
  3. <html>
  4. <head>
  5. <meta http-equiv="CONTENT-TYPE" content="TEXT/HTML; CHARSET=WINDOWS-1250">
  6. <title>602ESHOP</title>
  7. <STYLE TYPE="text/css">
  8. <!--
  9. body { font-family: Arial CE, Arial, HelveticaE, Helvetica CE, Helvetica; }
  10.  .blue { font-family: Arial CE, Arial, HelveticaE, Helvetica CE, Helvetica; font-size: 9pt; color: #104080 }
  11.  .black { font-family: Arial CE, Arial, HelveticaE, Helvetica CE, Helvetica; font-size: 9pt; color: #000000 }
  12.  .black8 { font-family: Arial CE, Arial, HelveticaE, Helvetica CE, Helvetica; font-size: 8pt; color: #000000 }
  13.  .orange { font-family: Arial CE, Arial, HelveticaE, Helvetica CE, Helvetica; font-size: 9pt; color: #ff8000; }
  14.  .orange8 { font-family: Arial CE, Arial, HelveticaE, Helvetica CE, Helvetica; font-size: 8pt; color: #ff8000; }
  15. -->
  16. </STYLE>
  17. </head>
  18.  
  19.  
  20. <%wbc%>
  21. ErrorTemplate: err.htw
  22.  
  23. SQLStatement: niclogin
  24. #ifexists 
  25. + SELECT intr_user,intr_pswd,nazev1
  26. + FROM obchodni_partneri
  27. + WHERE (intr_user="") AND (intr_pswd="")
  28. #then 
  29. + DELETE FROM obchodni_partneri WHERE (intr_user="") AND (intr_pswd="")
  30. #endif
  31.  
  32. SQLStatement: login
  33. #ifexists 
  34. + SELECT intr_user
  35. + FROM obchodni_partneri
  36. + WHERE (intr_user="%jmeno%") AND (intr_pswd="%heslo%")
  37. #then 
  38. + SELECT Obchodni_partneri.nazev1, Obchodni_partneri.kont_osoba, Obchodni_partneri.ulice,
  39. + Obchodni_partneri.psc, Obchodni_partneri.mesto, Obchodni_partneri.zeme, Obchodni_partneri.telef, 
  40. + Obchodni_partneri.fax, Obchodni_partneri.mail_adres, Obchodnici.jmeno, Obchodnici.prijmeni,
  41. + Obchodni_partneri.intr_pswd, Obchodnici.titl,Obchodnici.telef AS nastel,Obchodnici.mail_adres as nasmail,
  42. + S_deal_sk.deal_skupina ,Obchodnici.fotka as foto
  43. + FROM Obchodni_partneri, S_deal_sk, Obchodnici
  44. + WHERE Obchodnici.id_obchodnika=Obchodni_partneri.id_obchodnika 
  45. + AND S_deal_sk.deal_id=Obchodni_partneri.deal_sk
  46. + AND (Obchodni_partneri.intr_user="%jmeno%" AND Obchodni_partneri.intr_pswd="%heslo%")
  47. #else 
  48. + SELECT intr_user,intr_pswd,nazev1
  49. + FROM obchodni_partneri
  50. + WHERE (intr_user="%jmeno%")AND(intr_pswd="%heslo%")
  51. #endif
  52.  
  53. BeginProgram: www_login
  54.  W_delobj();
  55. EndProgram;
  56.  
  57. <%/wbc%>
  58.  
  59. <SCRIPT LANGUAGE="JAVASCRIPT1.2"><!--
  60.  
  61. function _fw_hasvalue(obj, obj_type)
  62.   {
  63.     if (obj_type == "TEXT" || obj_type == "PASSWORD")
  64.     {
  65.       if (obj.value.length == 0) return false;
  66.       else return true;
  67.     }
  68.     else if (obj_type == "SELECT")
  69.     {
  70.       for (i=0; i < obj.length; i++)
  71.       {
  72.         if (obj.options[i].selected) return true;
  73.       }
  74.       return false;
  75.     }
  76.     else if (obj_type == "SINGLE_VALUE_RADIO" || obj_type == "SINGLE_VALUE_CHECKBOX")
  77.     {
  78.       if (obj.checked) return true;
  79.       else return false;
  80.     }
  81.     else if (obj_type == "RADIO" || obj_type == "CHECKBOX")
  82.     {
  83.       for (i=0; i < obj.length; i++)
  84.       {
  85.         if (obj[i].checked) return true;
  86.       }
  87.       return false; 
  88.     }
  89.   }
  90.  
  91.  
  92. function _fw_isMaskEmail(object_value)
  93.   {
  94.     if( object_value.length==0 ) return false;
  95.     apos=object_value.indexOf('@');
  96.     if( apos==-1 ) return false;
  97.     dotpos=object_value.lastIndexOf('.');
  98.     if( dotpos==-1 || dotpos<apos ) return false;
  99.     if( dotpos==object_value.length-1 ) return false;
  100.     return true;
  101.   }
  102.  
  103. function _fw_OnSubmitForm1(thisform)
  104.   {
  105.  
  106.   if( !_fw_hasvalue(thisform.w_ulice,"TEXT") )
  107.   {
  108.     alert("Zadejte ulici");
  109.     thisform.w_ulice.focus();
  110.     thisform.w_ulice.select();
  111.     return false;
  112.   }
  113.   if( !_fw_hasvalue(thisform.w_mesto,"TEXT") )
  114.   {
  115.     alert("Zadejte m∞sto - sφdlo organizace");
  116.     thisform.w_mesto.focus();
  117.     thisform.w_mesto.select();
  118.     return false;
  119.   }
  120.   if( !_fw_hasvalue(thisform.w_psc,"TEXT") )
  121.   {
  122.     alert("Zadejte PS╚");
  123.     thisform.w_psc.focus();
  124.     thisform.w_psc.select();
  125.     return false;
  126.   }
  127.   if( !_fw_hasvalue(thisform.w_kont_osoba,"TEXT") )
  128.   {
  129.     alert("Zadejte kontaktnφ osobu");
  130.     thisform.W_kont_osoba.focus();
  131.     thisform.W_kont_osoba.select();
  132.     return false;
  133.   }
  134.   if( !_fw_hasvalue(thisform.w_telef,"TEXT") )
  135.   {
  136.     alert("Zadejte telefon");
  137.     thisform.w_telef.focus();
  138.     thisform.w_telef.select();
  139.     return false;
  140.   }
  141.  
  142.   if( !_fw_hasvalue(thisform.w_mail_adres,"TEXT") )
  143.   {
  144.     alert("Zadejte e-mail");
  145.     thisform.w_mail_adres.focus();
  146.     thisform.w_mail_adres.select();
  147.     return false;
  148.   }
  149.  
  150.   if( !_fw_isMaskEmail(thisform.w_mail_adres.value) )
  151.   {
  152.     alert("Zadejte sprßvn∞ e-mail");
  153.     thisform.w_mail_adres.focus();
  154.     thisform.w_mail_adres.select();
  155.     return false;
  156.   }
  157.   if( !_fw_hasvalue(thisform.w_heslo,"TEXT") )
  158.   {
  159.     alert("Zadejte heslo");
  160.     thisform.w_intr_pswd.focus();
  161.     thisform.w_intr_pswd.select();
  162.     return false;
  163.   }
  164.   }
  165. //-->
  166. </SCRIPT>
  167.  
  168.  
  169. <body background="/catalog/back_bd2.gif" bgcolor="#FFFFFF" leftmargin=0 topmargin=0 marginwidth=0 marginheight=0>
  170. <br>
  171. <form method="post" action="<%wb_url%>/ologin.wbc" onSubmit="return _fw_OnSubmitForm1(this)">
  172. <div align="CENTER" style="width : 550px;">
  173. <input type="hidden" name="showerror" value="0">
  174. <input type="hidden" name="testlogin" value=<%testlogin%>>
  175. <INPUT TYPE="hidden" NAME="cena" VALUE="<%cena;-102%>">
  176. <INPUT TYPE="hidden" NAME="cenaDPH" VALUE="<%cenaDPH;-102%>">
  177. <INPUT TYPE="hidden" NAME="objednavka" VALUE="<%objednavka%>">
  178. <INPUT TYPE="hidden" NAME="jmeno" VALUE="<%jmeno%>">
  179. <INPUT TYPE="hidden" NAME="heslo" VALUE="<%heslo%>">
  180. <INPUT TYPE="hidden" NAME="wbegin" VALUE="0">
  181. <%if login.TotalCount>0 %>
  182.     <font size="2" color="#104080">Jste p°ihlßÜen v dealerskΘ skupin∞: 
  183.     <b><%login.deal_skupina%></b>
  184. </font>
  185. <BR>
  186. <font size="2" color="#104080">Firma: <b><%login.nazev1%></b></font>
  187. <BR>
  188. <%if jmeno<>"demo"%>
  189. <table border="0" cellspacing="0" cellpadding="0">
  190. <tr>
  191. <td class="blue"><font size="2" color="#104080">Adresa: </td>
  192. <td class="blue"><BR><input type="text" NAME="w_ulice" VALUE="<%login.ulice%>" size="25"><BR><input type="text" NAME="w_psc" VALUE="<%login.psc%>"size="5"> <input type="text" NAME="w_mesto" VALUE="<%login.mesto%>" size="18"></STRONG></font></td>
  193. </tr>
  194. <tr>
  195. <td class="blue"><font size="2" color="#104080">Kontaktnφ osoba: <STRONG></td>
  196. <td class="blue"><input type="text" name="w_kont_osoba" value="<%login.kont_osoba%>" size="25"></STRONG></font></td>
  197. </tr>
  198. <tr>
  199. <td class="blue"><font size="2" color="#104080">Telefon: <STRONG> </td>
  200. <td><input type="text" name="w_telef" value="<%login.telef%>" size="25"></STRONG></font></td>
  201. </tr>
  202. <tr>
  203. <td class="blue"><font size="2" color="#104080">E-mail: <STRONG> </td>
  204. <td><input type="text" name="w_mail_adres" value="<%login.mail_adres%>" size="25"></td>
  205. </tr>
  206. <tr>
  207. <td class="blue"><font size="2" color="#104080">Heslo: <STRONG> </td>
  208. <td><input type="text" name="w_heslo" value="<%login.intr_pswd%>" size="25"><BR></td>
  209. </tr>
  210. <tr>
  211. <td class="orange8" colspan="2"><font size="1">!!!!!Heslo musφ b²t zadanΘ!!!!! Pokud jej nechcete zm∞nit ponechte p∙vodnφ.</td>
  212. </tr>
  213. <%else%>
  214. <font size="2" color="#104080">Adresa: <STRONG><%login.psc%> <%login.mesto%> <%login.ulice%><BR>
  215. <input type="hidden" NAME="w_ulice" VALUE="<%login.ulice%>" >
  216. <input type="hidden" NAME="w_psc" VALUE="<%login.psc%>">
  217. <input type="hidden" NAME="w_mesto" VALUE="<%login.mesto%>">
  218. </STRONG></font>
  219. <BR>
  220. <table border="0" cellspacing="0" cellpadding="0">
  221. <tr>
  222. <td class="blue"><font size="2" color="#104080">Kontaktnφ osoba: </td>
  223. <td class="blue"><font size="2" color="#104080"><STRONG><%login.kont_osoba%></STRONG></font></td>
  224. <INPUT TYPE="hidden" NAME="w_kont_osoba" VALUE="<%login.kont_osoba%>">
  225. </tr>
  226. <tr>
  227. <td class="blue"><font size="2" color="#104080">Telefon: <STRONG> </td>
  228. <td class="blue"><font size="2" color="#104080"><STRONG><%login.telef%>"</STRONG></font></td>
  229. <INPUT TYPE="hidden" NAME="w_telef" VALUE="<%login.telef%>">
  230. </tr>
  231. <tr>
  232. <td class="blue"><font size="2" color="#104080">E-mail: <STRONG> </td>
  233. <td class="blue"><font size="2" color="#104080"><STRONG><%login.mail_adres%></STRONG></td>
  234. <INPUT TYPE="hidden" NAME="w_mail_adres" VALUE="<%login.mail_adres%>">
  235. </tr>
  236. <tr>
  237. <td class="blue"><font size="2" color="#104080">Heslo: <STRONG> </td>
  238. <td class="blue"><font size="2" color="#104080"><STRONG><%login.intr_pswd%></STRONG><BR></td>
  239. <INPUT TYPE="hidden" NAME="w_heslo" VALUE="<%login.intr_pswd%>">
  240. </tr>
  241. <tr>
  242. <td class="orange8" colspan="2"><font size="1">U p°ihlßÜenΘho u₧ivatele "demo" nelze m∞nit ₧ßdnΘ ·daje.</td>
  243. </tr>
  244. <%endif%>
  245. <tr><td class="black" align="center" colspan="2"><br><input type="submit" name="volba2" value="Potvrdit"></td></tr>
  246. </table>
  247. <BR>
  248. <font size="2" color="#104080"><STRONG>NßÜ zßstupce pro kontakt:  
  249. </STRONG></font><BR>
  250. <font size="2" color="#104080">JmΘno: <STRONG>
  251. <%login.titl%> <%login.jmeno%> <%login.prijmeni%></STRONG></font>
  252. <BR>
  253. <font size="2" color="#104080">Telefon: <STRONG>
  254. <%login.nastel%>
  255. </STRONG></font>
  256. <BR>
  257. <font size="2" color="#104080">E-mail: <STRONG><a href="mailto:<%login.nasmail%>"><%login.nasmail%></a></STRONG></font>
  258. <BR></form>
  259. <%else%>
  260. <form method="post" action="<%wb_url%>/plogin.wbc" onSubmit="return _fw_OnSubmitForm1(this)">
  261. <input type="hidden" name="testlogin" value="1">
  262. <input type="hidden" name="showerror" value="1">
  263. <INPUT TYPE="hidden" NAME="cena" VALUE="<%cena;-102%>">
  264. <INPUT TYPE="hidden" NAME="cenaDPH" VALUE="<%cenaDPH;-102%>">
  265. <INPUT TYPE="hidden" NAME="objednavka" VALUE="<%objednavka%>">
  266. <INPUT TYPE="hidden" NAME="jmeno" VALUE="<%jmeno%>">
  267. <INPUT TYPE="hidden" NAME="heslo" VALUE="<%heslo%>">
  268. <INPUT TYPE="hidden" NAME="wbegin" VALUE="0">
  269.  
  270. <div class="blue"><b>P°ihlßÜenφ je umo₧n∞no pouze ji₧ registrovan²m zßkaznφk∙m.</b><BR>
  271. <b>Doposud neregistrovanφ zßkaznφci mohou<BR>registraci provΘst a₧ po zalo₧enφ svΘ prvnφ objednßvky.</b></div>
  272. Zadejte VaÜe p°ihlaÜovacφ jmΘno:</td>
  273. <input type="text" name="jmeno" size="20">
  274. <BR><BR>
  275. Zadejte VaÜe heslo:
  276. <input type="password" name="heslo" size="20">
  277. <BR><BR>
  278. <input type="submit" value="Potvrdit">   <input type="reset" value="VyΦistit">
  279. <BR><BR>
  280. P°ihlßÜenφ nebylo ·sp∞ÜnΘ.
  281. </form>
  282. <%endif%>
  283. </center>
  284. </body>
  285. </html><font size="-3" color="#FFFFFF">
  286.