Separate HTML for Basic Foil 78 Sample code for ASP files

Basic HTML version of Foils prepared 7 October 97

Foil 78 Sample code for ASP files - I

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

&#060HTML&#062

&#060TITLE&#062Employees Directory&#060/TITLE&#062

&#060BODY&#062

&#060h2&#062 &#060center&#062&#060font color=red&#062Form for Employees Directory&#060/font&#062&#060/center&#062&#060/h2&#062

&#060%

If IsObject(Session("workpg_conn")) Then

Set conn = Session("workpg_conn") workpg is ODBC System

Else DSN for an Access db

Set conn = Server.CreateObject("ADODB.Connection")

conn.open "workpg","",""

Set Session("workpg_conn") = conn

End If

%&#062

&#060%

If cstr(Request.QueryString("ok_ans")) &#060&#062 "" Then

rs.Fields("ok_ans").Value = Request.QueryString("ok_ans")

End If

If cstr(Request.QueryString("OptBody6")) &#060&#062 "" Then

rs.Fields("OptBody6").Value = Request.QueryString("OptBody6")

End If

% &#062