/[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.1 - (hide annotations)
Fri Mar 17 12:35:18 2000 UTC (24 years, 2 months ago) by dpavlin
Branch: MAIN
Branch point for: PLIVA
Initial revision

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

  ViewVC Help
Powered by ViewVC 1.1.26