📄 deldis.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 bgcolor="">
<Center>
<br><br><br>
<FONT face=Georgia color=#cc0033 size=2><b>Welcome Administrator</b></font><br>&nbsp;<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1">
  <tr>
    <td width="40%">&nbsp;</td>
    <td width="41%">

<Font face="Tahoma" size="2">Available Products</font>
<%
if session("admin") = "" then
	response.redirect "administrator.asp"
end if

count = 1
Set oRs = Server.CreateObject("ADODB.RecordSet")
SQL = "select productid, Name from products "
Set oRs = objcon.execute(SQL)

if not oRs.EOF then
	'response.write "<center><table Border=2 align=center bordercolor=#0000cc bgcolor=gaaee0 width=500><tr><th><Font face=Tahoma size=2>Product#</th><th><Font face=Tahoma size=2>Product Name</th><th><Font face=Tahoma size=2>Disable?</th><th><Font face=Tahoma size=2>Delete?</th></tr></Font>"
%> </td>
    <td width="19%">
<b>::</b> <a href="admin_options.asp" target=detail>Back to Option</a>
    </td>
  </tr>
</table>
<p><br>

&nbsp;</p>
	<table border="1" width="654" height="90">
        <tr>
      <td width="130" bgcolor="#0066CC" height="34"><b>
      <font face="Verdana" size="2" color="#FFFF99">Product#</font></b></td>
      <td width="252" bgcolor="#0066CC" height="34">
      <p align="center"><b>
      <font face="Verdana" size="2" color="#FFFF99">Product Name</font></b></td>
      <td width="249" bgcolor="#0066CC" height="34">
      <p align="center"><b>
      <font face="Verdana" size="2" color="#FFFF99">Disable?</font></b></td>
          <td width="249" bgcolor="#0066CC" height="34">
      <p align="center"><b>
      <font face="Verdana" size="2" color="#FFFF99">Delete?</font></b></td>
          </tr>
<%


end if
while not oRs.EOF
	response.write "<tr>"&_
						"<td>"& count &"</td>"&_
						"<td>"&_
							"<a href=pdetail.asp?productid=" & oRs.Fields("productid") & "> <Font face=Tahoma size=2>" & oRs.Fields("Name") & "</Font></a>"&_
						"</td>"&_
						"<td>"&_
							"<a href=disableproduct.asp?productid=" & oRs.Fields("productid") &"><Font face=Tahoma size=2>Disable</a>"&_
						"</td>"&_
						"<td>"&_
							"<a href=deleteproduct.asp?productid="&oRs.Fields("productid")&"><Font face=Tahoma size=2>Delete</a>"&_
						"</td>"&_
					"</tr>"

count = count + 1
oRs.MoveNext
wend
response.write "</center></table>"
'response.write "<br><Font face=Tahoma size=1><a href=admin_options.asp>Go to options page</a></Font>"

oRs.close

Set oRs = nothing

%>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -