<%
if request("action")="del" then
sql="select * from hw where hw_id="&request("hw_id")
rs.open sql,conn,3,3
if rs.eof then
response.redirect "delhw.asp"
else
dim gl
gl=request("hw_cash1")
if gl<>"" then
rs("hw_cash")=gl
else
rs("hw_cash")=gl
end if
<%
page=request.querystring("page")
if page="" then page=1
if not(isnumeric(page)) then page=1
if page<1 then page=1
page=int(page)
sql="select * from hw order by hw_id DESC"
rs.open sql,conn,3,3
if rs.eof then
response.write "暂且没有货物资料"
response.end
else
rs.pagesize=10
totalrec=rs.recordcount
totalpage=rs.pagecount
if page>totalpage then page=totalpage
rs.absolutepage=page
'rs.absolutepage=page
i=0
dim hw_id(),hw_name(),hw_cash(),hw_pic(),hw_date()
do while not rs.eof and (i<rs.pagesize)
i=i+1
redim preserve hw_id(i),hw_name(i),hw_cash(i),hw_pic(i),hw_date(i)
hw_id(i)=rs("hw_id")
hw_name(i)=rs("hw_name")
hw_cash(i)=rs("hw_cash")
hw_pic(i)=rs("hw_pic")
hw_date(i)=rs("hw_date")
rs.movenext
loop
end if
rs.close
%>
<td width="100%"><input type="text" name="T1" size="20">
</td>
sql="select * from hw where hw_id="&request("hw_id")
这个hw_id是不是你输入的要删除的商品ID呀?
如果是的话 应该用<input type="text" name="T1" size="20">里的name值来获得这个输入框里的值
sql="select * from hw where hw_id="&request("T1")