This commit is contained in:
Christian Paminger
2007-02-08 12:06:24 +00:00
parent 09e857693c
commit c9ba8d6ae6
8 changed files with 48 additions and 81 deletions
-45
View File
@@ -1,45 +0,0 @@
<?php
/**
* Changes: 23.10.2004: Anpassung an neues DB-Schema (WM)
*/
require_once('../../vilesci/config.inc.php');
require_once('../../include/functions.inc.php');
if (!$conn = @pg_pconnect(CONN_STRING))
die('Es konnte keine Verbindung zum Server aufgebaut werden.');
if(!($result=pg_exec($conn, "SELECT uid, nachname, vorname FROM campus.vw_mitarbeiter WHERE lektor=true AND uid NOT LIKE '\\\\_%' ORDER BY nachname")))
die(pg_errormessage($conn));
$num_rows=pg_numrows($result);
?>
<HTML>
<HEAD>
<TITLE>Mailinglisten</TITLE>
<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<LINK rel="stylesheet" href="../../../skin/vilesci.css" type="text/css">
</HEAD>
<BODY class="background_main">
<H3>MailingListen </H3>
<?php
// File Operations
$name='tw_lkt.txt';
$name=strtolower($name);
$fp=fopen('../../../mlists/'.$name,"w");
$crlf="\n";
for ($i=0; $i<$num_rows; $i++)
{
$row=pg_fetch_object($result, $i);
fwrite($fp, '#'.$row->nachname.' '.$row->vorname.$crlf.$row->uid.$crlf);
}
fclose($fp);
echo $name.' created<br>';
?>
<P><BR>
Die Mailinglisten der Lektoren wurden erstellt. <BR>
Sie k&ouml;nnen nun die erstellten Datein auf den Mail-Server kopieren (<A href="mlists_copy.php">Copy
Lists</A>).</P>
<P><A href="index.html" class="linkblue">&lt;&lt; Zur&uuml;ck</A></P>
</BODY>
</HTML>
+1 -1
View File
@@ -6,7 +6,7 @@
require_once('../../include/functions.inc.php');
require_once('../../include/globals.inc.php');
if (!$conn = @pg_pconnect(CONN_STRING))
if (!$conn = pg_pconnect(CONN_STRING))
die('Es konnte keine Verbindung zum Server aufgebaut werden.');
if(!($result_stg=pg_query($conn, "SELECT studiengang_kz, bezeichnung, lower(typ::varchar(1) || kurzbz) as kurzbz FROM public.tbl_studiengang ORDER BY kurzbz ASC")))
die(pg_errormessage($conn));