📄 updata.asp
字号:
<% @ language="vbscript"%>
<%
dim act
dim db3
dim st3
dim i,ii
dim mysqlstr
act=request.form("ok")
if act="" then
response.redirect("default.asp")
elseif act="确 定" then
set db3=server.createobject("adodb.connection")
db3.open "PROVIDER=MICROSOFT.JET.OLEDB.4.0; DATA SOURCE= " & server.mappath("\bookstore\book.mdb")
st3=session("sqlstring2")
ii=request.form("sno").count()
for i=1 to ii
mysqlstr="update book set 书号='" & request.form("sno")(i) & "',书名='" & request.form("sname")(i) & "',作者='" & request.form("author")(i) & "',定价=" & request.form("price")(i) & " where 书号='" & request.form("hsno")(i) & "'"
response.write mysqlstr & "<br>"
db3.execute mysqlstr
next
db3.close
response.redirect("browse.asp")
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -