bjdo.asp

来自「asp写的一个简单的图书管理系统. 出于无奈.这种简单的项目也传上来.这个是我」· ASP 代码 · 共 31 行

<%=request.Form("bkid")%>
<%=request.Form("bkname")%>
<%=request.Form("bkaccount")%>
<%
	BookID = request.Form("bkid")
%>

<%  
    set conn=server.CreateObject("ADODB.connection")
    conn.open "provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("book.mdb")
    strsql="select * from book where bookID="&Trim(BookID)
    set rs=server.createobject("ADODB.Recordset")
    rs.open strsql, conn, 3, 2
	
	if (rs.movenext()) then
		rs("bookid")=request.Form("bkid")
		rs("bookname")=request.Form("bkname")
		rs("account")=request.Form("bkaccount")
		rs.update
	end if
	

%>
<%=rs("bookid")%>
<%=rs("bookname")%>
<%=rs("account")%>