asp sql server 2000查询显示的问题

来源：百度知道 编辑：UC知道 时间：2024/06/19 04:32:22
我要通过 页面上 文本框 name1 name2 name3 作为查询条件
要从表A中把符合查询条件的数据显示到页面 name4文本框中

数据库连接为：
session("liyan")=request.form("textfield")
Set OBJConn = Server.CreateObject ("ADODB.Connection")
OBJConn.Open "Driver={SQL Server};Database=liyan; Server=10.128.16.16;UID=sa;PWD=8818931226"

请帮忙写出查询语句 并详细注明解释
表datatable结构
city disastertype grade preplan

通过主页上去文本框中select，select1，select2的信息在表datatable中对应查找
city对应select
disastertype对应select1
grade对应select2
三个全部符合条件的 把对应的preplan的内容显示到 主页文本框为textfield中

语言环境 ASP+SQL Server 2000
请给出详细代码并加以注解
运行成功在加分
数据库连接和上面一样

代码如下:

<%
Dim strSql
Dim objRs
dim lRecCt
Dim lLp
Dim strOp1,strOp2,strOp3
session("liyan")=request.form("textfield")
Set OBJConn = Server.CreateObject("ADODB.Connection")
OBJConn.Open "Driver={SQL Server};Database=liyan;Server=10.128.16.16;UID=sa;PWD=8818931226"
set objRs = Server.CreateObject("ADODB.Recordset")
objRs.Open "SELECT * FROM datatable"

lRecCt = objRs.RecordCount
if lRecCt<=0 then
objRs.close
OBJConn.close
set objRs = nothing
set OBJConn=nothing
end if '以上为打开数据库部分就不再注解了
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>New Page 1</title>
<Script language=javascript>
<%
if lRecCt>0 then
response.write "var lNul=" & CStr(lRecCt) & ";"