<%@ Language=VBScript %>
Kashmir Craft Centre :: Contact Information
<%
imgPath=Request("Path")
set conn =Server.CreateObject("ADODB.connection")
con_stg="DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & server.MapPath(".") & "\brandxx.mdb"
' following connection use in case of using of sql instead of mdb
'con_stg="Provider=sqloledb;Data Source=202.71.129.85;Initial Catalog=bfc;User Id=admindata;Password=gulati;"
conn.open con_stg
mSql="select distinct(Head) from brand where article<>'Cancel'"
set rs=conn.Execute(mSql)
if Request("SelectedHead")="" or Request("SelectedHead")=null then
firstHead=rs("head")
mSql1="select * from brand where article<>'Cancel' and Head='" & firsthead &"'"
else
mSql1="select * from brand where article<>'Cancel' and Head='" & Request("SelectedHead") &"'"
end if
set rs1=conn.Execute(mSql1)
if rs.eof then
response.write "Requested data is not not there"
response.end
end if%>
