Click here to Skip to main content
15,884,099 members
Articles / Web Development / IIS
Article

A db grid control using ASP

Rate me:
Please Sign up or sign in to vote.
4.74/5 (34 votes)
27 Aug 20012 min read 525.1K   11K   88   98
A grid control for ASP written in JavaScript to display recordsets.

Sample Image - bgrid1.gif

Introduction

A grid control for editing databases on the web. It is written for ASP with JavaScript, but should be fully usable from VBScript as well. With just a few lines of code, you will, with this control, be able to edit your data.

Features

  • Write protect fields you don't want the user to edit.
  • ID fields can look up values in other recordsets.
  • Sort by any column that supports sorting.
  • Paging with custom page size.
  • Automatically detects primary key, but can also be manually overridden.
  • Get default values for new records with custom select statement.

Usage

To use the grid you create it by calling new BGrid(rs) from JavaScript, or you can alternately create it by calling CreateGrid(rs) which also works from VBScript. The parameter in both methods is the recordset you want the grid to display. This recordset should allow moving both back and forward, so I usually set CursorLocation to adUseClient on my connection.

I'm too lazy to manually declare all those ad-constants, so at the top of config.asa I add the following. This means that all ADO constants are available, and is required for the demo to work without a lot of work.

HTML
<!-- METADATA NAME="Microsoft ActiveX Data Objects 2.5 Library"
              TYPE="TypeLib" UUID="{00000205-0000-0010-8000-00AA006D2EA4}" -->

A simple example

Using the grid requires only a few lines of code:

ASP
<%@Language="JavaScript%">
<!--#include file=misc.asp-->
<!--#include file=b.dropdown.asp-->
<!--#include file=b.grid.asp-->

<form method=post>
<%
var Conn = CreateConnection(); // CreateConnection is defined in misc.asp
var rs = Server.CreateObject("ADODB.Recordset");
rs.Open("EmployeeTerritories",Conn,adOpenStatic,adLockOptimistic,adCmdTable);

var Grid = new BGrid(rs);
Grid.Process(); // Process must be called to handle saving and such stuff
Grid.Display(); // Display does just that
Grid = null;

rs.Close();
rs = null;
Conn.Close();
Conn = null;
%>
</form>

Since the EmployeeTerritories table has a field called TerritoryID which is a foreign key to the Territories table, we can tell the grid to look for a value to display from this table instead of displaying an ID that means nothing:

JavaScript
var rsTerritories = Conn.Execute("Territories");
Grid.SetLookup("TerritoryID",rsTerritories,"TerritoryID","TerritoryDescription");

When a record is being edited it will look similar to this picture:

Editing

Functions

  • CreateGrid(recordset)
  • Grid.Process()
  • Grid.Display()
  • Grid.SetDefault(field,sql)
  • Grid.ProtectFields(fieldlist)
  • Grid.SetLookup(fkfield,recordset,pkfield,displayfield)
  • Grid.SetOption(option,value)

Some of these are explained above, but there are a few I haven't mentioned yet:

Grid.SetOption(option,value)

option can be one of the following: "debug", "pagesize", "pk", "truncate". value varies depending on the option. "debug" requires a boolean, "pagesize" requires a number, "pk" is a comma separated list of fields which is the manually overridden primary key, and "truncate" needs a number to know how many characters that should be displayed of every field in the grid. Some examples:

Grid.SetOption("debug",true);           // default is false
Grid.SetOption("pagesize",20);          // default is 10
Grid.SetOption("pk","field1,field2");   // if the primary key can't be found
Grid.SetOption("truncate",30);          // Don't display more than 30 characters

Grid.SetDefault(field,sql)

field is the name of the field in the recordset, and sql is the sql-statement used to find the default value for new records in this grid.

Grid.SetDefault("UserID","select max(UserID)+1 from TheTable"); // NOT the way to do it,
                                                                // but it shows the usage.
Grid.SetDefault("HireDate","select getdate()");                 // This was better perhaps.
Grid.SetDefault("MinAge","select 18");                          // A constant.

Grid.ProtectFields(fieldlist)

Protects the fields in the fieldlist from editing. Example:

Grid.ProtectFields("UserID,HireDate");  // UserID and HireDate can't be edited.

License

This article has no explicit license attached to it but may contain usage terms in the article text or the download files themselves. If in doubt please contact the author via the discussion board below.

A list of licenses authors might use can be found here


Written By
Web Developer
Norway Norway
This member has not yet provided a Biography. Assume it's interesting and varied, and probably something to do with programming.

Comments and Discussions

 
General[Message Deleted] Pin
Member 143566918-Nov-04 2:05
Member 143566918-Nov-04 2:05 
GeneralNot Saving ..please help Pin
GiliDazzle14-Mar-07 21:16
GiliDazzle14-Mar-07 21:16 
GeneraladUseClient is undefined Pin
HubertDude12-Nov-04 7:09
HubertDude12-Nov-04 7:09 
GeneralRe: adUseClient is undefined Pin
SeaWeedSolutions23-Nov-04 5:45
SeaWeedSolutions23-Nov-04 5:45 
GeneralRe: adUseClient is undefined Pin
GiliDazzle20-Mar-07 23:41
GiliDazzle20-Mar-07 23:41 
Generala big problem Pin
joffre6324-Oct-04 14:40
joffre6324-Oct-04 14:40 
GeneralRe: a big problem Pin
Anonymous27-Oct-04 5:51
Anonymous27-Oct-04 5:51 
GeneralRe: a big problem Pin
joffre6327-Oct-04 11:10
joffre6327-Oct-04 11:10 
GeneralRe: a big problem Pin
SeaWeedSolutions23-Nov-04 5:56
SeaWeedSolutions23-Nov-04 5:56 
GeneralCreating Custom Select Statements Pin
Comrademoe8-Oct-04 9:41
Comrademoe8-Oct-04 9:41 
GeneralCool :) :) :) :) Pin
Vasudevan Deepak Kumar8-Oct-04 5:15
Vasudevan Deepak Kumar8-Oct-04 5:15 
QuestionHow can we display the folder files in two columns? Pin
farooqh4225-Sep-04 0:30
farooqh4225-Sep-04 0:30 
GeneralHere's the code to edit a SQL statement Pin
mickers22-Sep-04 12:55
mickers22-Sep-04 12:55 
Generalcool~~ Pin
hanzen7-Jul-04 0:35
hanzen7-Jul-04 0:35 
Generalso many mistakes ! Pin
wyw_email12-Nov-03 22:02
wyw_email12-Nov-03 22:02 
GeneralRe: so many mistakes ! Pin
Anonymous20-Nov-03 18:35
Anonymous20-Nov-03 18:35 
GeneralThe best ever Pin
edusa2000@aol.com11-Sep-03 15:24
edusa2000@aol.com11-Sep-03 15:24 
GeneralEditable List Box in ASP Pin
Dayalan Prakash7-Aug-03 13:57
Dayalan Prakash7-Aug-03 13:57 
GeneralRe: Editable List Box in ASP Pin
rihdus5-Aug-04 19:33
rihdus5-Aug-04 19:33 
Generaldoubt jscript to vbscript , pls help me Pin
wysste5-Aug-03 17:43
wysste5-Aug-03 17:43 
GeneralIf i use vbscript grid colour all loss Pin
wysste5-Aug-03 16:57
wysste5-Aug-03 16:57 
Generalproblem using the new version with sql Pin
8-Nov-02 17:43
suss8-Nov-02 17:43 
Generalneed help with using netdb Pin
8-Nov-02 17:42
suss8-Nov-02 17:42 
GeneralRe: need help with using netdb Pin
Bjornar Henden8-Nov-02 22:52
Bjornar Henden8-Nov-02 22:52 
QuestionHow to update many records on many pages? Pin
Member 265813615-Oct-02 21:18
Member 265813615-Oct-02 21:18 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.