Example for VBSdb: vbscript for database

Home

Demo

Documentation

Examples

Download

Help

This example shows the use of the EditFields property.

Add a new record

Field New record

LastName

FirstName

Birthdate

Cancel

This is the code implementing the example:

<%
   VbsDbNew objVbsDb
   objVbsDb( "MdbPath" ) = "data/nwind.mdb"
   objVbsDb( "Sql" ) = "select EmployeeId,LastName,FirstName,Title,BirthDate from Employees"
   objVbsDb( "GridFields" ) = "LastName;FirstName;BirthDate"
   objVbsDb( "ViewNavigationButtons" ) = "first;next;prev;last;search;add;update;delete"
   objVbsDb( "EditTableName" ) = "Employees"
   objVbsDb( "EditKeyFields" ) = "EmployeeId"
   objVbsDb( "EditFields" ) = "LastName;FirstName;Birthdate"
   objVbsDb( "EditAddFieldDefaults" ) = "LastName|John;FirstName|Smith"
   objVbsDb( "GlobalStartScreen" ) = "Add"
%>

This demonstrative program connects to Nwind.mdb, the well known Microsoft Access sample database: the names of companies, products, people, characters, and/or data mentioned herein are fictious and are in no way intended to represent any real individual, company, product, or event. To download a copy of Nwind.mdb, please visit Microsoft's site.