diff options
Diffstat (limited to 'db-listtables-html.lsp')
-rw-r--r-- | db-listtables-html.lsp | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/db-listtables-html.lsp b/db-listtables-html.lsp new file mode 100644 index 0000000..fec3ac4 --- /dev/null +++ b/db-listtables-html.lsp @@ -0,0 +1,24 @@ +<% local form, viewlibrary, page_info, session = ... %> +<% require("htmlviewfunctions") %> +<% html = require("acf.html") %> + +<% htmlviewfunctions.displaycommandresults({"createdatabase"}, session) %> + +<H1><%= html.html_escape(form.label) %></H1> +<DL> +<% for i,table in ipairs(form.value) do %> + <li> + <% if viewlibrary.check_permission("viewtable") then %> + <%= html.link{value = "viewtable?table=" .. table, label=table} %> + <% else %> + <%= html.html_escape(table) %> + <% end %> +<% end %> +<% if #form.value == 0 and viewlibrary.check_permission("createdatabase") then %> +<DT>Create Database</DT><DD> +<form action="<%= html.html_escape(page_info.script .. page_info.prefix .. page_info.controller .. "/createdatabase") %>"> +<input class="submit" type="submit" name="submit" value="Create"></DD> +</form> +</DD> +<% end %> +</DL> |