Separate HTML for Basic Foil 38 Sample code for ASP files

Basic HTML version of Foils prepared April 15 1997

Foil 38 Sample code for ASP files - II

From Examples of JDBC -- Microsoft Access CPS616 -- Information Track of CPS -- Spring Semester 97. by Sangeeta Aggarwal,Tom Pulikal,Udayan Pravate(Nancy McCracken) *

&#060SCRIPT LANGUAGE=VBScript&#062

&#060!--

Dim rgszCtrls(24, 2)

Dim cMaxCtrls

cMaxCtrls = 24

Sub AddCtrlToList(szCtrl, szCtrlSrc)

Dim i

for i = 1 to cMaxCtrls

if rgszCtrls(i, 1) = szCtrl Then Exit Sub

if rgszCtrls(i, 1) = "" Then

rgszCtrls(i, 1) = szCtrl

rgszCtrls(i, 2) = szCtrlSrc

Exit Sub

End If

next

End Sub

Sub UpdateRefreshBtn()

nav_btn_MoveCancelUpdate.Caption = "Cancel"

End Sub

--&#062

&#060/SCRIPT&#062

If you have any comments about this server, send e-mail to webmaster@npac.syr.edu.

Page produced by wwwfoil on Thu Aug 14 1997