/[informatika.old]/html/inc/head.inc
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Contents of /html/inc/head.inc

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.2 - (show annotations)
Tue Apr 24 13:57:23 2001 UTC (22 years, 11 months ago) by dpavlin
Branch: MAIN
CVS Tags: HEAD
Changes since 1.1: +9 -5 lines
promjene

1 <?
2
3 if ($what == "relogin") {
4 if (session_is_registered("kontakt_osoba_id")) {
5 session_destroy();
6 }
7 Header("Location: $PHP_SELF");
8 }
9
10 $charset="iso-8859-2";
11 if ( ereg("MSIE.*[Mm][Aa][Cc]",$HTTP_USER_AGENT) ) {
12 $charset="x-mac-roman";
13 } elseif ( ereg("[Mm][Aa][Cc]",$HTTP_USER_AGENT) ) {
14 $charset="MacCE";
15 }
16 header("Expires: Mon, 26 Jul 1997 05:00:00 GMT"); // Date in the past
17 header("Last-Modified: ".gmdate("D, d M Y H:i:s")." GMT"); // always modified
18 header("Cache-Control: no-cache, must-revalidate"); // HTTP/1.1
19 header("Pragma: no-cache"); // HTTP/1.0
20 header("Content-Type: text/html;charset=$charset");
21
22 global $kontakt_osoba_id;
23 global $md5_passwd;
24
25 if (isset($kontakt_osoba_id)) { session_register("kontakt_osoba_id"); }
26 if (isset($md5_passwd)) { session_register("md5_passwd"); }
27
28 ?>
29
30
31 <html>
32 <head>
33 <title>Informatika -- web suรจelje</title>
34
35 </head>
36
37 <body bgcolor="#FFFFFF">
38
39 <?
40 $conn = pg_connect("dbname=informatika user=dpavlin");
41 $result=pg_Exec($conn,"set datestyle = 'german'");
42 ?>

  ViewVC Help
Powered by ViewVC 1.1.26