<% up " " 'on error resume next dim db dim tempflag tempflag = request.querystring("tempflag") if tempflag="" then tempflag = request.form("tempflag") end if if tempflag="false" then connection 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 "
" response.write "Home >> " response.write "Submit Your Products :
" response.write "
" response.write "" response.write "" response.write "" response.write "" response.write "" response.write "" response.write "

" response.write "  Inbox ("&rs13.recordcount&")
" response.write "  View Product Inquiry ("&rs12.recordcount&")
" response.write "  Update Listing
" response.write "  Update Products
" response.write "  Add More Products
" response.write "  Change Password
" response.write "  Logout
" response.write "
" else response.write "
" response.write "Home >> " response.write "Submit Your Company >> Submit Your Products :
" response.write "" response.write "" 'response.write "" 'response.write "You have completed step-1 " response.write "" 'response.write "" 'response.write "You have completed step-2. " response.write "
" response.write "Step - 1" response.write "Step - 2" 'response.write "" response.write "Step - 3" 'response.write "To list your product range on easy2source.com,
kindly enter your product details in the form provided below." response.write "
You have completed step-1To list your product range on easy2source.com,
kindly enter your product details in the form provided below.

" end if connection dim myid myid=request.form("supplier_id") accessdb="temp.mdb" tempDSN="DRIVER={Microsoft Access Driver (*.mdb)};" tempDSN=tempDSN & "DBQ=" & server.mappath(accessdb) set tempdb=server.createobject("adodb.connection") tempdb.open tempDSN set rs=server.createobject("adodb.recordset") set rs1=server.createobject("adodb.recordset") 'response.Write(session("myid")&"--session Id"&rs("company_name")) if tempflag="false" then rs.open "select Company_name from Supplier where supplier_id="&session("myid"), db, 3 response.write "

" response.write ""&rs("company_name")&"
" if session("Company_name")="" then session("Company_Name")=rs("company_name") rs.close else if session("my_id")="" then session("myid")=request.querystring("supplier_id") end if ' rs.open="select Company_name from Supplier where supplier_id="&session("myid"), tempdb, 3 'rs.close ''response.Write(myid) ''response.Write(tempflag&"-tempflag") 'response.End() end if '''''if tempflag="false" then '''' response.write "
" '''' response.write ""&rs("company_name")&"
" '''''if session("Company_name")="" then session("Company_Name")=rs("company_name") ''''end if %> <% if tempflag="false" then rs.open "select cat_id, category from category where cat_id in(select cat_id from cat where supplier_id="&session("myid")&")", db, 3 ' response.Write(tempflag&"---tempflag") 'response.End() else rs.open "select cat_id, category from category where cat_id in(select cat_id from cat where supplier_id="&request.querystring("supplier_id")&")", tempdb, 3 end if response.write "" rs.close rs.open "select * from material", db, 3 response.write "" response.write "" response.write"

Please enter your Products detail :
(Fields marked with * are mandatory)

Product Name: *
Description: *
Key Specification: *
Price:
Delivery:
Category: *
Material: *
" rs.close set rs=nothing db.close set db=nothing response.write "" response.write "
    " response.write "easy2source.com will update your data in the relevant category. You will receive inquires directly from the interested buyers through E-mail. You can also check the total inquiries recieved for your product by entering login name & password in 'View Your Inquiries' on the Home Page.
" response.write "" response.write "" %>
           
<% if tempflag="false" then response.write "
" else response.write "
" end if Bottom_Patch %> <% Sub Bottom_Patch %>
<% End Sub %>