.net server control is almost feature complete and functional. All .net examples...

[infodrom/rico3] / examples / dotnet / RicoDbViewer.aspx

diff --git a/examples/dotnet/RicoDbViewer.aspx b/examples/dotnet/RicoDbViewer.aspx
index 91371be..639eb2d 100644 (file)
--- a/examples/dotnet/RicoDbViewer.aspx
+++ b/examples/dotnet/RicoDbViewer.aspx
@@ -8,8 +8,12 @@
 Sub Page_Load(Sender As object, e As EventArgs)\r
   Dim restrictions() As String = New String(3) {}\r
   if app.OpenDB() then\r
-    restrictions(3)="BASE TABLE"\r
-    'restrictions(3)="TABLE"\r
+    \r
+    select case app.dbDialect\r
+      case "Access": restrictions(3)="TABLE"\r
+      case else:     restrictions(3)="BASE TABLE"\r
+    end select\r
+    \r
     TableList.DataSource = app.dbConnection.GetSchema ("Tables", restrictions)\r
     TableList.DataBind()\r
     restrictions(3)="VIEW"\r
@@ -65,7 +69,7 @@ html, body {
 <asp:Repeater ID="TableList" Runat="server">\r
 <ItemTemplate>\r
 <li>\r
-<asp:HyperLink runat="server" NavigateUrl='<%# "RicoDbViewerDetail.aspx?id=" & DataBinder.Eval(Container.DataItem, "TABLE_NAME") & "&" & request.servervariables("QUERY_STRING") %>' Text='<%#DataBinder.Eval(Container.DataItem, "TABLE_NAME")%>' Target="detail" />\r
+<asp:HyperLink runat="server" NavigateUrl='<%# "RicoDbViewerDetail.aspx?tabid=" & DataBinder.Eval(Container.DataItem, "TABLE_NAME") & "&" & request.servervariables("QUERY_STRING") %>' Text='<%#DataBinder.Eval(Container.DataItem, "TABLE_NAME")%>' Target="detail" />\r
 </li>\r
 </ItemTemplate>\r
 </asp:Repeater>\r
@@ -77,7 +81,7 @@ html, body {
 <asp:Repeater ID="ViewList" Runat="server">\r
 <ItemTemplate>\r
 <li>\r
-<asp:HyperLink runat="server" NavigateUrl='<%# "RicoDbViewerDetail.aspx?id=" & DataBinder.Eval(Container.DataItem, "TABLE_NAME") & "&" & request.servervariables("QUERY_STRING") %>' Text='<%#DataBinder.Eval(Container.DataItem, "TABLE_NAME")%>' Target="detail" />\r
+<asp:HyperLink runat="server" NavigateUrl='<%# "RicoDbViewerDetail.aspx?tabid=" & DataBinder.Eval(Container.DataItem, "TABLE_NAME") & "&" & request.servervariables("QUERY_STRING") %>' Text='<%#DataBinder.Eval(Container.DataItem, "TABLE_NAME")%>' Target="detail" />\r
 </li>\r
 </ItemTemplate>\r
 </asp:Repeater>\r