<%@ Language=VBScript %> <% Option Explicit %> <% Dim oConn, oRs1, sSql 'DB Connection Variables %> <% Set oConn = Server.CreateObject("ADODB.Connection") %> <% oConn.Open Application("CONNSTR") 'Init DB Connection %> <% '------------ Init Page Variables ------------ %> <% Dim sType, sCaller, view, EmploymentID %> <% %> <% '------------ =================== ------------ %> ARC Admin
<%sCaller=Request.QueryString("c")%> <%view=Request.QueryString("view")%>
  ARC Administration
  ARC Home
Products  |  Downloads  |  Newsletter  |  Employment  |  What's New  |  Industry Links  |  Subsciber List
Add Employment Opportunity  |  Edit/Delete Employment Opportunity

ARC Pressure Data Headquarters

Welcome to the Administration area.

Edit Employment Opprotunity <%EmploymentID=Request.QueryString("p")%> <% sSQL = "Select * from employment where employmentid='" & EmploymentID & "'" set oRs1 = Server.CreateObject("ADODB.Recordset") oRs1.Open sSQL, oConn, 3, 3 %> ">
Job Title:  " size="30" maxlength="50">
Location:  " size="30" maxlength="50">
Job Description: 
Required Skills/Education: 
ARC Pressure Data Administration
Copyright © 2002 ARC Pressure Data, Inc.