| |
|
My Handicrafts is a section entirely dedicated to give our valued members complete freedom to customise and manage all subscriber related operations on handicrafts.easy2source.com.
You can post buy/sell offers, update your company profile, add product keywords, keep track of all
your inquiries, receive trade alerts and much more. |
|
|
| Inquiry
Basket |
|
|
|
Post |
Inquiry |
| Supplier : |
- |
<%
qsupp = "Select count(Inquiry_Id) as cprod from inquiry_mst where Supplier_Id="&suid&" and inquiry_deleted = 0 and prod_id is NULL"
set rssupp = server.Createobject("adodb.Recordset")
rssupp.open qsupp,db,3,2
if rssupp("cprod") > "0" then
%>
<%=rssupp("cprod")%>
<% else
Response.write "0"
end if%>
|
|
Product : |
<%
qprod = "Select count(prod_id) as cprod from product where supplier_id="&rslog("Supplier_id")&" and suspend=0 and Activate = 1"
set rsprod = server.Createobject("adodb.Recordset")
rsprod.open qprod,db,3,2
if rsprod("cprod") > "0" then %>
<%=rsprod("cprod") %>
<% else
Response.write "0"
end if %>
|
<%
qprod = "Select count(Inquiry_Id) as cprod from inquiry_mst where Supplier_Id="&suid&" and inquiry_deleted = 0 and prod_id is not null "
set rsprod = server.Createobject("adodb.Recordset")
rsprod.open qprod,db,3,2
if rsprod("cprod") > "0" then %>
<%=rsprod("cprod")%>
<%else
Response.write "0"
end if %>
|
| Buy
Lead : |
<%
qbuy = "Select count(lead_id) as cbuy from trade_lead where supplier_id="&rslog("Supplier_id")&" and Post_Type = 'buy' and getdate() < Expiry_Date and valid = 0"
set rsbuy = server.Createobject("adodb.Recordset")
rsbuy.open qbuy,db,3,2
if rsbuy("cbuy") > "0" then %>
<%=rsbuy("cbuy")%>
<% else
Response.write "0"
end if %>
|
<%
qbuy = "Select count(Inquiry_Id) as cbuy from trade_lead_inquiry where Supplier_Id = "&suid&" and lead_id in (Select lead_id from trade_Lead where Post_Type = 'buy' and getdate() < Expiry_Date) and Inquiry_Deleted = 0 "
set rsbuy = server.Createobject("adodb.Recordset")
rsbuy.open qbuy,db,3,2
if rsbuy("cbuy") > "0" then %>
<%= rsbuy("cbuy")%>
<% else
Response.write "0"
end if %>
|
| Sell
Lead : |
<%
qbuy = "Select count(lead_id) as cbuy from trade_lead where supplier_id="&rslog("Supplier_id")&" and Post_Type = 'sell' and getdate() < Expiry_Date and valid = 0 "
set rsbuy = server.Createobject("adodb.Recordset")
rsbuy.open qbuy,db,3,2
if rsbuy("cbuy") > "0" then %>
<%=rsbuy("cbuy") %>
<%else
Response.write "0"
end if %>
|
<%
qsell = "Select count(Inquiry_Id) as csell from trade_lead_inquiry where Supplier_Id = "&suid&" and lead_id in (Select lead_id from trade_Lead where Post_Type = 'sell' and getdate() < Expiry_Date) and Inquiry_Deleted = 0 "
set rssell = server.Createobject("adodb.Recordset")
rssell.open qsell,db,3,2
if rssell("csell") > "0" then %>
<%=rssell("csell")%>
<%else
Response.write "0"
end if %>
|
| Biz
Lead : |
<%
qbuy = "Select count(lead_id) as cbuy from trade_lead where supplier_id="&rslog("Supplier_id")&" and Post_Type = 'biz' and getdate() < Expiry_Date and valid = 0 "
set rsbuy = server.Createobject("adodb.Recordset")
rsbuy.open qbuy,db,3,2
if rsbuy("cbuy") > "0" then %>
<%=rsbuy("cbuy") %>
<%else
Response.write "0"
end if %>
|
<%
qbiz = "Select count(inquiry_Id) as cbiz from trade_lead_Inquiry where Supplier_Id = "&suid&" and lead_id in (Select lead_id from trade_Lead where Post_Type = 'Biz' and getdate() < Expiry_Date) and Inquiry_Deleted = 0 "
set rsbiz = server.Createobject("adodb.Recordset")
rsbiz.open qbiz,db,3,2
if rsbiz("cbiz") > "0" then %>
<%=rsbiz("cbiz")%>
<% else
Response.write "0"
end if %>
|
|
|
|