1 <%@ Page Language="VB" ResponseEncoding="iso-8859-1" Debug="true" validateRequest="false" %>
\r
2 <%@ Register TagPrefix="Rico" Assembly="Rico" NameSpace="Rico" %>
\r
3 <%@ Register TagPrefix="My" TagName="dbLib" Src="dbConnect.ascx" %>
\r
4 <My:dbLib id='app' runat='server' />
\r
7 <script runat="server">
\r
9 Sub Page_Load(Sender As object, e As EventArgs)
\r
11 dim arEmpSql as string() = {"LastName","', '","FirstName"}
\r
12 dim oSqlCompat=new sqlCompatibilty(app.dbDialect)
\r
13 EmployeeID.SelectSql="select EmployeeID," & oSqlCompat.Concat(arEmpSql,false) & " from employees order by LastName,FirstName"
\r
14 ex8n.dataProvider=Request.ServerVariables("SCRIPT_NAME")
\r
15 app.OpenGridForm(ex8n)
\r
18 Protected Overrides Sub Render(writer as HTMLTextWriter)
\r
19 RespObj.dbConnection=app.dbConnection
\r
20 select case ex8n.action
\r
22 RespObj.RenderFlag=false
\r
23 MyBase.Render(writer)
\r
24 case "ins": ex8n.InsertRecord(writer)
\r
25 case "upd": ex8n.UpdateRecord(writer)
\r
26 case "del": ex8n.DeleteRecord(writer)
\r
28 RespObj.dbDialect=app.dbDialect
\r
29 RespObj.oParse=ex8n.ParseClone()
\r
30 RespObj.RunQuery(writer)
\r
36 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
\r
39 <title>Rico LiveGrid-Example 2 (editable)</title>
\r
41 <Rico:LoadClient checkQueryString='true' runat='server' />
\r
42 <link href="../demo.css" type="text/css" rel="stylesheet" />
\r
44 <style type="text/css">
\r
54 <div id='explanation'>
\r
55 Base Library: <script type='text/javascript'>document.write(Rico.Lib+' '+Rico.LibVersion);</script>
\r
56 <hr>The data on this grid can be edited using pop-up forms.
\r
57 Just click on a grid cell and then select Edit, Delete, or Add from the pop-up menu.
\r
58 Updates are disabled on the database, so you will get an error message if you try to save.
\r
59 <p>Rather than requesting data from RicoQuery, this page is able to process the AJAX
\r
60 data requests itself. No session variables are used.
\r
62 <p><strong>Orders Table (without sessions)</strong></p>
\r
65 <Rico:LiveGridEdit runat='server' id='ex8n' TableName='orders' DefaultSort='OrderID' FilterLocation='-1' sessions='false'>
\r
66 <Rico:CalendarControl runat='server' id='Cal' icon='rico-icon rico-calarrow' />
\r
67 <Rico:TreeControl runat='server' id='CustomerTree' icon='rico-icon rico-dotbutton' source='CustTree.aspx' />
\r
68 <Rico:Panel runat='server' heading='Basic Info' />
\r
69 <Rico:Column runat='server' heading='Order#' width='60' ColName='OrderID' EntryType='B' ColData='<auto>' ConfirmDeleteColumn='true' />
\r
70 <Rico:Column runat='server' heading='Customer' width='160' ColName='CustomerID' EntryType='CL' InsertOnly='true' SelectCtl='CustomerTree' SelectSql="select CustomerID,CompanyName from customers order by CompanyName" filterUI='t' />
\r
71 <Rico:Column runat='server' heading='Sales Person' width='140' ColName='EmployeeID' EntryType='SL' filterUI='s' id='EmployeeID' />
\r
72 <Rico:Column runat='server' heading='Order Date' width='100' ColName='OrderDate' EntryType='D' ColData='Today' SelectCtl='Cal' />
\r
73 <Rico:Column runat='server' heading='Required Date' width='100' ColName='RequiredDate' EntryType='D' ColData='Today' SelectCtl='Cal' />
\r
74 <Rico:Column runat='server' heading='Net Sale' width='80' format='DOLLAR' Formula='select sum(UnitPrice*Quantity*(1.0-Discount)) from order_details d where d.OrderID=t.OrderID' />
\r
76 <Rico:Panel runat='server' heading='Ship To' />
\r
77 <Rico:Column runat='server' heading='Name' width='150' ColName='ShipName' EntryType='B' />
\r
78 <Rico:Column runat='server' heading='Address' width='150' ColName='ShipAddress' EntryType='B' />
\r
79 <Rico:Column runat='server' heading='City' width='80' ColName='ShipCity' EntryType='B' filterUI='s' />
\r
80 <Rico:Column runat='server' heading='Region' width='80' ColName='ShipRegion' EntryType='T' />
\r
81 <Rico:Column runat='server' heading='Postal Code' width='80' ColName='ShipPostalCode' EntryType='T' />
\r
82 <Rico:Column runat='server' heading='Country' width='90' ColName='ShipCountry' EntryType='N' filterUI='s' control="new Rico.TableColumn.link('http://en.wikipedia.org/wiki/{11}','_blank')" />
\r
83 </Rico:LiveGridEdit>
\r
85 <Rico:Response id="RespObj" runat="server" />
\r