Separate HTML for Basic Foil 79 Sample code for ASP files

Basic HTML version of Foils prepared 7 October 97

Foil 79 Sample code for ASP files - II

From Overview of JDBC and its use with Microsoft Access ARL Database Tutorial -- February 98. by Nancy McCracken(Sangetta Aggarwal, Udayan Parvate, Tom Pulikal)

&#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