deleteentry.asp

ASP+SQL Server动态网站开发从基础到实践教程

<!--#include file="connection.asp"-->

<%
if session("Ruserid") = "" then
	Response.Redirect "R_login.htm"
end if

dim xe_id
xe_id = request("e_id")

conn.open = connstring
set rs = Server.CreateObject("adodb.recordset")
rs.open "delete * from Expenses where e_id = " & clng(xe_id),conn

Response.Redirect "reportsresult.asp?Fdate=" & request("fdate") & "&Tdate=" & request("tdate") & "&flag=" & request("flag")& "&title_id=" & request("title_id") & "&userid=" & request("userid")
%>