Separate Focus HTML for Basic Foil 37 Sample code for ASP files

Basic HTML version of Foils prepared April 15 1997

Foil 37 Sample code for ASP files - I

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

1	&#060HTML&#062
2	&#060TITLE&#062Employees Directory&#060/TITLE&#062
3	&#060BODY&#062
4	&#060h2&#062 &#060center&#062&#060font color=red&#062Form for Employees Directory&#060/font&#062&#060/center&#062&#060/h2&#062
5	&#060%
6	If IsObject(Session("workpg_conn")) Then
7	Set conn = Session("workpg_conn") workpg is ODBC System
8	Else DSN for an Access db
9	Set conn = Server.CreateObject("ADODB.Connection")
10	conn.open "workpg","",""
11	Set Session("workpg_conn") = conn
12	End If
13	%&#062
14	&#060%
15	If cstr(Request.QueryString("ok_ans")) &#060&#062 "" Then
16	rs.Fields("ok_ans").Value = Request.QueryString("ok_ans")
17	End If
18	If cstr(Request.QueryString("OptBody6")) &#060&#062 "" Then
19	rs.Fields("OptBody6").Value = Request.QueryString("OptBody6")
20	End If
21	% &#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