1 <%@ Page Language="VB" ResponseEncoding="iso-8859-1" Debug="true" validateRequest="false" %>
\r
2 <%@ Register TagPrefix="Rico" TagName="LiveGrid" Src="../../plugins/dotnet/LiveGrid.ascx" %>
\r
3 <%@ Register TagPrefix="Rico" TagName="Column" Src="../../plugins/dotnet/GridColumn.ascx" %>
\r
4 <%@ Register TagPrefix="Rico" TagName="Panel" Src="../../plugins/dotnet/GridPanel.ascx" %>
\r
5 <%@ Register TagPrefix="Rico" TagName="sqlCompatibilty" Src="../../plugins/dotnet/sqlCompatibilty.ascx" %>
\r
6 <%@ Register TagPrefix="Rico" TagName="ricoResponse" Src="../../plugins/dotnet/ricoResponse.ascx" %>
\r
7 <%@ Register TagPrefix="My" TagName="LoadRicoClient" Src="LoadRicoClient.ascx" %>
\r
8 <%@ Register TagPrefix="My" TagName="dbLib" Src="dbConnect.ascx" %>
\r
9 <My:dbLib id='app' runat='server' />
\r
12 <script runat="server">
\r
14 Sub Page_Load(Sender As object, e As EventArgs)
\r
16 dim arEmpSql as string() = {"LastName","', '","FirstName"}
\r
17 dim oSqlCompat=new sqlCompatibilty(app.dbDialect)
\r
18 ex8n.columns(ex8n.ColIndex("EmployeeID")).SelectSql="select EmployeeID," & oSqlCompat.Concat(arEmpSql,false) & " from employees order by LastName,FirstName"
\r
19 ex8n.dataProvider=Request.ServerVariables("SCRIPT_NAME")
\r
20 app.OpenGridForm(ex8n)
\r
23 Protected Overrides Sub Render(writer as HTMLTextWriter)
\r
24 select case ex8n.action
\r
26 RespObj.RenderFlag=false
\r
27 MyBase.Render(writer)
\r
28 case "ins": ex8n.InsertRecord(writer)
\r
29 case "upd": ex8n.UpdateRecord(writer)
\r
30 case "del": ex8n.DeleteRecord(writer)
\r
32 RespObj.dbConnection=app.dbConnection
\r
33 RespObj.dbDialect=app.dbDialect
\r
34 RespObj.sendDebugMsgs=true ' true for development, false for production
\r
35 RespObj.LogSqlOnError=true ' true for development, false for production
\r
36 RespObj.oParse=ex8n.ParseClone()
\r
37 RespObj.RunQuery(writer)
\r
43 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
\r
46 <title>Rico LiveGrid-Example 2 (editable)</title>
\r
48 <My:LoadRicoClient id='initlibs' runat='server' modules='Calendar,Tree' />
\r
49 <link href="../demo.css" type="text/css" rel="stylesheet" />
\r
51 <script type='text/javascript'>
\r
53 // ricoLiveGridForms will call orders_FormInit right before grid & form initialization.
\r
55 function ex8_FormInit() {
\r
56 var cal=new Rico.CalendarControl("Cal");
\r
57 Rico.EditControls.register(cal, Rico.imgDir+'calarrow.png');
\r
59 var CustTree=new Rico.TreeControl("CustomerTree","CustTree.aspx");
\r
60 Rico.EditControls.register(CustTree, Rico.imgDir+'dotbutton.gif');
\r
64 <style type="text/css">
\r
65 div.ricoLG_outerDiv thead .ricoLG_cell, div.ricoLG_outerDiv thead td, div.ricoLG_outerDiv thead th {
\r
77 <div id='explanation'>
\r
78 Base Library: <script type='text/javascript'>document.write(Rico.Lib+' '+Rico.LibVersion);</script>
\r
79 <hr>The data on this grid can be edited using pop-up forms.
\r
80 Just click on a grid cell and then select Edit, Delete, or Add from the pop-up menu.
\r
81 Updates are disabled on the database, so you will get an error message if you try to save.
\r
82 <p>Rather than requesting data from RicoQuery, this page is able to process the AJAX
\r
83 data requests itself. No session variables are used.
\r
85 <p><strong>Orders Table (without sessions)</strong></p>
\r
88 <Rico:LiveGrid runat='server' id='ex8n' formView='true' TableName='orders' DefaultSort='OrderID' FilterLocation='-1' sessions='false'>
\r
90 <Rico:Panel runat='server' heading='Basic Info' />
\r
91 <Rico:Column runat='server' heading='Order#' width='60' ColName='OrderID' EntryType='B' ColData='<auto>' ConfirmDeleteColumn='true' />
\r
92 <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
93 <Rico:Column runat='server' heading='Sales Person' width='140' ColName='EmployeeID' EntryType='SL' filterUI='s' />
\r
94 <Rico:Column runat='server' heading='Order Date' width='100' ColName='OrderDate' EntryType='D' ColData='Today' SelectCtl='Cal' />
\r
95 <Rico:Column runat='server' heading='Required Date' width='100' ColName='RequiredDate' EntryType='D' ColData='Today' SelectCtl='Cal' />
\r
96 <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
98 <Rico:Panel runat='server' heading='Ship To' />
\r
99 <Rico:Column runat='server' heading='Name' width='150' ColName='ShipName' EntryType='B' />
\r
100 <Rico:Column runat='server' heading='Address' width='150' ColName='ShipAddress' EntryType='B' />
\r
101 <Rico:Column runat='server' heading='City' width='80' ColName='ShipCity' EntryType='B' filterUI='s' />
\r
102 <Rico:Column runat='server' heading='Region' width='80' ColName='ShipRegion' EntryType='T' />
\r
103 <Rico:Column runat='server' heading='Postal Code' width='80' ColName='ShipPostalCode' EntryType='T' />
\r
104 <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
108 <Rico:ricoResponse id="RespObj" runat="server" />
\r