/[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

Annotation of /html/inc/head.inc

Parent Directory Parent Directory | Revision Log Revision Log


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

1 dpavlin 1.1 <?
2 dpavlin 1.2
3 dpavlin 1.1 if ($what == "relogin") {
4 dpavlin 1.2 if (session_is_registered("kontakt_osoba_id")) {
5     session_destroy();
6     }
7 dpavlin 1.1 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 dpavlin 1.2 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 dpavlin 1.1
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