return.asp

来自「ASP+SQL Server的图书馆管理系统」· ASP 代码 · 共 13 行

<%@ LANGUAGE="VBSCRIPT" %>
<!--#include file="conndb.asp"-->
<%
   dim SQL, Rs, contentID,CurrentPage
   CurrentPage = request("Page")
   contentID=request("ID")
   return_time=now()
   set rs=server.createobject("adodb.recordset")
   sqltext="update book_record set rec_flag=1 , rec_returntime='"&return_time &"'where rec_id="& contentID
   rs.open sqltext,conn,3,3
   set rs=nothing
   response.redirect "info_check.asp?rec_id="&contentID
%>