xs.asp

来自「财务预算管理 财务支出」· ASP 代码 · 共 39 行

ASP
39 行
字号 
<!--#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>

xs.asp - 源码说明

本页面展示了「财务预算管理 财务支出」中的 xs.asp 源码文件，采用 ASP 编程语言编写，共 39 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与财务相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?