From ea9e7eb535b460218b693d4e5fec80297eb3e360 Mon Sep 17 00:00:00 2001
From: wei <>
Date: Thu, 3 May 2007 01:37:21 +0000
Subject: Add northwind db demo.

---
 demos/northwind-db/protected/pages/Home.php | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 demos/northwind-db/protected/pages/Home.php

(limited to 'demos/northwind-db/protected/pages/Home.php')

diff --git a/demos/northwind-db/protected/pages/Home.php b/demos/northwind-db/protected/pages/Home.php
new file mode 100644
index 00000000..06035069
--- /dev/null
+++ b/demos/northwind-db/protected/pages/Home.php
@@ -0,0 +1,28 @@
+<?php
+
+class Home extends TPage
+{
+	function onInit($param)
+	{
+		$classes = $this->getRecordClassList(Prado::getPathOfNamespace('Application.database.*'));
+		$this->class_list->dataSource = $classes;
+		$this->class_list->dataBind();
+	}
+
+	protected function getRecordClassList($directory)
+	{
+		$list=array();
+		$folder=@opendir($directory);
+		while($entry=@readdir($folder))
+		{
+			if($entry[0]==='.')
+				continue;
+			else if(is_file($directory.'/'.$entry))
+				$list[] = str_replace('.php', '', $entry);
+		}
+		closedir($folder);
+		return $list;
+	}
+}
+
+?>
\ No newline at end of file
-- 
cgit v1.2.3