Материал: Автоматизация процесса ведения документации и отчетности в "ФГБУ ФИПС"

Скачать

Заказать новую работу

Внимание! Если размещение файла нарушает Ваши авторские права, то обязательно сообщите нам
114
<BR>
<TABLE CELLPADDING=4 CELLSPACING=".">
<TR>
<TH ALIGN="RIGHT">Show results as:</TH>
<TD>
<INPUT TYPE="Radio" NAME="VIEW" VALUE="table" CHECKED>Table
<INPUT TYPE="Radio" NAME="VIEW" VALUE="list">UL
<INPUT TYPE="Radio" NAME="VIEW" VALUE="records">Separated Records
</TD>
</TR>
<?
if (!eregi("LIMIT", $SQL)):
?>
<TR>
<TH ALIGN="RIGHT">Records per screen:</TH>
<TD><INPUT TYPE="Text" NAME="PAGESIZE" VALUE="20" SIZE=8></TD>
</TR>
<?
endif;
?>
</TABLE>
<BR>
<BR>
<?
FormEnd("Proceed with selected");
echo "</CENTER>\n";
endif;
endif;
elseif ("$cmd" == "Proceed with selected"): // We have SQL and view type here
PrintHead("Preview");
$SQL = stripslashes($SQL);
echo "<H3>SQL: 'SELECT $SQL'</H3>\n";
115
if (!mysql_select_db($DB)):
NotAvailable(__FILE__, __LINE__);
exit;
endif;
$HasLimit = eregi("LIMIT", $SQL);
if (!$HasLimit):
$LSQL = "SELECT $SQL LIMIT $PAGESIZE"; // Prevent huge results transfer
endif;
$result = mysql_query($LSQL);
if ("$VIEW" == "table"):
?>
<TABLE WIDTH="100%" BORDER=1 CELLPADDING=2 CELLSPACING=1>
<TR VALIGN="TOP">
<?
$i = 0;
while ($i < count($FIELDS)):
if ($FIELDS[$i] != "Dont" && $FIELDS[$i] != "Hidden"):
echo "<TH>";
echo $CAPTIONS[$i];
echo "</TH>";
endif;
$i++;
endwhile;
?>
</TR>
<?
$RecStart = "<TR VALIGN=\"TOP\">";
$RecEnd = "</TR>\n";
$FieldStart = "<TD>";
$FieldEnd = "</TD>";
elseif ("$VIEW" == "list"):
echo "<UL>";
116
$RecStart = "<LI>";
$RecEnd = "</LI>\n";
$FieldStart = "";
$FieldEnd = ";";
elseif ("$VIEW" == "records"):
$RecStart = "";
$RecEnd = "<HR>\n";
$FieldStart = "Caption:";
$FieldEnd = "<BR>\n";
endif;
while ($row = mysql_fetch_row($result)):
echo $RecStart;
$i = 0;
while ($i < count($row)):
$val = $row[$i];
$caption = $CAPTIONS[$i];
switch ($FIELDS[$i]):
case "Dont":
break;
case "Hidden": // Don't use any separators here
?>
<INPUT TYPE="Hidden" NAME="<?echo $caption;?>" VALUE="<?echo
$val;?>">
<?
break;
case "Picture":
if ("$FieldStart" == "Caption:"):
echo "<B>$caption:</B>";
else:
echo $FieldStart;
endif;
?>
117
<IMG SRC="<?echo $val;?>" BORDER=0 ALT="<?echo $caption;?>">
<?
echo $FieldEnd;
break;
case "URL":
if ("$FieldStart" == "Caption:"):
echo "<B>$caption:</B>";
else:
echo $FieldStart;
endif;
if ($val):
?>
<A HREF="<?echo $val;?>"><?echo $caption;?></A>
<?
else:
echo "&nbsp;";
endif;
echo $FieldEnd;
break;
case "Email":
if ("$FieldStart" == "Caption:"):
echo "<B>$caption:</B>";
else:
echo $FieldStart;
endif;
if ($val):
?>
<A HREF="mailto:<?echo $val;?>"><?echo $caption;?></A>
<?
else:
echo "&nbsp;";
endif;
118
echo $FieldEnd;
break;
default:
if ("$FieldStart" == "Caption:"):
echo "<B>$caption:</B>";
else:
echo $FieldStart;
endif;
echo $val;
echo $FieldEnd;
break;
endswitch;
$i++;
endwhile;
echo $RecEnd;
endwhile;
if ("$VIEW" == "table"):
echo "</TABLE>\n";
elseif ("$VIEW" == "list"):
echo "</UL>";
endif;
if (!$HasLimit):
?>
<P ALIGN="RIGHT">
<A HREF="<?echo "$PHP_SELF?offset=$PAGESIZE";?>">Next <?echo
$PAGESIZE;?>
records</A>
</P>
<?
endif;
FormStart();
FormEnd("Generate code for SQL output");
Источник: https://baza.diplomsite.ru/previewfile/2054

Смотрите также:

Анализ эффективности инвестиций предприятия на примере ООО «СпецПримСтрой»
Изложение содержания дела, по которому приняты судебные постановления