📄 xs.asp

📁 财务预算管理财务支出

💻 ASP

字号:

<!--#include file="../sysconfig.asp"-->
<% Response.Buffer=True %>
<% 
set rsn=server.createobject("adodb.recordset")
sqlnews1="select * from pinmu order by id desc"
rsn.open sqlnews1,conn,1,1
%>
<% if request("del")<>"" then   
	sqlnews1="delete from pinmu where id="&request("del")
conn.Execute sqlnews1
else
'conn.Execute("delete  from pinmu ")
end if 
Response.Redirect(xs.asp)%>

<title>数据导入</title><body>

<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td>goodsitemcode</td>
    <td>goodsitename</td>
    <td>kind</td>
    <td>执行</td>
  </tr>
 <% do while not rsn.eof %> <tr>
    <td><%=rsn("goodsitemcode")%></td>
    <td><%=rsn("goodsitemname")%></td>
    <td><%=rsn("kind")%></td>
    <td><a href="xs.asp?del=<%=rsn("id")%>"><font color="#000046">删除</font></a></td>
 </tr> <%  
				rsn.movenext
		  		
		  		loop                                                                    
          		rsn.close
		  		
		  		set conn=nothing
				%>
</table>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -