不过,我不建议这样写。
sql2 = "SELECT * FROM users"
set rs = connect.Execute(sql2)
这样就可以了,并且速度也很快。
Set cmd = Server.CreateObject("ADODB.Command")
这种方法也是读取记录的,不过这个适合调用存储过程,用于sql数据库。
分析你的问题:要搜索在数据库中查找指定
学号
,此时可能是模糊查询,也可能是完全匹配。根据你的需求,要把查到的结果集中此人的姓名赋值给abc,说明这是一个完全匹配的查找,否则就会出现多条记录,就不能单独赋值给变量abc了。
首先,查数据库:
dim
username,abc
'定义两个变量
username=trim(request.Form("username"))
'先把表单项username的值取出来并进行trim处理,同时赋值给username变量
rs.open
"select
top
1
*
from
voteuser
where
username='"&username&"'",conn,1,1
'这里执行一条
sql语句
进行查找,为了防止重复记录,这里用了top
1限制只取1条记录
if
rs.recordcount>0
then
'这里判断是否查找到结果,即rs.rdcordcount的值是否大于0
abc=rs("truename")
'条件成立,把truename字段的赋值给变量abc
end
if
response.write
abc
'输出变量abc的值
这个还不容易啊. 你在数据库里面应该有信息的id 和 信息的 标题title吧.首先调用数据库, 就是我们说的标题列表.
如果是用表格布局的话 列表的代码应该是这样写的
<%
set rs = server.CreateObject("ADODB.Recordset")
sql = "select * from 表名 where 条件"
rs.open sql,conn,1,1
do while not rs.eof
%>
<tr>
<td width="10"></td>
<td height="21">·<%=left(rs("title"),10)%>
<td>
<td width="10"></td>
</tr>
<%
rs.movenext
loop
rs.close
set rs = nothing
%>
</table>
这样文章的标题列表就显示出来了
再加个连接到显示文章的内容页
就是在
<%=left(rs("title"),10)%>上加链接<a href = "内容页显示页面?id = <%=rs("id")%>"> <%=left(rs("title"),10)%></a>
最后就是内容显示页
要显示内容的话就是先读取传过来的id参数
<%
set rs = server.CreateObject("ADODB.Recordset")
sql = "select * from 表名 where id = '"&request("id")&"'"
rs.open sql,conn,1,1
%>
<tr>
<td width="10"></td>
<td height="21"><%=rs("title")%>
<td>
<td width="10"><%=rs("content")%></td>
</tr>
<%
rs.close
set rs = nothing
%>
</table>
这样就显示出来了
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)