This demo shows how easy and effective is to use VBSdb to produce a web page that browses database data. In this sample, just 11 ASP instructions are used. Note that text buttons are used for navigation.

  Project Category
1 Cimiero Fittings
2 Double Cimiero Fittings
3 Cimiero Ofc Fittings
4 Cimiero Vasca Fittings
5 Defimitly Tool Tools
Project Cimiero
Category Fittings
Designer Maurizio Bruni
Image
 First   Prev   Next   Last   Search   Add   Update   Delete 
This is the code implementing the demo:
<!--#include file="VBSdb/inc.asp"-->
<%
   VbsDbNew objVbsDb

   objVbsDb( "MdbPath" ) = "../examples/data/demo.mdb"

   objVbsDb( "Sql" ) = "select * from designers inner join (projects inner join categories on projects.prCaId=categories.caId) " & _
                                   "on designers.deId=projects.prDeId"

   objVbsDb( "GlobalFieldHeaders" ) = "prName|Project;prDeId|Designer;deLastName|Designer;" &_
                                                             "prCaId|Category;caName|Category;prImagePath|Image;prId|Id"

   objVbsDb( "GridFields" ) = "prName;caName"

   objVbsDb( "FormFields" ) = "prName;caName;deLastName;prImagePath"

   objVbsDb( "ViewNavigationButtons" ) = "first;next;prev;last;removeFilter;search;add;update;delete"

   objVbsDb( "ViewFieldFormats" ) = "prImagePath|<img height=120 width=180 src='{{prImagePath}}' border=0>;" &_
                                                           "deLastName|<a href='mailto:{{deEMail}}'>{{deFirstName}} {{deLastName}}</a>"

   objVbsDb( "SearchFields" ) = "prName;prDeId;prCaId"

   objVbsDb( "InputSelectFields" ) = "prDeId|select deId,deLastName from designers;prCaId|select caId,caName from categories"

   objVbsDb( "EditTableName" ) = "projects"

   objVbsDb( "EditKeyFields" ) = "prId"

   VbsDb objVbsDb
%>