<% @LANGUAGE="VBSCRIPT" %>
<% Option Explicit %>
KARNATAKA POWER CORPORATION LTD-Technical Excellence
<%
Dim oConn
Dim oRs
Dim oRs1
Dim filePath
Dim Mv
Dim PageNo
Dim counterJ
Dim counterI
Dim PhotoStatus
Dim ageFrom1
Dim ageTo1
Dim adOpenStatic
' Map margadharshi database to physical path
filePath = Server.MapPath("kpcl.mdb")
' Create ADO Connection Component to connect with
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & filePath
' Create ADO Recordset Component
Set oRs = Server.CreateObject("ADODB.Recordset")
Set oRs1 = Server.CreateObject("ADODB.Recordset")
' Determine what PageNumber the scrolling currently is on
oRs.Open "SELECT * FROM ASP_TEC " , oConn, adOpenStatic
oRs1.Open "SELECT * FROM ASP_TEC_HEAD " , oConn, adOpenStatic
%>
