/[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.4 - (hide annotations)
Fri May 18 12:51:39 2001 UTC (22 years, 11 months ago) by dpavlin
Branch: MAIN
Changes since 1.3: +0 -4 lines
zadnje promjene, multi-lingual footers

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.1 $row = $row[0];
19     if (isset($row)) {
20     $sifra = $row[0];
21     Header("Location: $pages[0]".Params());
22     exit;
23     }
24     $warning = 1;
25     } else
26     $warning = 2;
27     }
28     if (!isset($login)) $login = "";
29 dpavlin 1.3 $tpl = new MySmarty;
30 dpavlin 1.1 $tpl->assign("action", $PHP_SELF);
31     $tpl->assign("page", $page);
32     $tpl->assign("login", $login);
33     $tpl->assign("warning", $warning);
34 dpavlin 1.3 $tpl->show();
35 dpavlin 1.1 ?>

  ViewVC Help
Powered by ViewVC 1.1.26