gehe zur Dokumentation dieser Datei
41 function rs2html(&$rs,$ztabhtml=
false,$zheaderarray=
false,$htmlspecialchars=
true,$echo =
true)
43 $s =
'';$rows=0;$docnt =
false;
47 printf(ADODB_BAD_RS,
'rs2html');
51 if (! $ztabhtml) $ztabhtml =
"BORDER='1' WIDTH='98%'";
54 $ncols = $rs->FieldCount();
55 $hdr =
"<TABLE COLS=$ncols $ztabhtml><tr>\n\n";
56 for ($i=0; $i < $ncols; $i++) {
57 $field = $rs->FetchField($i);
59 if ($zheaderarray) $fname = $zheaderarray[$i];
60 else $fname = htmlspecialchars($field->name);
61 $typearr[$i] = $rs->MetaType($field->type,$field->max_length);
64 $fname =
'Field '.($i+1);
67 if (strlen($fname)==0) $fname =
' ';
68 $hdr .=
"<TH>$fname</TH>";
71 if ($echo) print $hdr.
"\n\n";
75 $numoffset = isset($rs->fields[0]) ||isset($rs->fields[1]) || isset($rs->fields[2]);
78 $s .=
"<TR valign=top>\n";
80 for ($i=0; $i < $ncols; $i++) {
81 if ($i===0) $v=($numoffset) ? $rs->fields[0] : reset($rs->fields);
82 else $v = ($numoffset) ? $rs->fields[$i] : next($rs->fields);
87 if (strpos($v,
':') !==
false);
90 $s .=
"<TD> </TD>\n";
92 $s .=
" <TD>".$rs->UserDate($v,
"D d, M Y") .
"</TD>\n";
97 if (empty($v)) $s .=
"<TD> </TD>\n";
98 else $s .=
" <TD>".$rs->UserTimeStamp($v,
"D d, M Y, H:i:s") .
"</TD>\n";
102 if (abs(abs($v) - round($v,0)) < 0.00000001)
105 $v = round($v,$ADODB_ROUND);
107 $vv = stripslashes((trim($v)));
108 if (strlen($vv) == 0) $vv .=
' ';
109 $s .=
" <TD align=right>".$vv .
"</TD>\n";
133 if ($htmlspecialchars) $v = htmlspecialchars(trim($v));
135 if (strlen($v) == 0) $v =
' ';
136 $s .=
" <TD>". str_replace(
"\n",
'<br>',stripslashes($v)) .
"</TD>\n";
143 if ($rows >= $gSQLMaxRows) {
144 $rows =
"<p>Truncated at $gSQLMaxRows</p>";
151 if (!$rs->EOF && $rows % $gSQLBlockRows == 0) {
154 if ($echo) print $s .
"</TABLE>\n\n";
155 else $html .= $s .
"</TABLE>\n\n";
160 if ($echo) print $s.
"</TABLE>\n\n";
161 else $html .= $s.
"</TABLE>\n\n";
163 if ($docnt)
if ($echo) print
"<H2>".$rows.
" Rows</H2>";
165 return ($echo) ? $rows : $html;
169 function arr2html(&$arr,$ztabhtml=
'',$zheaderarray=
'')
171 if (!$ztabhtml) $ztabhtml =
'BORDER=1';
173 $s =
"<TABLE $ztabhtml>";
177 for ($i=0; $i<
sizeof($zheaderarray); $i++) {
178 $s .=
" <TH>{$zheaderarray[$i]}</TH>\n";
183 for ($i=0; $i<
sizeof($arr); $i++) {
187 for ($j=0; $j<
sizeof(
$a); $j++) {
189 if (empty($val)) $val =
' ';
190 $s .=
" <TD>$val</TD>\n";
193 $s .=
' <TD>'.$a.
"</TD>\n";
194 }
else $s .=
" <TD> </TD>\n";
Sie sind hier: Home » MyOOS Benutzerhandbuch » ADOdb
Korrekturen, Hinweise und Ergänzungen
Bitte scheuen Sie sich nicht und melden Sie, was auf dieser Seite sachlich falsch oder irreführend ist, was ergänzt werden sollte, was fehlt usw. Dazu bitte oben aus dem Menü Seite den Eintrag
Support Forum wählen. Es ist eine kostenlose Anmeldung erforderlich, um Anmerkungen zu posten. Unpassende Postings, Spam usw. werden kommentarlos entfernt.