del_new.asp
上传用户:llrg7406
上传日期:2007-03-02
资源大小:654k
文件大小:1k
源码类别:

教育系统应用

开发平台:

Delphi

  1. <%@ Language=VBScript %>
  2. <!--#include file ="identify.asp"-->
  3. <% Response.Expires = 0 %>
  4. <%
  5. bookid = Request.QueryString("bookid")
  6. set conn = server.CreateObject("adodb.connection")
  7. conn.Open application("dsn")
  8. sql = "delete from newbook where bookid = " & bookid
  9. conn.Execute sql
  10. conn.Close
  11. set conn = nothing
  12. %>
  13. <html>
  14. <head>
  15. <meta NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
  16. <META HTTP-EQUIV="Refresh" CONTENT="0;URL=xmain.asp">
  17. <link rel="stylesheet" type="text/css" href="xcss.css">
  18. </head>
  19. <body>
  20. </body>
  21. </html>