% Dim cat cat = TRIM(Request.QueryString("idno")) Set Conn = Server.CreateObject("ADODB.Connection") MdbFilePath = Server.MapPath("database/rest_house.mdb") Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath & ";" set RS = Conn.Execute("SELECT * from RH Where DISTRICT = '"&cat&"' ") %>
|
|
|
Inspection
Note of Works
|
Kangra Zone<%=RS("DISTRICT")%>
|
Sr. No | Designation of Inspecting Officer | Click link below to view the detail |
1 | Chief Engineer (Kangra Zone) | Inspection Note of Works C.E, Kangra Zone |
2 | Superintending Engineer (Works) | |
3 | Superintending Engineer (Design) | |
4 | Superintending Engineer (5th Circle Palampur) | Inspection Note of Works S.E, 5th Circle Palampur |
5 | Superintending Engineer (7th Circle Dalhousie) | Inspection Note of Works S.E, 7th Circle Dalhousie |
6 | Superintending Engineer (9th Circle Nurpur) | Inspection Note of Works S.E, 9th Circle Nurpur |
© Copyright 2009-10 HP.PWD,Shimla-2. All Rights Reserved. (Best viewed in 1024x768 resolution & IE 6.0) |