|
|
| My handicrafts is a section entirely dedicated
to give our valued members complete freedom to customise and
manage all subscriber related operations on 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. |
|
|
|
Deleted Product |
|
|
|
<%
if delprod_id <> "" then
qdelprod = "delete from supplier_product where prod_id ="&delprod_id
set rsdel = server.createObject("adodb.recordset")
rsdel.open qdelprod,db,3
qdelinq = "delete inquiry_mst where prod_id="&delprod_id
set rsinq = server.createObject("adodb.recordset")
rsinq.open qdelinq,db, 3,2
qdelresp = "delete inquiry_response where prod_id="&delprod_id
set rsresp = server.createObject("adodb.recordset")
rsresp.open qdelresp,db,3,2
end if
if restprod_id <> "" then
qrest = "update supplier_product set Product_Delete = 0 where prod_id="&restprod_id
set rsrest = server.createObject("adodb.recordset")
rsrest.open qrest,db,3,2
end if
qprod="Select * from supplier_product where supplier_id="&rslog("Supplier_id")&" and product_delete = 1 order by date_added desc "
set rsprod = server.CreateObject("adodb.Recordset")
rsprod.open qprod,db,3,2
count = 1
if not rsprod.eof then
%>
| No. |
Name |
Category |
Status |
Action |
<% do while not rsprod.eof
qcat = "Select Category from category_mst where cat_id="&rsprod("cat_id")&""
set rscat = server.CreateObject("adodb.Recordset")
rscat.open qcat,db,3,2
%>
| <%=count%> |
<%=rsprod("Product_Name")%> |
<%=rscat("Category")%> |
<%
if rsprod("Activate") = false or rsprod("Suspend") = true then
Response.write "Not Activate"
else
Response.write "Activate"
end if
%>
|
Restore
| Delete
|
<%
count = count + 1
rsprod.movenext
loop
else
%>
| There is no deleted
product at present in your list. |
<%end if%>
|
|
|