9. Přílohy

9.1 Šablona - Oracle Web Publishing Assistant

<html>
<head>
<meta http-equiv="Content-Type"
content="text/html">
<title>Výsledky testů - Web Publishing Assistant</title>
</head>

<body bgcolor="#FFFFFF">
<font color="#FF0000" size="6" face="Arial, Helvetica, sans-serif">
<p align="center"><b>VÝSLEDKY</b></p>
<p></p>
</font>
<table border="1" width="600" bgcolor="#CCCCCC" bordercolor="#000000" align="center">
<font face="Arial, Helvetica, sans-serif">
<tr>
<td align="center" width="15%"><b>ID</b></td>
<td align="center" width="25%"><b>Jméno</b></td>
<td align="center" width="15%"><b>Test 1</b></td>
<td align="center" width="15%"><b>Test 2</b></td>
<td align="center" width="15%"><b>Test 3</b></td>
<td align="center" width="15%"><b>Test 4</b></td>
</tr> </font>
</table>
<table border="0" width="600" bordercolordark="#000000" bordercolorlight="#FFFFFF" bordercolor="#000000" align="center">
<%begindetail%>
<tr>
<td width="15%" height="24" align="center"><%id%></td>
<td width="25%" height="24"><%Jméno%></td>
<td width="15%" height="24" align="center"><%test1%></td>
<td width="15%" height="24" align="center"><%test2%></td>
<td width="15%" height="24" align="center"><%test3%></td>
<td width="15%" height="24" align="center"><%test4%></td>
</tr>
<%enddetail%>
</table>
</body>
</html>

9.2 Definice kaskádových stylů CSS

BODY {
BACKGROUND: #FFFFFF;
COLOR: black;
FONT-FAMILY: Tahoma, Arial CE, Arial
font-weight : normal;
font-style : normal;
font-size : 10pt; }
P {
COLOR: black;
FONT-FAMILY: Tahoma, Arial CE, Arial
font-weight : normal;
font-style : normal;
font-size : 10pt; }
TABLE {
COLOR: black;
FONT-FAMILY: Tahoma, Arial CE, Arial
font-weight : normal;
font-style : normal;
font-size : 10pt; }
H1 {
text-align : center;
font-size : 18pt;
font-weight : bold;
FONT-FAMILY: Tahoma, Arial CE, Arial }
H2 {
text-align : center;
font-size : 16pt;
font-weight : bold;
FONT-FAMILY: Tahoma, Arial CE, Arial }
H3 {
text-align : center;
font-size : 14pt;
font-weight : bold;
FONT-FAMILY: Tahoma, Arial CE, Arial }
H4 {
text-align : center;
font-size : 12pt;
font-weight : bold;
FONT-FAMILY: Tahoma, Arial CE, Arial }
A {
FONT-FAMILY: Tahoma, Arial CE, Arial
font-size : 10pt;
font-weight : normal;
font-style : normal;
color : #65739A;
text-decoration : none; }
A:Visited {
FONT-FAMILY: Tahoma, Arial CE, Arial
font-size : 10pt;
font-weight : normal;
font-style : normal;
color : #8A95B3;
text-decoration : none; }
A:Active {
FONT-FAMILY: Tahoma, Arial CE, Arial
font-size : 10pt;
font-weight : normal;
font-style : normal;
color : #65739A;
text-decoration : none; }
A:Hover {
FONT-FAMILY: Tahoma, Arial CE, Arial
font-size : 10pt;
font-weight : normal;
font-style : normal;
color : #65739A;
text-decoration : underline; }
HR {
color : #BCC2D3;
width : 600px; }

9.3 Zdrojové kódy skriptů vytvořené databázové aplikace

Části kódu, které obsahují jen HTML jsou z důvodu úspory místa zhuštěny (na úkor přehlednosti).

Skript pro úvodní vytvoření databázových tabulek

<h4>Předem musí být vytvořena databáze (ODBC zdroj - DSN) "CVICENI" </h4><br>
<?
$spojeni = ODBC_connect("cviceni","root","") or die("Spojení s DSN zdrojem se nepodařilo navázat :(");
// tabulka PREDMETY
$tab_predmety = "CREATE TABLE predmety (id_pred INT NOT NULL PRIMARY KEY, nazev VARCHAR(40))";
$vysledek = ODBC_Exec($spojeni, $tab_predmety) or die("Chyba tab 1 :(");
echo "<b>Tabulka PREDMETY vytvořena ...</b><br>\n";
// tabulka STUDENTI
$tab_studenti = "CREATE TABLE studenti (id_stud INT NOT NULL PRIMARY KEY, jmeno VARCHAR(15), prijmeni VARCHAR(20), kruh INT, email VARCHAR(40))";
$vysledek = ODBC_Exec($spojeni, $tab_studenti) or die("Chyba tab 2 :(");
echo "<b>Tabulka STUDENTI vytvořena ...</b><br>\n";
//tabulka PRED_STUD
$tab_pred_stud = "CREATE TABLE pred_stud (id_pred INT NOT NULL, id_stud INT NOT NULL, PRIMARY KEY (id_pred, id_stud))";
$vysledek = ODBC_Exec($spojeni, $tab_pred_stud) or die("Chyba tab 3 :(");
echo "<b>Tabulka PRED_STUD vytvořena ...</b><br>\n";
// tabulka TESTY
$tab_testy = "CREATE TABLE testy (id_test INT NOT NULL PRIMARY KEY, nazev VARCHAR(40), predmet INT NOT NULL)";
$vysledek = ODBC_Exec($spojeni, $tab_testy) or die("Chyba tab 4 :(");
echo "<b>Tabulka TESTY vytvořena ...</b><br>\n";
// tabulka VYSLEDKY
$tab_vysledky = "CREATE TABLE vysledky (id_test INT NOT NULL, id_stud INT NOT NULL, vysledek INT, PRIMARY KEY (id_test, id_stud))";
$vysledek = ODBC_Exec($spojeni, $tab_vysledky) or die("Chyba tab 5 :(");
echo "<b>Tabulka VYSLEDKY vytvořena ...</b><br>\n";
$konec = ODBC_close($spojeni);
?>

index.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html> <head>
<title>Home - správa výsledků</title>
<link rel=stylesheet type="text/css" href="style.css">
</head>
<body bgcolor="#FFFFFF">
<table width="750" border="0" cellspacing="0" cellpadding="0"> <!-- celková tabulka -->
<tr><td>
<? require "hlava.php"; ?>
</td></tr>
<tr><td><div align="center">
<!-- --------------- Prohlížení výsledků ------------------- -->
<table width="350" border="1" cellspacing="0" cellpadding="1" bgcolor="#BCC2D3">
<tr><td height="20"><div align="center">
<?
do
{
@$spojeni = ODBC_Connect("cviceni", "student", "student");
//připojení k databázi (jen pro SELECT)
if (!$spojeni):
echo "Spojení s databází nenavázáno :( \n";
break;
endif;
$dotaz = "SELECT * FROM predmety ORDER BY nazev";
//dotaz na všechny předměty
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Dotaz se nezdařil :( \n";
break;
endif;
?>
<table cellpadding="1">
<tr><td colspan="2"><div align="center">
<h4>Prohlížení výsledků:</h4></div>
</td></tr>
<form method="POST" action="browse.php">
<tr><td colspan="2"><div align="center">
<select name="id_pred" size=1>
<?
while (ODBC_Fetch_Row($vysledek)):
//výpis výběru předmětů
echo "<option value=\"".ODBC_Result($vysledek, "id_pred")."\">".ODBC_Result($vysledek, "nazev")."</option>\n";
endwhile;
?>
</select>
</div></td></tr>
<tr><td colspan="2" align="center" height="37">
<input type="submit" VALUE="Vstoupit &gt;&gt;">
</td></tr>
</form></table></div>
</td></tr></table><br>
<!-- ----------------- Vstup pro administraci ------------------------ -->
<table width="350" border="1" cellspacing="0" cellpadding="1" bgcolor="#BCC2D3">
<tr><td><div align="center">
<h4>Správa předmětu</h4>
<table cellpadding="1">
<form method="POST" action="admin.php">
<input type="hidden" name="akce" value="login">
<tr><td><b>Předmět:</b></td><td>
<select name="id_pred" size=1>
<?
$dotaz = "SELECT * FROM predmety ORDER BY nazev";
//dotaz na všechny předměty
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Dotaz se nezdařil :( \n";
break;
endif;
while (ODBC_Fetch_Row($vysledek)):
//výpis výběru předmětů
echo "<option value=\"".ODBC_Result($vysledek, "id_pred")."\">".ODBC_Result($vysledek, "nazev")."</option>\n";
endwhile;
?>
</select></td></tr>
<tr><td align="right"><b>Heslo:</b></td>
<td><input type="password" name="heslo"></td></tr>
<tr><td colspan="2" align="center" height="37">
<input type="submit" VALUE="Vstoupit &gt;&gt;">
</td></tr></form></table>
<h4>Správa předmětů a studentů</h4>
<table cellpadding="1">
<form method="POST" action="admin_pred.php">
<input type="hidden" name="akce" value="login">
<tr><td align="right"><b>Heslo:</b></td>
<td><input type="password" name="heslo"></td></tr>
<tr><td colspan="2" align="center" height="37">
<input type="submit" VALUE="Vstoupit &gt;&gt;"></td></tr>
</form></table></div></td></tr></table>
</div></td></tr>
<?
} while (false);
ODBC_Close($spojeni);
?>
<tr><td>
<? require "pata.php"; ?>
</td></tr>
</table></body></html>

browse.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html><head>
<title>Prohlížení výsledků</title>
<link rel=stylesheet type="text/css" href="style.css"></head>
<body bgcolor="#FFFFFF">
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr><td><? require "hlava.php"; ?>
<!-- záhlaví stránky -->
</td></tr><tr><td><div align="center">
<!-- --------------------- hlavní tělo stránky ----------------------- -->
<?
do
{
@$spojeni = ODBC_Connect("cviceni", "student", "student");
//připojení k databázi (jen pro SELECT)
if (!$spojeni):
echo "Spojení s databází nenavázáno :( \n";
break;
endif;
//zjistění názvu aktuálního předmětu
@$vysledek = ODBC_Exec($spojeni, "SELECT nazev
FROM predmety
WHERE id_pred=$id_pred");
if (!$vysledek):
echo "Dotaz na tabulku predmety se nezdařil :( \n";
break;
endif;
if (ODBC_Fetch_Row($vysledek))
echo "<h3>Aktuální předmět: ".ODBC_Result($vysledek, 1)."</h3>\n";
//výpis názvu předmětu
?>
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr><td height="20"><div align="center">
<!-- ------------------------- Výběr akce ----------------------------- -->
<p><h4>Výběr akce:</h4></p>
<table border="0" cellpadding="5">
<form method="POST" action="browse.php">
<tr>
<td>
<input type="radio" name="akce" value="1">
Zobrazit všechny výsledky testu:
<? //výpis výběru testů
$dotaz = "SELECT *
FROM testy
WHERE predmet=$id_pred
ORDER BY nazev";
@$testy = ODBC_Exec($spojeni, $dotaz);
if (!$testy):
echo "Dotaz na testy se nezdařil :( \n";
break;
endif;
echo "<select name=\"id_test\" size=1>\n";
while (ODBC_Fetch_Row($testy)):
echo "<option value=\"".ODBC_Result($testy, "id_test")."\">".ODBC_Result($testy, "nazev")."</option>\n";
endwhile;
echo "</select>\n";
?>
</td></tr><tr><td>
<input type="radio" name="akce" value="2">
Zobrazit výsledky testů studenta:
<? //výpis výběru studentů;
$dotaz = "SELECT prijmeni, jmeno, studenti.id_stud
FROM studenti, pred_stud
WHERE (studenti.id_stud=pred_stud.id_stud) AND id_pred=$id_pred
ORDER BY prijmeni";
@$studenti = ODBC_Exec($spojeni, $dotaz);
if (!$studenti):
echo "Dotaz na studenty se nezdařil :( \n";
break;
endif;
echo "<select name=\"id_stud\" size=1>\n";
while (ODBC_Fetch_Row($studenti)):
echo "<option value=\"".ODBC_Result($studenti, "id_stud")."\">".ODBC_Result($studenti, "prijmeni")." ".ODBC_Result($studenti, "jmeno")."</option>\n";
endwhile;
echo "</select>\n";
?>
</td></tr><tr><td>
<input type="radio" name="akce" value="3">
Zobrazit seznam a email studentů tohoto předmětu
</td></tr><tr><td><center>
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" VALUE="Zobrazit &gt;&gt;">
</center></td></tr></form></table>
</div></td></tr></table>
<!-- -------------------- Zpracování akcí --------------------------- -->
<?
switch ($akce)
{
case 1: // AKCE 1
$dotaz = "SELECT nazev
FROM testy
WHERE id_test=$id_test";
@$test1 = ODBC_Exec($spojeni, $dotaz);
// zjištění názvu aktuálního testu
if (!$test1):
echo "Dotaz na zjištění názvu testu se nezdařil :( \n";
break;
endif;
if (ODBC_Fetch_Row($test1))
echo "<h4>Výsledky: ".ODBC_Result($test1, 1)."</h4>\n";
//výpis názvu test
$dotaz = "SELECT prijmeni, jmeno, vysledek
FROM studenti, vysledky
WHERE (studenti.id_stud=vysledky.id_stud) and (id_test=$id_test)
ORDER BY prijmeni";
@$akce1 = ODBC_Exec($spojeni, $dotaz);
if (!$akce1):
echo "Akce 1 - žádný záznam :( \n";
break;
endif;
echo "<table border=\"1\" cellspacing=\"0\" cellpadding=\"4\" bgcolor=\"#BCC2D3\">\n"; //úvod tabulky
while (ODBC_Fetch_Row($akce1)):
echo "<tr>\n<td>\n".ODBC_Result($akce1, "prijmeni")." ".ODBC_Result($akce1, "jmeno")."</td><td width=\"40\"><div align=\"center\">".ODBC_Result($akce1, "vysledek")."</div>\n</td>\n</tr>\n";
endwhile;
echo "</table>\n";
break;
case 2: // AKCE 2
$dotaz = "SELECT prijmeni, jmeno
FROM studenti
WHERE id_stud=$id_stud";
@$stud2 = ODBC_Exec($spojeni, $dotaz);
// zjištění jména aktuálního studenta
if (!$stud2):
echo "Dotaz na zjištění jména studenta se nezdařil :( \n";
break;
endif;
if (ODBC_Fetch_Row($stud2))
echo "<h4>Výsledky: ".ODBC_Result($stud2, 1)." ".ODBC_Result($stud2, 2)."</h4>\n"; //výpis názvu test
$dotaz = "SELECT prijmeni, jmeno, nazev, vysledek
FROM studenti,testy, vysledky
WHERE (studenti.id_stud=vysledky.id_stud) and (vysledky.id_test=testy.id_test) and (studenti.id_stud=$id_stud) and (predmet=$id_pred)";
@$akce2 = ODBC_Exec($spojeni, $dotaz);
if (!$akce2):
echo "Akce 2 - žádný záznam :( \n";
break;
endif;
echo "<table border=\"1\" cellspacing=\"0\" cellpadding=\"4\" bgcolor=\"#BCC2D3\">\n"; //úvod tabulky
while (ODBC_Fetch_Row($akce2)):
echo "<tr>\n<td>\n".ODBC_Result($akce2, "nazev")."</td><td width=\"40\"><div align=\"center\">".ODBC_Result($akce2, "vysledek")."</div>\n</td>\n</tr>\n";
endwhile;
echo "</table>\n";
break;
case 3: // AKCE 3
echo "<h4>Seznam studentů v aktuálním předmětu</h4>";
$dotaz = "SELECT *
FROM studenti, pred_stud
WHERE (studenti.id_stud=pred_stud.id_stud) and (pred_stud.id_pred=$id_pred)
ORDER BY prijmeni";
@$akce3 = ODBC_Exec($spojeni, $dotaz);
if (!$akce3):
echo "Akce 3 - žádný záznam :( \n";
break;
endif;
echo "<table border=\"1\" cellspacing=\"0\" cellpadding=\"4\" bgcolor=\"#BCC2D3\">\n"; //úvod tabulky
echo "<tr bgcolor=\"#919AB7\"><b><td><div align=\"center\"><b>ID</b></td>\n<td><b>Příjmení a jméno</b></td>\n<td><b>Kruh</b></td>\n<td><div align=\"center\"><b>E-mail</b></div></td></tr>\n"; //záhlaví tabulky
while (ODBC_Fetch_Row($akce3)):
echo "<tr><td><div align=\"center\">\n".ODBC_Result($akce3, "id_stud")."</div></td>\n<td>".ODBC_Result($akce3, "prijmeni")." ".ODBC_Result($akce3, "jmeno")."</td>\n<td><div align=\"center\">".ODBC_Result($akce3, "kruh")."</div></td>\n<td><a href=\"mailto:".ODBC_Result($akce3, "email")."\">".ODBC_Result($akce3, "email")."</a></td></tr>\n";
endwhile;
echo "</table>\n";
break;
}
} while (false);
ODBC_Close($spojeni);
?>
<br>
<a href="index.php">Home</a>
</div></td></tr><tr><td><? require "pata.php"; ?><!-- pata stránky -->
</td></tr></table></body></html>

admin.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html><head>
<title>Administrace předmětu</title>
<link rel=stylesheet type="text/css" href="style.css"></head>
<body bgcolor="#FFFFFF">
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr><td><? require "hlava.php"; ?> <!-- záhlaví stránky -->
</td></tr><tr><td><div align="center">
<?
do {
if ($akce=="login" && $heslo=="helmut"): //ověření přístupu
@$spojeni = ODBC_Connect("cviceni", "admin", "helmut");
//připojení k databázi
if (!$spojeni):
echo "Spojení s databází nenavázáno :( \n";
break;
endif;
//zjistění názvu aktuálního předmětu
@$vysledek = ODBC_Exec($spojeni, "SELECT nazev
FROM predmety
WHERE id_pred=$id_pred");
if (!$vysledek):
echo "Dotaz na tabulku predmety se nezdařil :( \n";
break;
endif;
if (ODBC_Fetch_Row($vysledek)):
$aktpred = ODBC_Result($vysledek, 1);
echo "<h3>Správa předmětu: $aktpred</h3>\n";//výpis názvu předmětu
endif;
?>
<!-- --------- PŘIDÁNÍ/ODEBRÁNÍ STUDENTŮ DO/Z PŘEDMĚTU --------------- -->
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr><td height="20"><div align="center">
<p><h4>Přidání/odebrání studenta do/z předmětu:</h4></p>
<!-- -------------------- Přiřadit studenta ---------------------- -->
<table border="0" cellpadding="5">
<form method="POST" action="addrem_stud.php">
<tr><td><b>Přiřadit studenta:</b></td><td>
<? //přiřadit studenta
$dotaz = "SELECT id_stud
FROM pred_stud
WHERE id_pred=$id_pred
ORDER BY id_stud"; //dotaz na pred_stud #1
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Dotaz na tab. pred_stud se nezdařil :( \n";
break;
endif;
$q1 = "";
while (ODBC_Fetch_Row($vysledek)): //naplnění proměnné pro #2
$q1 .= ODBC_Result($vysledek, "id_stud").", ";
endwhile;
$q1 = SubStr($q1, 0, StrRPos($q1, ",")); //odstranění poslední čárky
if ($q1=="")
$q1 = 0;
$dotaz = "SELECT id_stud, jmeno, prijmeni
FROM studenti
WHERE id_stud NOT IN ($q1)
ORDER BY prijmeni"; //dotaz na stud. #2
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Dotaz na tab. studenti a pred_stud se nezdařil :( \n";
break;
endif;
echo "<select name=\"id_stud\" size=1>"; // SELECT
while (ODBC_Fetch_Row($vysledek)): //výpis výběru studentů
echo "<option value=\"".ODBC_Result($vysledek, "id_stud")."\">".ODBC_Result($vysledek, "prijmeni")." ".ODBC_Result($vysledek, "jmeno")."</option>\n";
endwhile;
?>
</select></td><td>
<input type="hidden" name="from" value="add">
<input type="hidden" name="aktpred" value="<? echo $aktpred; ?>">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" VALUE="Přiřadit"></td></tr></form>
<!-- ---------------------- Odebrat studenta ------------------------ -->
<form method="POST" action="addrem_stud.php">
<tr><td><b>Odebrat studenta:</b> </td><td>
<select name="id_stud" size=1>
<?
$dotaz = "SELECT studenti.id_stud, jmeno, prijmeni
FROM studenti, pred_stud
WHERE (studenti.id_stud=pred_stud.id_stud) AND id_pred=$id_pred
ORDER BY prijmeni"; //dotaz na studenty
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Dotaz na tab. studenti se nezdařil :( \n";
break;
endif;
while (ODBC_Fetch_Row($vysledek)): //výpis výběru studentů
echo "<option value=\"".ODBC_Result($vysledek, "id_stud")."\">".ODBC_Result($vysledek, "prijmeni")." ".ODBC_Result($vysledek, "jmeno")."</option>\n";
endwhile;
?>
</select> </td><td>
<input type="hidden" name="from" value="remove">
<input type="hidden" name="aktpred" value="<? echo $aktpred; ?>">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" VALUE="Odebrat">
</td></tr></form></table></div></td></tr></table><br>
<!-- ----------------------- SPRÁVA TESTŮ ------------------------ -->
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3"><tr><td height="20"><div align="center">
<p><h4>Testy:</h4></p>
<!-- ----------------------- Přidat test ------------------------- -->
<table border="0" cellpadding="5">
<form method="POST" action="insert_test.php">
<tr><td><b>Přidat test:</b> </td><td>
<input type="text" size="17" name="nazev"> </td><td>
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="hidden" name="from" value="admin">
<input type="submit" VALUE="Přidat"></td></tr></form>
<!-- ---------------------- Smazat test ------------------------ -->
<form method="POST" action="delete_test.php">
<tr><td><b>Smazat test:</b> </td><td><select name="id_test" size=1>
<?
$dotaz = "SELECT *
FROM testy
WHERE predmet=$id_pred
ORDER BY nazev"; //dotaz na testy
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Dotaz na testy se nezdařil :( \n";
break;
endif;
while (ODBC_Fetch_Row($vysledek)): //výpis výběru testů
echo "<option value=\"".ODBC_Result($vysledek, "id_test")."\">".ODBC_Result($vysledek, "nazev")."</option>\n";
endwhile;
?>
</select> </td><td>
<input type="hidden" name="from" value="admin">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" VALUE="Smazat">
</td></tr></form>
<!-- ---------------------- Editovat test ------------------------ -->
<form method="POST" action="update_test.php">
<tr><td><b>Editovat test:</b> </td><td><select name="id_test" size=1>
<?
$dotaz = "SELECT *
FROM testy
WHERE predmet=$id_pred
ORDER BY nazev"; //dotaz na testy
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Dotaz na testy se nezdařil :( \n";
break;
endif;
while (ODBC_Fetch_Row($vysledek)): //výpis výběru testů
echo "<option value=\"".ODBC_Result($vysledek, "id_test")."\">".ODBC_Result($vysledek, "nazev")."</option>\n";
endwhile;
?>
</select> </td><td>
<input type="hidden" name="from" value="admin">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" VALUE="Editovat"></td></tr></form></table>
</div></td></tr></table><br>
<!-- ------------------------- VÝSLEDKY --------------------------- -->
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr><td height="20"><div align="center">
<p><h4>Editace výsledků:</h4></p><table border="0" cellpadding="5">
<form method="POST" action="vysled.php">
<tr><td><b>Test:</b> </td><td>
<? //výběr testu
$dotaz = "SELECT *
FROM testy
WHERE predmet=$id_pred
ORDER BY nazev"; //dotaz na testy
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Dotaz na testy se nezdařil :( \n";
break;
endif;
echo "<select name=\"id_test\" size=1>";
while (ODBC_Fetch_Row($vysledek)): //výpis výběru testů
echo "<option value=\"".ODBC_Result($vysledek, "id_test")."\">".ODBC_Result($vysledek, "nazev")."</option>\n";
endwhile;
?>
</select> </td><td>
<input type="hidden" name="from" value="admin">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" VALUE="Editovat">
</td></tr></form></table></div></td></tr></table>
<br><a href="index.php">Home</a>&nbsp;&nbsp;|&nbsp;&nbsp;<a href="browse.php?id_pred=<? echo $id_pred; ?>">Prohlížení výsledků</a>
<?
break; //přístup nepovolen
else:
echo "<h3>Přístup nepovolen</h3>";
echo "<p><b><a href=\"index.php\">Zpět</a> na úvodní stranu.</b></p>";
break;
endif;
} while (false);
ODBC_Close($spojeni);
?>
</div></td></tr><tr><td>
<? require "pata.php"; ?> <!-- pata stránky -->
</td></tr></table></body></html>

admin_pred.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html><head>
<title>Správa předmětů a studentů</title>
<link rel=stylesheet type="text/css" href="style.css"></head>
<body bgcolor="#FFFFFF">
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr><td><? require "hlava.php"; ?> <!-- záhlaví stránky -->
</td></tr><tr><td><div align="center">
<?
do {
if ($akce=="login" && $heslo=="helmut"): //ověření přístupu
@$spojeni = ODBC_Connect("cviceni", "admin", "helmut");
//připojení k databázi
if (!$spojeni):
echo "Spojení s databází nenavázáno :( \n";
break;
endif;
?>
<!-- --------------------------- PŘEDMĚTY --------------------------- -->
<h3>Správa předmětů</h3>
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr><td height="20"><div align="center"><p><h4>Výběr akce:</h4></p>
<!-- ----------------------- Přidat předmět ------------------------- -->
<table border="0" cellpadding="5">
<form method="POST" action="insert_pred.php">
<tr><td>
<b>Přidat předmět:</b></td><td>
<input type="text" size="17" name="nazev"> </td><td>
<input type="hidden" name="from" value="insert_pred">
<input type="submit" VALUE="Přidat">
</td></tr></form>
<!-- ---------------------- Smazat předmět ------------------------ -->
<form method="POST" action="delete_pred.php">
<tr><td><b>Smazat předmět:</b> </td><td>
<select name="id_pred" size=1>
<?
$dotaz = "SELECT * FROM predmety ORDER BY nazev";
//dotaz na všechny předměty
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Dotaz se nezdařil :( \n";
break;
endif;
while (ODBC_Fetch_Row($vysledek)): //výpis výběru předmětů
echo "<option value=\"".ODBC_Result($vysledek, "id_pred")."\">".ODBC_Result($vysledek, "nazev")."</option>\n";
endwhile;
?>
</select></td><td>
<input type="hidden" name="from" value="admin_pred">
<input type="submit" VALUE="Smazat">
</td></tr></form>
<!-- ---------------------- Editovat předmět ------------------------ -->
<form method="POST" action="update_pred.php">
<tr><td><b>Editovat předmět:</b></td><td>
<select name="id_pred" size=1>
<?
$dotaz = "SELECT * FROM predmety ORDER BY nazev";
//dotaz na všechny předměty
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Dotaz se nezdařil :( \n";
break;
endif;
while (ODBC_Fetch_Row($vysledek)): //výpis výběru předmětů
echo "<option value=\"".ODBC_Result($vysledek, "id_pred")."\">".ODBC_Result($vysledek, "nazev")."</option>\n";
endwhile;
?>
</select></td><td>
<input type="hidden" name="from" value="admin_pred">
<input type="submit" VALUE="Editovat">
</td></tr></form></table></div></td></tr></table>
<!-- ---------------------------- STUDENTI --------------------------- -->
<h3>Správa studentů</h3>
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr><td height="20"><div align="center"><p><h4>Výběr akce:</h4></p>
<!-- ---------------------- Přidat studenta ------------------------ -->
<table border="0" cellpadding="5">
<form method="POST" action="insert_stud.php">
<tr><td><b>Přidat studenta:</b>
</td><td><center><b> --> </b></center></td><td>
<input type="hidden" name="from" value="admin_stud">
<input type="submit" VALUE="Přidat">
</td></tr></form>
<!-- ---------------------- Smazat studenta ------------------------ -->
<form method="POST" action="delete_stud.php">
<tr><td><b>Smazat studenta:</b> </td><td>
<? //výpis výběru studentů
$dotaz = "SELECT prijmeni, jmeno, id_stud
FROM studenti
ORDER BY prijmeni";
@$studenti = ODBC_Exec($spojeni, $dotaz);
if (!$studenti):
echo "Dotaz na studenty se nezdařil :( \n";
break;
endif;
echo "<select name=\"id_stud\" size=1>\n";
while (ODBC_Fetch_Row($studenti)):
echo "<option value=\"".ODBC_Result($studenti, "id_stud")."\">".ODBC_Result($studenti, "prijmeni")." ".ODBC_Result($studenti, "jmeno")."</option>\n";
endwhile;
echo "</select>\n";
?>
</td><td>
<input type="hidden" name="from" value="admin_stud">
<input type="submit" VALUE="Smazat">
</td></tr></form>
<!-- ---------------------- Editovat studenta ------------------------ -->
<form method="POST" action="update_stud.php">
<tr><td><b>Editovat studenta:</b></td><td>
<? //výpis výběru studentů
$dotaz = "SELECT prijmeni, jmeno, id_stud
FROM studenti
ORDER BY prijmeni";
@$studenti = ODBC_Exec($spojeni, $dotaz);
if (!$studenti):
echo "Dotaz na studenty se nezdařil :( \n";
break;
endif;
echo "<select name=\"id_stud\" size=1>\n";
while (ODBC_Fetch_Row($studenti)):
echo "<option value=\"".ODBC_Result($studenti, "id_stud")."\">".ODBC_Result($studenti, "prijmeni")." ".ODBC_Result($studenti, "jmeno")."</option>\n";
endwhile;
echo "</select>\n";
?>
</td><td>
<input type="hidden" name="from" value="admin_stud">
<input type="submit" VALUE="Editovat">
</td></tr></form></table></div></td></tr></table>
<!-- -------------------- KONEC části LOGIN ----------------------- -->
<?
break; //přístup nepovolen
else:
echo "<h3>Přístup nepovolen</h3>\n";
echo "<p><b><a href=\"index.php\">Zpět</a> na úvodní stranu. </b></p>\n";
break;
endif;
} while (false);
ODBC_Close($spojeni);
?>
<!-- ----- Ověření výsledků akcí ----- to tu časem asi nebude ----- -->
<br>
<?
echo "<h3>$echo</h3>\n";
$echo = "";
?>
<a href="index.php">Home</a>
</div></td></tr><tr><td>
<? require "pata.php"; ?> <!-- pata stránky -->
</td></tr></table></body></html>

addrem_stud.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html><head>
<title>Editace studenta</title>
<link rel=stylesheet type="text/css" href="style.css"></head>
<body bgcolor="#FFFFFF">
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr><td><div align="center">
<?
do {
@$spojeni = ODBC_Connect("cviceni", "admin", "helmut");
//připojení k databázi
if (!$spojeni):
echo "Spojení s databází nenavázáno :( \n";
break;
endif;
switch ($from)
{
case "add":
?>
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr>
<td height="20">
<div align="center">
<!-- ---------------- Přiřazení studenta do předmětu ----------------- -->
<?
$dotaz = "INSERT INTO pred_stud
VALUES ($id_pred, $id_stud)";
$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Studenta se nepodařilo přiřadit :( \n";
break;
endif; // přidání prázdných záznamů do tabulky výsledků
$testy = ODBC_Exec($spojeni, "SELECT id_test FROM testy WHERE predmet=$id_pred");
if (!$testy):
echo "Chyba při vkládání položek do tab. VYSLEDKY :( \n";
break;
endif;
while (ODBC_Fetch_Row($testy)):
$id_test = ODBC_Result($testy, "id_test");
$vysled = ODBC_Exec($spojeni, "INSERT INTO vysledky VALUES ($id_test, $id_stud, NULL)");
if (!$vysled):
echo "Chyba při vkládání položek do tab. VYSLEDKY (2) :( \n";
break;
endif;
endwhile;
$echo = "<h3>Student byl úspěšně přiřazen<br>do předmětu <font color=\"magenta\">$aktpred </font></h3>";
echo $echo;
?>
<form action="admin.php"> <!-- zpět form -->
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" value="Zpět na správu předmětu <? echo $aktpred; ?>">
</form>
<!-- --------------- Odebráníní studenta z předmětu -------------- -->
<?
break;
case "remove": //odebrání
$dotaz = "DELETE FROM pred_stud
WHERE id_pred=$id_pred AND id_stud=$id_stud";
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba, studenta se nepodařilo odebrat :( \n";
break;
endif; //vymazání příslušných řádků v tabulce VYSLEDKY
$testy = ODBC_Exec($spojeni, "SELECT id_test FROM testy WHERE predmet=$id_pred");
if (!$testy):
echo "Chyba při mazání položek z tab. VYSLEDKY :( \n";
break;
endif;
while (ODBC_Fetch_Row($testy)):
$id_test = ODBC_Result($testy, "id_test");
$vysled = ODBC_Exec($spojeni, "DELETE FROM vysledky WHERE id_test=$id_test AND id_stud=$id_stud");
if (!$vysled):
echo "Chyba při mazání položek z tab. VYSLEDKY :( \n";
break;
endif;
endwhile;
$echo = "<h3>Student byl úspěšně odebrán<br> z předmětu <font color=\"magenta\">$aktpred</font></h3>";
echo $echo;
?>
<form action="admin.php"> <!-- zpět form -->
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" value="Zpět na správu předmětu <? echo $aktpred; ?>">
</form>
<?
break;
}
} while (false);
ODBC_Close($spojeni);
?>
</div></td></tr></table></body></html>

insert_test.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html><head><title>Smazání testu</title></head><body>
<? //Přidat test
do {
if ($from=="admin"): //ověření přístupu
$echo = "Test<font color=\"magenta\"> $nazev </font>byl úspěšně přidán.";
@$spojeni = ODBC_Connect("cviceni", "admin", "helmut");
//připojení k databázi
if (!$spojeni):
$echo = "Chyba, test se nepodařilo přidat.";
break;
endif;
$dotaz = "SELECT Max(id_test)+1 FROM testy"; //generování nového ID
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
$echo = "Chyba, test se nepodařilo přidat.";
break;
endif;
if (ODBC_Fetch_Row($vysledek)) //přečtení nového ID
$id_test = ODBC_Result($vysledek, 1);
else {
$echo = "Chyba, test se nepodařilo přidat.";
break;
}
if ($id_test=="")
$id_test = 1;
$dotaz = "INSERT INTO testy
VALUES ($id_test, '$nazev', $id_pred)"; //vložení testu
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
$echo = "Chyba, test se nepodařilo přidat.";
break;
endif; // přidání záznamů do tabulky výsledků pro příslušné studenty
$stud = ODBC_Exec($spojeni, "SELECT id_stud
FROM pred_stud
WHERE id_pred=$id_pred"); //?ID if (!$stud):
echo "Chyba při vkládání položek do tab. VYSLEDKY :( \n";
break;
endif;
while (ODBC_Fetch_Row($stud)):
$id_stud = ODBC_Result($stud, "id_stud");
$vysled = ODBC_Exec($spojeni, "INSERT INTO vysledky VALUES ($id_test, $id_stud, NULL)");
if (!$vysled):
echo "Chyba při vkládání položek do tab. VYSLEDKY (2) :( \n";
break;
endif;
endwhile;
break; //přístup nepovolen
else:
$echo = "Chyba, test se nepodařilo přidat.";
break;
endif;
} while (false);
ODBC_Close($spojeni);
?>
<!-- --------------------- Informace o provedení ------------------ -->
<table width="750" border="0" cellspacing="0" cellpadding="0"> <tr><td><div align="center">
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr><td height="20"><div align="center">
<h3><? echo $echo; ?></h4>
<form action="admin.php">
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" value="Zpět na správu předmětu">
</div></td></form></tr></table></div></td></tr></table></body></html>

delete_test.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html><head><title>Smazání testu</title></head><body>
<? //Smazat předmět
do {
@$spojeni = ODBC_Connect("cviceni", "admin", "helmut"); //připojení
if (!$spojeni):
echo "Chyba, spojení a databází.\n";
break;
endif;
$dotaz = "SELECT nazev
FROM testy
WHERE id_test=$id_test"; //přečtení názvu testu
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba - nenalezeno jméno testu.\n";
break;
endif;
if (ODBC_Fetch_Row($vysledek))
$nazev = ODBC_Result($vysledek, 1);
else {
echo "Chyba - nenalezeno jméno testu.\n";
break;
} ?>
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr><td><div align="center">
<?
switch ($from)
{
case "admin": //ověření smazání
?>
<!-- ------------------- Ověření smazání testu -------------------- -->
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr><td><div align="center">
<h4>Opravdu si přejete SMAZAT test <font color="magenta"> <? echo $nazev; ?> </font></h4>
<table cellpadding="5"><tr><td>
<form method="POST" action="delete_test.php">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="hidden" name="id_test" value="<? echo $id_test; ?>">
<input type="hidden" name="from" value="delete_test">
<input type="hidden" name="nazev" value="<? echo $nazev; ?>">
<input type="submit" value="Ano">
</form></td><td><form action="admin.php"> <!--Zpět form -->
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" value="Zpět">
</div></form></td></tr></table>
<?
break;
case "delete_test": //smazání
?>
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3" align="center">
<tr><td><div align="center">
<?
$dotaz = "DELETE FROM testy
WHERE id_test=$id_test"; //mazání z tab TESTY
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba při mazání testu.\n";
break;
endif;
$dotaz = "DELETE FROM vysledky
WHERE id_test=$id_test"; //mazání z tab VYSLEDKY
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba při mazání výsledků testu.\n";
break;
endif;
$echo = "<h3>Test<font color=\"magenta\"> $nazev </font> byl úspěšně smazán.</h3>\n";
echo $echo;
?>
<form action="admin.php"> <!--Zpět form -->
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" value="Zpět na správu předmětu">
</div></td></form></tr></table>
<?
break;
} //end switch
} while (false);
ODBC_Close($spojeni);
?>
</div></td></tr></table></body></html>

update_test.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html><head><title>Editace testu</title>
<link rel=stylesheet type="text/css" href="style.css">
</head><body bgcolor="#FFFFFF">
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr><td><div align="center">
<!-- ------------------ hlavní tělo stránky --------------------- -->
<?
do {
@$spojeni = ODBC_Connect("cviceni", "admin", "helmut"); //připojení
if (!$spojeni):
echo "Spojení s databází nenavázáno :( \n";
break;
endif;
switch ($from)
{
case "admin":
?>
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr><td height="20"><div align="center">
<!-- ----------------- Zobrazení akce ----------------------- -->
<?
@$vysledek = ODBC_Exec($spojeni, "SELECT *
FROM testy
WHERE id_test=$id_test");
if (!$vysledek):
echo "Dotaz na tabulku testy se nezdařil :( \n";
break;
endif;
if (ODBC_Fetch_Row($vysledek))
$nazev = ODBC_Result($vysledek, "nazev"); //výpis názvu předmětu
echo "<h3>Editace testu: $nazev </h3>\n";
?>
<form method="POST" action="update_test.php">
<table width="0" border="0" cellspacing="0" cellpadding="5">
<tr><td><b>ID:</b></td>
<td><? echo $id_test; ?></td>
</tr><tr><td><b>Název:</b></td><td>
<input type="text" name="nazev2" value="<? echo $nazev; ?>">
<input type="hidden" name="nazev" value="<? echo $nazev; ?>">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="hidden" name="id_test" value="<? echo $id_test; ?>">
<input type="hidden" name="from" value="update_test">
</td></tr><tr><td colspan="2"><center>
<input type="submit" VALUE="Změnit"></center></td></tr></form></table>
</div></td></tr></table>
<?
break; //změna - UPDATE
case "update_test":
?>
<!-- --------------------- Zpracování akce -------------------------- -->
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3"><tr><td height="20"><div align="center">
<?
$dotaz = "UPDATE testy
SET nazev = '$nazev2'
WHERE id_test=$id_test";
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Změna neprovedena :( \n";
break;
else:
$echo = "<h3>Změna názvu testu z <font color=\"magenta\">$nazev</font><br>na<font color=\"magenta\"> $nazev2 </font>provedena.</h3>";
endif;
echo $echo;
?>
<form action="admin.php">
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" value="Zpět na správu testů">
</div></td></tr></table></form>
<?
break;
}
} while (false);
ODBC_Close($spojeni);
?>
</div></td></tr></table></body></html>

vysled.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html><head><title>Editace výsledků</title>
<link rel=stylesheet type="text/css" href="style.css"></head>
<body bgcolor="#FFFFFF">
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr><td><div align="center">
<?
do {
@$spojeni = ODBC_Connect("cviceni", "admin", "helmut"); //připojení
if (!$spojeni):
echo "Spojení s databází nenavázáno :( \n";
break;
endif;
switch ($from)
{
case "admin":
?>
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr><td height="20"><div align="center">
<!-- ------------------------ Editace ---------------------------- -->
<? //načtení výsledků
@$nazev = ODBC_Exec($spojeni, "SELECT nazev FROM testy WHERE id_test=$id_test");
if (!$nazev):
echo "Název aktuálního testu nezjištěn.";
break;
endif;
if (ODBC_Fetch_Row($nazev))
$aktnazev = ODBC_Result($nazev, "nazev"); // výpis akt. názvu testu
$dotaz = "SELECT studenti.id_stud, jmeno, prijmeni, vysledek
FROM studenti, vysledky
WHERE studenti.id_stud=vysledky.id_stud AND id_test=$id_test
ORDER BY prijmeni, jmeno, kruh";
@$result = ODBC_Exec($spojeni, $dotaz);
if (!$result):
echo "Dotaz na tabulku vysledky (+ studenti) se nezdařil.";
break;
endif;
?>
<form method="POST" action="vysled.php"> <!-- vstupní formulář -->
<table width="" border="0" cellspacing="0" cellpadding="5">
<h4>Editace výsledků: <? echo $aktnazev; ?></h4>
<? //výpis jmen a text. polí form.
echo "<table width=\"\" border=\"0\" cellspacing=\"0\" cellpadding=\"5\">"; //tabulka
while (ODBC_Fetch_Row($result)):
echo "<tr><td><b>".ODBC_Result($result, "prijmeni")." ".ODBC_Result($result, "jmeno")."</b></td><td><input type=\"text\" size=\"10\" name=\"".ODBC_Result($result, "id_stud")."\" value=\"".ODBC_Result($result, "vysledek")."\"></td></tr>";
endwhile;
?>
<tr><td colspan="2"><center>
<input type="hidden" name="from" value="vysled">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="hidden" name="aktnazev" value="<? echo $aktnazev; ?>">
<input type="hidden" name="id_test" value="<? echo $id_test; ?>">
<input type="submit" VALUE="Potvrdit">
</center></tr></td></table></form>
<form action="admin.php"> <!--Zpět form -->
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" value="Zpět"></table></form>
<!-- ------------- Zpracování akce ---------------------------- -->
<?
break;
case "vysled": //EDITACE
$echo = "<h3>Změna výsledků testu <font color=\"magenta\">$aktnazev</font> provedena.</h3>";
$dotaz = "SELECT studenti.id_stud
FROM studenti, pred_stud
WHERE studenti.id_stud=pred_stud.id_stud AND id_pred=$id_pred
ORDER BY prijmeni, jmeno, kruh";
@$stud = ODBC_Exec($spojeni, $dotaz);
if (!$stud):
$echo = "Chyba při změně výsledků :( \n";
break;
endif;
while (ODBC_Fetch_Row($stud)):
$id_stud = ODBC_Result($stud, "id_stud");
${$id_stud} += 0; //převod na číslo
$vysled = ODBC_Exec($spojeni, "UPDATE vysledky
SET vysledek=${$id_stud}
WHERE id_test=$id_test AND id_stud=$id_stud");
if (!$vysled):
$echo = "Chyba při změně výsledků (2) :( \n";
break;
endif;
endwhile;
echo $echo;
?>
<form action="admin.php"> <!-- zpět form -->
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="submit" value="Zpět na správu předmětu"></form>
<?
break;
}
} while (false);
ODBC_Close($spojeni);
?>
</div></td></tr></table></body></html>

insert_pred.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<? //Přidat předmět
do
{
if ($from=="insert_pred"): //ověření přístupu
$echo = "Předmět <font color=\"magenta\"> $nazev </font> byl úspěšně přidán.";
@$spojeni = ODBC_Connect("cviceni", "admin", "helmut");
//připojení k databázi
if (!$spojeni):
$echo = "Chyba, předmět se nepodařilo přidat.";
break;
endif;
$dotaz = "SELECT Max(id_pred)+1 FROM predmety"; //nové ID
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
$echo = "Chyba, nové ID nezjištěno.";
break;
endif;
if (ODBC_Fetch_Row($vysledek)) //přečtení ID
$id_pred = ODBC_Result($vysledek, 1);
else {
$echo = "Chyba, nové ID nezjištěno.";
break;
}
if ($id_pred=="")
$id_pred = 1;
$dotaz = "INSERT INTO predmety
VALUES ($id_pred, '$nazev')"; //vložení předmětu
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
$echo = "Chyba, předmět se nepodařilo přidat.";
break;
endif;
break; //přístup nepovolen
else:
$echo = "Chyba, předmět se nepodařilo přidat.";
break;
endif;
} while (false);
ODBC_Close($spojeni);
?>
<html><head><title>Přidání předmětu</title>
<link rel=stylesheet type="text/css" href="style.css"></head>
<body bgcolor="#FFFFFF">
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr><td><div align="center">
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr align="center"><td><h4><? echo $echo; ?> </h4>
<form action="admin_pred.php"> <!-- zpět form -->
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="submit" value="Zpět na správu předmětů">
</form></td></tr></table></div></td></tr></table></body></html>

delete_pred.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html><head><title>Smazání předmětu</title></head><body>
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr><td><div align="center">
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3"><tr align="center"><td>
<? //Smazat předmět
do {
@$spojeni = ODBC_Connect("cviceni", "admin", "helmut"); //připojení if (!$spojeni):
echo "Chyba, spojení a databází.\n";
break;
endif;
$dotaz = "SELECT nazev
FROM predmety
WHERE id_pred=$id_pred"; //přečtení názvu předmětu
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba - nenalezeno jméno předmětu\n";
break;
endif;
if (ODBC_Fetch_Row($vysledek))
$nazev = ODBC_Result($vysledek, 1);
else {
echo "Chyba - nenalezeno jméno předmětu\n";
break;
}
switch ($from)
{
case "admin_pred": //ověření smazání
?>
<!-- ------------------ Ověření smazání předmětu ------------------- -->
<h4>Opravdu si přejete SMAZAT předmět <font color="magenta"> <? echo $nazev; ?> </font><br>včetně všech součástí v tabulce testů, výsledků a přiřazení studentů ?</h4>
<table cellpadding="5"><tr><td>
<form method="POST" action="delete_pred.php">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="hidden" name="from" value="delete_pred">
<input type="hidden" name="nazev" value="<? echo $nazev; ?>">
<input type="submit" value="Ano"></form></td>
<td><form action="admin_pred.php">
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="submit" value="Zpět"></form>
<?
break;
case "delete_pred": //smazání
?>
<!-- ---------------------- Smazání předmětu ------------------------ -->
<?
$dotaz = "DELETE FROM predmety
WHERE id_pred=$id_pred"; //mazání z tab PREDMETY
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba při mazání předmětu (tab. predmety).\n";
break;
endif;
$dotaz = "DELETE FROM pred_stud
WHERE id_pred=$id_pred"; //mazání z tab PRED_STUD
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba při mazání předmětu (tab. pred_stud).\n";
break;
endif;
$dotaz = "SELECT id_test
FROM testy
WHERE predmet=$id_pred"; //mazání z výsledků
@$testy = ODBC_Exec($spojeni, $dotaz);
if (!$testy):
echo "Dotaz na testy se nezdařil :( \n";
break;
endif;
while (ODBC_Fetch_Row($testy)):
$id_test = ODBC_Result($testy, "id_test");
@$vysledek = ODBC_Exec($spojeni, "DELETE FROM vysledky WHERE id_test=$id_test");
if (!$vysledek):
echo "Chyba při mazání předmětu (tab. vysledky - test: $id_test).\n";
break;
endif;
endwhile;
$dotaz = "DELETE FROM testy
WHERE predmet=$id_pred"; //mazání z tab TESTY
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba při mazání předmětu (tab. testy).\n";
break;
endif;
$echo = "<h3>Předmět<font color=\"magenta\"> $nazev </font> byl úspěšně smazán.</h3>\n";
echo $echo;
?>
<form action="admin_pred.php">
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="submit" value="Zpět na úpravu předmětů">
<?
break;
} //end switch
} while (false);
ODBC_Close($spojeni);
?>
</td></form></tr></table></div></td></tr></table></body></html>

update_pred.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html><head><title>Editace předmětu</title>
<link rel=stylesheet type="text/css" href="style.css"></head>
<body bgcolor="#FFFFFF">
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr><td><div align="center">
<!-- ------------------- hlavní tělo stránky ---------------------- -->
<?
do {
@$spojeni = ODBC_Connect("cviceni", "admin", "helmut"); //připojení
if (!$spojeni):
echo "Spojení s databází nenavázáno :( \n";
break;
endif;
switch ($from)
{
case "admin_pred":
?>
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr><td height="20"><div align="center">
<!-- ----------------------- Výběr akce ----------------------------- -->
<?
@$vysledek = ODBC_Exec($spojeni, "SELECT *
FROM predmety
WHERE id_pred=$id_pred");
if (!$vysledek):
echo "Dotaz na tabulku predmety se nezdařil :( \n";
break;
endif;
if (ODBC_Fetch_Row($vysledek))
$nazev = ODBC_Result($vysledek, "nazev"); //výpis názvu
echo "<h3>Editovat předmět: $nazev </h3>\n";
?>
<form method="POST" action="update_pred.php">
<table width="0" border="0" cellspacing="0" cellpadding="5">
<tr><td><b>ID:</b></td>
<td><? echo $id_pred; ?></td></tr><tr>
<td><b>Název:</b></td><td>
<input type="text" name="nazev2" value="<? echo $nazev; ?>">
<input type="hidden" name="nazev" value="<? echo $nazev; ?>">
<input type="hidden" name="id_pred" value="<? echo $id_pred; ?>">
<input type="hidden" name="from" value="update_pred"></td></tr>
<tr><td colspan="2"><center>
<input type="submit" VALUE="Změnit">
</center></td></tr></table></form>
</div></td></tr></table>
<!-- --------------------- Zpracování akcí -------------------------- -->
<p>&nbsp;</p>
<?
break; //změna - UPDATE
case "update_pred":
$dotaz = "UPDATE predmety
SET nazev = '$nazev2'
WHERE id_pred=$id_pred";
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Změna neprovedena :( \n";
break;
else:
$echo = "<h3>Změna názvu předmětu z <font color=\"magenta\">$nazev</font><br>na<font color=\"magenta\"> $nazev2 </font>provedena.</h3>";
endif;
echo $echo;
?>
<form action="admin_pred.php">
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="submit" value="Zpět na úpravu předmětů"></form>
<?
break;
}
} while (false);
ODBC_Close($spojeni);
?>
</div></td></tr></table></body></html>

insert_stud.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html><head><title>Přidání studenta</title>
<link rel=stylesheet type="text/css" href="style.css"></head>
<body bgcolor="#FFFFFF">
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr><td><div align="center">
<!-- ------------------- hlavní tělo stránky ----------------------- -->
<?
do {
@$spojeni = ODBC_Connect("cviceni", "admin", "helmut"); //připojení
if (!$spojeni):
echo "Spojení s databází nenavázáno :( \n";
break;
endif;
switch ($from)
{
case "admin_stud":
?>
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr><td height="20"><div align="center">
<h4>Přidání nového studenta</h4>
<!-- ------------------------- Akce ----------------------------- -->
<?
$dotaz = "SELECT Max(id_stud)+1 FROM studenti"; // nové ID
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba, nové ID nezjištěno.";
break;
endif;
if (ODBC_Fetch_Row($vysledek)) //přečtení nového ID
$id_stud = ODBC_Result($vysledek, 1);
else {
echo "Chyba, nové ID nezjištěno.";
break;
}
if ($id_stud=="") //je-li první ID=1
$id_stud = 1;
?>
<form method="POST" action="insert_stud.php"> <!-- vstupní formulář -->
<table width="0" border="0" cellspacing="0" cellpadding="5">
<tr><td><b>ID:</b></td>
<td><b><? echo $id_stud; ?></b>
<input type="hidden" name="id_stud" value="<? echo $id_stud; ?>">
</td></tr>
<tr><td><b>Jméno:</b></td>
<td><input type="text" name="jmeno" size="25"></td></tr>
<tr><td><b>Příjmení:</b></td>
<td><input type="text" name="prijmeni" size="25"></td></tr>
<tr><td><b>Kruh:</b></td>
<td><input type="text" name="kruh" size="10"></td></tr>
<tr><td><b>E-mail:</b></td>
<td><input type="text" name="email" size="30"></td></tr>
<tr><td colspan="2"><center>
<input type="hidden" name="from" value="insert_stud">
<input type="submit" VALUE="Přidat"></center></td></tr></form></table>
</div></td></tr></table>
<!-- ------------------ Zpracování akce --------------------------- -->
<?
break;
case "insert_stud": //přidání - INSERT
$dotaz = "INSERT INTO studenti
VALUES ($id_stud, '$jmeno', '$prijmeni', $kruh, '$email')";
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba, studenta se nepodařilo přidat.";
break;
else:
$echo = "<h3>Student <font color=\"magenta\">$jmeno $prijmeni </font>přidán.</h3>";
endif;
echo $echo;
?>
<form action="admin_pred.php"> <!-- zpět form -->
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="submit" value="Zpět na správu studentů"></form>
<form action="insert_stud.php"> <!-- přidat další -->
<input type="hidden" name="from" value="admin_stud">
<input type="submit" value="Přidat dalšího studenta">
</form>
<?
break;
}
} while (false);
ODBC_Close($spojeni);
?>
</div></td></tr></table></body></html>

delete_stud.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html><head><title>Přidání studenta</title>
<link rel=stylesheet type="text/css" href="style.css"></head>
<body bgcolor="#FFFFFF">
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr><td><div align="center">
<!-- --------------------- hlavní tělo stránky ----------------------- -->
<?
do {
@$spojeni = ODBC_Connect("cviceni", "admin", "helmut"); //připojení
if (!$spojeni):
echo "Spojení s databází nenavázáno :( \n";
break;
endif;
switch ($from)
{
case "admin_stud":
?>
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr><td height="20"><div align="center">
<h4>Opravdu chcete SMAZAT studenta<br>včetně všech součástí?</h4>
<!-- ---------------------- Potvrzení akce ------------------------- -->
<?
$dotaz = "SELECT *
FROM studenti
WHERE id_stud=$id_stud"; //ověření smazání
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Dotaz na tabulku studenti se nezdařil.";
break;
endif;
if (ODBC_Fetch_Row($vysledek)):
$id_stud = ODBC_Result($vysledek, "id_stud");
$jmeno = ODBC_Result($vysledek, "jmeno");
$prijmeni = ODBC_Result($vysledek, "prijmeni");
$kruh = ODBC_Result($vysledek, "kruh");
$email = ODBC_Result($vysledek, "email");
else:
echo "Dotaz na tabulku studenti se nezdařil.";
break;
endif;
?>
<form method="POST" action="delete_stud.php"> <!-- vstupní formulář -->
<table width="0" border="0" cellspacing="0" cellpadding="5">
<tr><td><b>ID:</b></td>
<td><b><? echo $id_stud; ?></b></td></tr>
<tr><td><b>Jméno:</b></td>
<td><? echo $jmeno; ?></td></tr>
<tr><td><b>Příjmení:</b></td>
<td><? echo $prijmeni; ?></td></tr>
<tr><td><b>Kruh:</b></td>
<td><? echo $kruh; ?></td></tr>
<tr><td><b>E-mail:</b></td>
<td><? echo $email; ?></td></tr>
<tr><td colspan="2"><center>
<input type="hidden" name="from" value="delete_stud">
<input type="hidden" name="id_stud" value="<? echo $id_stud; ?>">
<input type="hidden" name="jmeno" value="<? echo $jmeno; ?>">
<input type="hidden" name="prijmeni" value="<? echo $prijmeni; ?>">
<input type="submit" VALUE="Smazat"> </center></td></tr></form>
<tr><td colspan="2"> <center>
<form action="admin_pred.php"> <!-- zpět form -->
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="submit" value="Zpět"></center></td></form></tr></table>
</div></td></tr></table>
<!-- ---------------------- Zpracování akce ----------------------- -->
<?
break;
case "delete_stud": //mazání - DELETE
$dotaz = "DELETE FROM studenti
WHERE id_stud=$id_stud"; //mazání z tab STUDENTI
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba při mazání studenta (tab. studenti).\n";
break;
endif;
$dotaz = "DELETE FROM pred_stud
WHERE id_stud=$id_stud"; //mazání z tab PRED_STUD
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba při mazání studenta (tab. pred_stud).\n";
break;
endif;
$dotaz = "DELETE FROM vysledky
WHERE id_stud=$id_stud"; //mazání z tab VYSLEDKY
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba při mazání studenta (tab. pred_stud).\n";
break;
endif;
$echo = "<h3>Student<font color=\"magenta\"> $prijmeni $jmeno </font> byl úspěšně smazán.</h3>\n";
echo $echo;
?>
<form action="admin_pred.php"> <!-- zpět form -->
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="submit" value="Zpět na správu studentů">
</form>
<?
break;
}
} while (false);
ODBC_Close($spojeni);
?>
</div></td></tr></table></body></html>

update_stud.php

<? Header("Expires: ".GMDate("D, d M Y H:i:s")." GMT"); ?>
<html><head><title>Editace studenta</title>
<link rel=stylesheet type="text/css" href="style.css"></head>
<body bgcolor="#FFFFFF">
<table width="750" border="0" cellspacing="0" cellpadding="0">
<tr><td><div align="center">
<!-- -------------------- hlavní tělo stránky ----------------------- -->
<?
do {
@$spojeni = ODBC_Connect("cviceni", "admin", "helmut"); //připojení
if (!$spojeni):
echo "Spojení s databází nenavázáno :( \n";
break;
endif;
switch ($from)
{
case "admin_stud":
?>
<table width="" border="1" cellspacing="0" cellpadding="10" bgcolor="#BCC2D3">
<tr><td height="20"><div align="center">
<!-- ---------------------- Potvrzení editace ---------------------- -->
<?
$dotaz = "SELECT *
FROM studenti
WHERE id_stud=$id_stud"; //ověření smazání
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Dotaz na tabulku studenti se nezdařil.";
break;
endif;
if (ODBC_Fetch_Row($vysledek)):
$id_stud = ODBC_Result($vysledek, "id_stud");
$jmeno = ODBC_Result($vysledek, "jmeno");
$prijmeni = ODBC_Result($vysledek, "prijmeni");
$kruh = ODBC_Result($vysledek, "kruh");
$email = ODBC_Result($vysledek, "email");
else:
echo "Dotaz na tabulku studenti se nezdařil.";
break;
endif;
?>
<h4>Editace studenta</h4>
<form method="POST" action="update_stud.php"> <!-- vstupní formulář -->
<table width="0" border="0" cellspacing="0" cellpadding="5">
<tr><td><b>ID:</b></td>
<td><b><? echo $id_stud; ?></b>
<input type="hidden" name="id_stud" value="<? echo $id_stud; ?>">
</td></tr>
<tr><td><b>Jméno:</b></td>
<td><input type="text" name="jmeno" size="25" value="<? echo $jmeno; ?>"></td></tr>
<tr><td><b>Příjmení:</b></td>
<td><input type="text" name="prijmeni" size="25" value="<? echo $prijmeni; ?>"></td></tr>
<tr><td><b>Kruh:</b></td>
<td><input type="text" name="kruh" size="10" value="<? echo $kruh; ?>"></td></tr>
<tr><td><b>E-mail:</b></td>
<td><input type="text" name="email" size="30" value="<? echo $email; ?>"></td></tr>
<tr><td colspan="2"><center>
<input type="hidden" name="from" value="update_stud">
<input type="submit" VALUE="Změnit"></center></td></tr></form></table>
</div></td></tr></table>
<!-- ---------------------- Zpracování akce ------------------------- -->
<?
break;
case "update_stud": //změna - UPDATE
$dotaz = "UPDATE studenti
SET jmeno='$jmeno', prijmeni='$prijmeni', kruh=$kruh, email='$email'
WHERE id_stud=$id_stud"; //změna údajů studenta
@$vysledek = ODBC_Exec($spojeni, $dotaz);
if (!$vysledek):
echo "Chyba, studenta se nepodařilo změnit.";
break;
else:
$echo = "<h3>Změna údajů studenta (<font color=\"magenta\">$jmeno $prijmeni </font>) provedena.</h3>";
endif;
echo $echo;
?>
<form action="admin_pred.php"> <!-- zpět form -->
<input type="hidden" name="akce" value="login">
<input type="hidden" name="heslo" value="helmut">
<input type="submit" value="Zpět na správu studentů"></form>
<?
break;
}
} while (false);
ODBC_Close($spojeni);
?>
</div></td></tr></table></body></html>