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) *
1 &#060SCRIPT LANGUAGE=VBScript&#062
2 &#060!--
3 Dim rgszCtrls(24, 2)
4 Dim cMaxCtrls
5 cMaxCtrls = 24
6 Sub AddCtrlToList(szCtrl, szCtrlSrc)
7 Dim i
8 for i = 1 to cMaxCtrls
9 if rgszCtrls(i, 1) = szCtrl Then Exit Sub
10 if rgszCtrls(i, 1) = "" Then
11 rgszCtrls(i, 1) = szCtrl
12 rgszCtrls(i, 2) = szCtrlSrc
13 Exit Sub
14 End If
15 next
16 End Sub
17
18 Sub UpdateRefreshBtn()
19 nav_btn_MoveCancelUpdate.Caption = "Cancel"
20 End Sub
21 --&#062
22 &#060/SCRIPT&#062
23
Table Font Size

© Northeast Parallel Architectures Center, Syracuse University, npac@npac.syr.edu

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