<%@ LANGUAGE="VBSCRIPT" %>
<% Response.CacheControl = "no-cache" %>
<% Response.AddHeader "Pragma", "no-cache" %>
<% Response.Expires = -1 %>
Rico LiveGrid-Example 4 (editable)
<%
'************************************************************************************************************
' LiveGrid Plus-Edit Example
'************************************************************************************************************
' Matt Brown
'************************************************************************************************************
dim orderTE, detailTE
if OpenGridForm(empty,"customers") then
set orderTE=OpenTableEdit("orders")
set detailTE=OpenTableEdit("order_details")
if oForm.action<>"table" then
DefineCustTable
elseif orderTE.action<>"table" then
DefineOrderTable
elseif detailTE.action<>"table" then
DefineDetailTable
else
DisplayAllTables
end if
end if
CloseApp
sub DisplayAllTables()
response.write "
"
%>
<%
response.write "
Double-click on a row to see all orders for that customer."
response.write "
Drag the edge of a column heading to resize a column."
response.write "
To filter: right-click (ctrl-click in Opera, Konqueror, or Safari) on the value that you would like to use as the basis for filtering, then select the desired filtering method from the pop-up menu."
response.write "
Right-click anywhere in a column to see sort, hide, and show options."
response.write "
Notice that filters and sorting in the customer grid persist after a refresh. The saveColumnInfo option specifies that these values should be saved in cookies."
response.write "