当前位置:首页 » 操作系统 » asp从数据库中读取数据

asp从数据库中读取数据

发布时间: 2022-04-19 22:44:50

A. ASP读取数据库内容

这个还不容易啊. 你在数据库里面应该有信息的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> 这样就显示出来了 追问: 列表页的代码:<!--#include file="conn.asp"--> <% exec="select * from PS" set rs=server.createobject("adodb.recordset") rs.open exec,conn,1,1 %> <div><%do while not rs.eof%> <a href = "show.asp?id = <%=rs("id")%>"><%=rs("psname")%></a> <% rs.movenext loop %> </div> 这是显示内容页的代码: <!--#include file = "conn.asp" --> <% set rs=server.createobject("adodb.recordset") exec="select * from ps where id = '"&request("id")&"'" rs.open exec,conn,1,1 %> <table><tr><td><%=rs("pstitle")%></td></tr></table> 总是提示: Microsoft OLE DB Provider for ODBC Drivers (0x80040E21) ODBC 驱动程序不支持所需的属性。 /myweb2/show.asp, 第 5 行 .... 麻烦你了. 回答: exec="select * from PS" set rs=server.createobject("adodb.recordset") 把两行位置换下看 追问: 已经换过了.是一样的.不知道是怎么回事 回答: exec="select * from ps where id = '"&request("id")&"'" 改成 exec="select * from ps where id = "&request("id")&"" 追问: 也不行.还是同样的错误.方便加QQ吗 我的278455170

求采纳

B. 关于ASP从数据库读取数据的问题 请进~~~~

set rs=Server.CreateObject("Adodb.Recordset")
创建一个记录集对象rs(ADO数据库组件中的Recordset对象),用它来获存储从数据库中读取出来的记录,相当于临时的数据容器。
sql="select top 30 * from ald_web where SMT_key=1 and SMT_key1=1 and SMT_key3=1 order by SMT_id desc"
定义一个字符串,这个字符串其实是一个SQL查询字串
打开rs记录集,其实就是向数据发出一个查询,要执行查询的数据库是conn,查询方法在sql这个字符串中定义,1,1是打开数据库时的两个参数,具体意思现在可以不用管,如果是读取就用1,1 ,要是执行rs的update方法,就用1,3,记住就行了,以后再深究。

C. ASP从数据库中读取信息

Set cmd.ActiveConnection = connect connect这个是连接数据库的一个对象,通过这个打开数据库,然后读取记录。
不过,我不建议这样写。
sql2 = "SELECT * FROM users"
set rs = connect.Execute(sql2)
这样就可以了,并且速度也很快。
Set cmd = Server.CreateObject("ADODB.Command")
这种方法也是读取记录的,不过这个适合调用存储过程,用于sql数据库。

D. 用ASP如何实现从数据库中读取数据并导出EXCEL

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<%
on error resume next
Response.Buffer = True
Response.ContentType = "application/vnd.ms-excel"
Response.AddHeader "content-disposition", "inline; filename = 楼盘团购报名表"&cstr(date())&".xls"

dim rs,sql, sCount
sql = "SELECT * FROM [LouPan_Buy] ORDER BY ItemName ASC, ID DESC"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
sCount = rs.recordcount
%>

E. ASP从数据库中读取数据

select * from tablename where id in (select top 20 id from (select top 100020 id from tablename order by id asc) temptablename order by id desc) order by id desc
这个语句就是取100001 ~ 100020 之间的20条记录。速度当然就是快,记住id是主键,弄清临时表中的id排序。

F. asp中如何从数据库中的一个表中读取数据并存入另一个表

代码是连在一起的么?建议你把变量定义成全局的,不要放在while循环里面,如下:
string
bookid
=
“”;
while(res.next()){
bookid=res.getstring(1);

而且connection
第一次已经取了,也可以这样定义了之后直接在下面进行使用,没必要再写一遍

G. asp中如何读取sqlserver数据库中的数据

<%
SETConn=Server.CreateObject("ADODB.Connection")
Dimi,j,Sql
Setrt=Server.CreateObject("ADODB.Recordset")
'Conn.Open"Server=IP地址;Provider=sqloledb;Database=库名称;UID=用户名;PWD=密码;"
Conn.Open"Server=192.168.1.1;Provider=sqloledb;Database=mysql;UID=sa;PWD=mysql;"
%>
<tablebordercolor="#808000"border="1"cellspacing="0"bgcolor="#EEEEEE">
<%'读SqlServer库中的表名:
Setrs=Conn.OpenSchema(20)
Whilenotrs.EOF
ifrs(3)="TABLE"then
'response.write(rs(2)&"<br>")'表的类型
'Response.Write("所在数据库名:"&rs(0))
'Response.Write("所有者:"&rs(1))
'Response.Write("表名:"&rs(2)&"<br>")
%>
<tr>
<td><%=rs(2)%></td>
<%
'这样,知道表名了,现在再来看看怎么对表的字段进行操作。假设:其中数据库中有表:[admin]获取该表的所有字段名:
x="[admin]"
rt.open"select*from"&rs(2)&"where1<>1",conn,1,3
j=rt.Fields.count
Fori=0to(j-1)

'Response.Write("第"&i+1&"个字段名:"&rt.Fields(i).Name&"<br><br>")
response.write("<td>"&rt(i).name)
Next
rt.close

endif
rs.MoveNext
Wend
%>

</table>

H. asp怎样读取数据库的几条数据

<%
Set Conn = server.CreateObject("ADODB.Connection")
ConnString = "provider=microsoft.jet.oledb.4.0;data source="
Conn.open ConnString & Server.MapPath("DataBase/Newsdskjfhs.mdb")
%>

<%
Set rs1 = Server.CreateObject("ADODB.Recordset")
rs1.open "select * from tType",conn,1,1
for i = 0 to rs1.RecordCount - 1
%>
<table width="100%" border="0" cellspacing="1">
<tr>
<td height="25" bgcolor="#00CCFF" class="f1"><%=rs1("TypeName")%><a href="More.asp?type=<%=rs1("typeid")%>" class="A">更多……</a></td>
</tr>
<tr>
<td height="117" valign="top">
<%
Set rs2 = Server.CreateObject("ADODB.Recordset")
Sql = "select top 8 * from tNews where NewsTypeID=" & rs1("TypeID") & " order by NewsDate desc"
rs2.open Sql,Conn,1,1
if rs2.eof and rs2.bof then
Response.Write("该版块暂无新闻")
else
do while not rs2.eof
%> <a href="Show.asp?NewsID=<%=rs2("Newsid")%>" class="B"><%=rs2("Newstitle")%></a><span class="f2">[<%=rs2("Newsdate")%>]</span><br>
<%rs2.movenext
Loop
end if
%>
</td>
</tr>
</table>
<% rs1.movenext
next
%>
<%
Set conn = nothing
Set rs1 = nothing
Set rs2 = nothing
%>
你要是告诉我你的EMAIL ,我给你发到邮箱源码(在学校做的,呵呵)

I. asp.net怎么读取数据库中的数据。

标准做法是用DataAdapter填充一个DataTable

OleDbCommand b = new OleDbCommand();
b.Connection = a;
b.CommandText = "select [number] from gamelist where (game='"+cb1.Text+"')";

OleDbDataAdapter adpt = new OleDbDataAdapter (b);
DataTable dt = new DataTable();
adpt.Fill(dt);

int c=Convert.ToInt32(dt.Tables[0].Rows[0]["number"]);

热点内容
sqlserver运行存储过程 发布:2024-09-30 21:05:32 浏览:207
见主机诺亚入口密码多少 发布:2024-09-30 20:56:18 浏览:257
配置都够了为什么玩lol还卡 发布:2024-09-30 20:51:10 浏览:313
haskell函数式编程 发布:2024-09-30 20:50:35 浏览:597
sql月的最后一天 发布:2024-09-30 20:41:50 浏览:730
python列表生成器if 发布:2024-09-30 20:41:46 浏览:494
小米手机部落冲突账号密码是什么 发布:2024-09-30 20:40:07 浏览:67
linux运维自动化脚本 发布:2024-09-30 20:36:59 浏览:597
变声器最低配什么配置 发布:2024-09-30 20:29:48 浏览:414
devc编译程序被传染病毒 发布:2024-09-30 20:29:47 浏览:292