📄 delproduct.asp

📁 online sales system of texttile mill was a project within which there was great opportunity for Lear

💻 ASP

字号:

<!-- #include file="conn.asp" -->
<html>
<head>
</head>
<body>
<h2 align="center">Available Products!!</h2>
<%
count = 1
Set oRs = Server.CreateObject("ADODB.RecordSet")
SQL = "select * from products"
Set oRs = con.execute(SQL)

while not oRs.EOF
	response.write "<center><b>Product#"&count&"</b></center><table align=center border=1>"&_
					"<tr><td>Product Name</td><td>"&oRs.Fields("product")&"</td></tr>"&_
					"<tr><td>Composition</td><td>"&oRs.Fields("comp")&"</td></tr>"&_
					"<tr><td>Main Pharam Col. Group</td><td>"&oRs.Fields("mainphg")&"</td></tr>"&_
					"<tr><td>Advantages</td><td>"&oRs.Fields("adv")&"</td></tr>"&_
					"<tr><td>Pack Size</td><td>"&oRs.Fields("ps")&"</td></tr>"&_
					"<tr><td>Cost</td><td>"&oRs.Fields("cost")&"</td></tr></table>"

	response.write "<center><a href=disproduct.asp?product_id="&oRs.Fields("product_id")&">Disable this product</a>&nbsp;&nbsp;&nbsp;&nbsp;"&_
					"<a href=delproduct.asp?product_id="&oRs.Fields("product_id")&">Delete this product</a></center><br><br>"

count = count + 1
oRs.MoveNext
wend
oRs.close
con.close
Set oRs = nothing
Set con = nothing
%>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -