From 3261f4dcadf1e7aa45446153f654b20530c950b9 Mon Sep 17 00:00:00 2001
From: wei <>
Date: Wed, 9 May 2007 08:35:52 +0000
Subject: Update northwind db

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

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

diff --git a/demos/northwind-db/protected/pages/NorthwindCrud.php b/demos/northwind-db/protected/pages/NorthwindCrud.php
new file mode 100644
index 00000000..57694caa
--- /dev/null
+++ b/demos/northwind-db/protected/pages/NorthwindCrud.php
@@ -0,0 +1,28 @@
+<?php
+
+class NorthwindCrud 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) && strpos($entry,'.php'))
+				$list[] = str_replace('.php', '', $entry);
+		}
+		closedir($folder);
+		return $list;
+	}
+}
+
+?>
\ No newline at end of file
-- 
cgit v1.2.3