<% 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 Quality Control & Design<%=RS("DISTRICT")%>   Sr. No Designation of Inspecting Officer Click link below to view the detail 1 Chief Engineer (QC&D) Inspection Note of Works E-in-C 2 Superentending Engineer (QC & D) Inspection Note of Works S.E (QC &D) Inspection Note of Works S.E (QC &D) 3 Executive Engineer (QC & D) Shimla Inspection Note of Works E.E,Shimla Inspection Note of Works E.E,Shimla 4 Executive Engineer (QC & D) Kangra Inspection Note of Works E.E, Kangra  5 Executive Engineer (QC & D) Mandi Inspection Note of Works E.E, Mandi 6 Executive Engineer (QC & D) Hamirpur Inspection Note of Works E.E, Hamirpur Inspection Note of Works E.E, Hamirpur © Copyright 2009-10 HP.PWD,Shimla-2. All Rights Reserved. (Best viewed in 1024x768 resolution & IE 6.0)