<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../../login/check_power.asp"-->
<%
table_name="cardtype"
if check_power("參數設置")=0 then
  response.redirect("/login/check_false.asp")
else%><%
set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = "dsn=hotel;"
Recordset1.Source = "SELECT *  FROM db_"&table_name&" where id="&request.querystring("id")
Recordset1.CursorType = 3
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open
Recordset1_numRows = 0
%> <%
Recordset1("deltag").value=1
Recordset1.update
Recordset1.close
response.redirect(table_name&"_show.asp")
%>
<%end if%>