/[hr-web]/index.php
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Annotation of /index.php

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.3 - (hide annotations)
Wed Apr 25 13:18:46 2001 UTC (23 years ago) by dpavlin
Branch: MAIN
Changes since 1.2: +9 -12 lines
promjene za finalnu verziju

1 dpavlin 1.1 <?php
2     include("inc/global.php");
3     $warning = 0;
4 dpavlin 1.3 if (isset($x)) $warning = 3;
5 dpavlin 1.1 if (!isset($password)) $password = "";
6 dpavlin 1.3 if (!$warning && isset($login)) {
7 dpavlin 1.1 $password = StripSlashes($password);
8     include("inc/auth_POP3.php");
9     $pop3 = new POP3();
10     $pop3->connect($POP3);
11     $ret = $pop3->checklogin($login, $password);
12     $pop3->quit();
13     if ($ret) {
14 dpavlin 1.2 include("inc/conn.php");
15 dpavlin 1.3 DBOpen("informatika", "dpavlin", "", "localhost");
16 dpavlin 1.2 $row = DBQuery("SELECT sifra FROM racuni,osobe WHERE (osobe.id=osoba_id) AND (login LIKE '$login')");
17     DBClose();
18 dpavlin 1.3 ########
19     #RA:
20     #if ($login=="ravilov")$row=array(array(822329));
21     ########
22 dpavlin 1.1 $row = $row[0];
23     if (isset($row)) {
24     $sifra = $row[0];
25     Header("Location: $pages[0]".Params());
26     exit;
27     }
28     $warning = 1;
29     } else
30     $warning = 2;
31     }
32     if (!isset($login)) $login = "";
33 dpavlin 1.3 $tpl = new MySmarty;
34 dpavlin 1.1 $tpl->assign("action", $PHP_SELF);
35     $tpl->assign("page", $page);
36     $tpl->assign("login", $login);
37     $tpl->assign("warning", $warning);
38 dpavlin 1.3 $tpl->show();
39 dpavlin 1.1 ?>

  ViewVC Help
Powered by ViewVC 1.1.26