Projekt

Obecné

Profil

Stáhnout (2.64 KB) Statistiky
| Větev: | Tag: | Revize:
1
<html>
2
<head>
3
  <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
4
  <LINK REL=StyleSheet HREF="/utf/obtc1.css" TYPE="text/css" MEDIA="screen, print">
5
  <title>Selected items from the Old Babylonian Text Corpus</title>
6
<script language="JavaScript">
7
<!--
8
function openWindow(url, name)
9
{
10
popupWin = window.open(url, name, "scrollbars,resizable,width=740,height=490");
11
}
12
//-->
13
</script>
14
</head>
15
<body>
16
<FONT FACE='Verdana' Color="#9bbad6">
17
<h2><center>Chapter or text in full - in the Old Babylonian Text Corpus</center></FONT></h2>
18
<?
19
  echo ("<FONT FACE='Arial Unicode MS, Code2000, Titus Cyberbit Basic' SIZE=3>");
20
  @$connection = Pg_Connect ("user=dbowner dbname=klinopis");
21
  if (!$connection)
22
	{
23
    echo "There are probably too many querries, please try again later!";
24
	}
25
  else
26
	{
27
  $pod = ("bookandchapter='$bookandchapter'");
28
  if (@$result = @Pg_Exec (
29
                "SELECT * FROM graf01 WHERE $pod ORDER BY OID"))
30
	{
31
  if (($pocethesel = @Pg_NumRows ($result)) > 0)
32
	{
33
  echo "<table border=0 bgcolor=\"#ecece6\" cellspacing=0 cellpadding=3>";
34
  echo "<tr><td><SPAN CLASS=text1>text quotation: $bookandchapter</SPAN>&nbsp;";
35
  echo "<td><a href=\"../autor/enter.html\"><small>login to edit - members only</small></a></td>";
36
  echo "<FONT color=#8080ff face=Verdana size=3>text in transliteration</FONT></td></tr>";
37
	for ($i = 0; $i < $pocethesel; $i++)
38
	{
39
	List ($bookandchapter, $paragraph, $transliteration) = Pg_Fetch_Row ($result, $i);
40
	echo "<TR><td><a href=\"javascript:openWindow('./obtextcoment.php?paragraph2=$paragraph&bookandchapter=$bookandchapter', 'popwinP')\">$paragraph</A>&nbsp;&nbsp;&nbsp;";
41
           echo "<SPAN CLASS=text1>$transliteration<br></SPAN></td>";
42
           echo "<td><a href=\"javascript:openWindow('../autor/obtexts/obtexts1.php?paragraph=$paragraph&bookandchapter=$bookandchapter', 'popwinE')\">edit</a></td>";
43
	}
44
}
45
}
46
  $polozky2 = ("bookandchapterc='$bookandchapter'");
47
  $result2 = Pg_Exec ($connection, "SELECT comment1, autor, bookandchapterc, paragraphc FROM obtextc WHERE $polozky2");
48
//  $pocet2 = Pg_NumRows ($result2);
49
  if (($pocet2 = @Pg_NumRows ($result2)) > 0)
50
	{
51
	for ($j = 0; $j < $pocet2; $j++)
52
	{
53
	List ($comment1, $autor) = Pg_Fetch_Row ($result2, $j);
54
	echo "<td>$comment1</td><td>$autor</td><BR>\n<br>";
55
	}
56
}
57
           echo "<td><a href=\"javascript:openWindow('../autor/obtexts/obtextc1.php?paragraph=$paragraph&bookandchapter=$bookandchapter', 'popwinE')\">$comment1</a></td>";
58
echo "<TD><a href=\"javascript:openWindow('./obtextdesc.php?bookandchapter=$bookandchapter', 'popwin')\">$bookandchapter$paragraph)</a></TD>";
59
echo "</TR>";
60
	echo "</table>";
61
  Pg_Close($connection);
62
}
63
?>
64
<BR>
65
</FONT>
66
</body>
67
</html>
(19-19/135)