📄 sql1.asp
字号:
<% @ language="vbscript"%>
<%
dim string1,ambiguous,thekey,thecode,sqlst1
string1=request.form("text1")
ambiguous=request.form("check1")
thekey=request.form("radio1")
thecode=request.form("radio2")
sqlst1="SELECT * FROM book "
if thekey<>"browse" then
select case thekey
case "bno"
sqlst1=sqlst1 & " WHERE 书号 "
case "bname"
sqlst1=sqlst1 & " WHERE 书名 "
case "author"
sqlst1=sqlst1 & " WHERE 作者 "
case "prise"
sqlst1=sqlst1 & " WHERE 定价 "
end select
if ambiguous="on" then
sqlst1=sqlst1 & " LIKE '%" & string1 & "%'"
else
sqlst1=sqlst1 & thecode & "'" & string1 & "'"
end if
end if
session("sqlstring1")=sqlst1
Response.redirect("browse.asp")
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -