home *** CD-ROM | disk | FTP | other *** search
/ PC Professionell 2004 December / PCpro_2004_12.ISO / files / webserver / tsw / TSW_3.4.0.exe / Apache2 / admin / langmenu.inc.php < prev    next >
Encoding:
PHP Script  |  2003-11-28  |  536 b   |  17 lines
  1. <?PHP
  2.   print("<form method=\"POST\" action=\"../scripts/editlang.php\">");
  3.   print("<select size=\"1\" name=\"lang_menu_selector\">");
  4.   $directory = "./lang/";
  5.   $handle = opendir($directory);
  6.   while($file = readdir($handle))
  7.   {
  8.     if(is_dir($directory.$file) == true AND $file != "." && $file != "..")
  9.     {
  10.       print("<option>" . $file . "</option>");
  11.     }
  12.   }
  13.   closedir($handle);
  14.   print("</select>");
  15.   print("  <input type=\"submit\" value=\"Go!\" name=\"lang_menu_go\">");
  16.   print("</form>");
  17. ?>