<%
up "Supplier"
dim db
connection
set rs1=server.createobject("adodb.recordset")
set rs2=server.createobject("adodb.recordset")
set rs3=server.createobject("adodb.recordset")
set rs4=server.createobject("adodb.recordset")
rs1.open "select * from supplier where supplier_id="&session("myid"),db,3
rs2.open "select * from login where supplier_id="&session("myid"),db,3
rs3.open "select * from profile where supplier_id="&session("myid"),db,3
rs4.open "select * from Products where supplier_id="&session("myid"),db,3
set rs13=server.createobject("adodb.recordset")
s2="select * from directory_inquiry where Supplier_id="&session("myid")&" "
rs13.open s2 , db, 3
set rs12=server.createobject("adodb.recordset")
s2="select * from product_inquiry where Supplier_id="&session("myid")&" "
rs12.open s2 , db, 3
response.write "