<?
require("connect.php");
echo "<form action=displayvdo.php><font size=0>";
echo "<select name=dfile size=5>";
$result = mysql_list_tables("perlphpasp",$connect);
while ($table = mysql_fetch_row($result)) {
  echo "<option value=$table[0]>$table[0]";
}
echo "</select><input type=submit value=Display_VDO>";
echo "</form>";
if (!$dfile) { exit; }
$result = mysql_list_fields($db,$dfile);
$numfld = mysql_num_fields($result);
$sql="select * from $dfile";
$result = mysql_db_query($db,$sql);  
echo "Table of $dfile in Database $db<ol>";
while ($arr = mysql_fetch_row($result)) {
  echo "<li>";
  for ($i=0;$i<$numfld;$i++) {
    echo $arr[$i]." - ";
  }  
}
echo "</ol>";
mysql_close($connect);
?>