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

asp读取数据库字段

发布时间: 2022-11-21 02:56:14

1. ASP 如何读取ACCESS数据库的字段类型!!

ASP先创建一个adodb.Rrcorddest对象,比如set rs=server.createobject("adodb.Rrcorddest")
sql="sql语句"
然后rs.open sql
再用一个循环命令
if not rs.eof then
rs.movefirst
do while not rs.eof
for i=0 to rs.fields.count
response.write (rs.fields(i).type)//这个就是写出字段的类型了
next
rs.movenext
loop
end if
是这样的 type确实字段类型
不过他是以数字来说明的
比如在SQL里 200代表varchar
129代表char
11代表Bit(1或0的整数数据)
所以你想显示你那样的结果就先得了解TYPE显示的直代表什么类型
然后用if语句
if(rs.fields(i).type=200) then
response.write("varchar")
end if

2. ASP中如何从数据库中读取某字段包含某字符的所有记录

比我现在有个数据库,字段列名为class,如果你要查询属于1那个字段的话,

select*fromaaawhereclass=1orderbyaddtimedesc

如果你要查询属于2那个字段的话

select*fromaaawhereclass=2orderbyaddtimedesc

如果你要查询属于3那个字段的话

select*fromaaawhereclass=3orderbyaddtimedesc

3. 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>

4. asp 读取数据库

这只是个连接数据库的语句,你只进行了查询,但是没有输出,而且没有关闭查询

5. 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

求采纳

6. asp读取MSSQL数据库中某个字段的值

set cn=Server.CreateObject("adodb.Connection")
cn.open"Provider=Microsoft.Jet.OLEDB.4.0;"& "Data Source="& server.MapPath("JYnovels.mdb")
set rs=server.CreateObject("adodb.recordset")
sql="select * from booktype where ID="&Request("menu1")
rs.open sql,cn,1,1
bookname=rs("name")
其中bookname是自定义的变量,rs("name")是数据库中的name字段值。

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

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

8. asp怎样读出SQL数据库表名和字段

asp怎样读出SQL数据库表名和字段
select * from sysobjects where xtype='u' 2、SELECT COLUMN_NAME,DATA_TYPE FROM INFORMATION_SCHEMA.columns WHERE TABLE_NAME=表名

9. 请问ASP.NET 怎么读取数据库中字段

什么意思?再说清楚一点,要实现什么?

10. ASP如何读取ACCESS中字段说明

1.asp如何获取access数据库的字段说明代码如下:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>提取access字段的说明信息</title>
</head>
<%
dim table
table = trim(request("t1"))
database=trim(request("d1"))
%>
<body>
<form method="POST" action="">
数据文件名:<input type="text" name="D1" size="40" value=<%response.write(database)%> >同目录下数据文件名称 如:database.mdb<br>
表......名:<input type="text" name="T1" size="40" value=<%response.write(table)%> >database.mdb中的表名<br>
<input type="submit" value="提交" name="B1"><input type="reset" value="重置" name="B2">
</form>

<%
if table = "" then
response.write("post nothing")
else%><%
dim conn
dim connstr
on error resume next
connstr="PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source="+server.mappath(database)+";"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
response.write(connstr+"<br>")
dim sql
dim rs
sql="select * from "+table+""
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
response.write(sql+"<br>")

If rs.State = adStateOpen Then
cnnState = "open"
Else
cnnState = "closed"
End If
response.write(cnnState +"<br>")
response.write("列数:"+cstr(rs.fields.count)+"<br>")

For i=0 to rs.fields.count-1
Response.Write "<TH>"+ rs(i).Name +"</TH>;<br>"
Next

Dim MyTableName
Dim MyFieldName

Dim MyDB
set mydb=server.createobject("adox.catalog")
Dim MyTable
set mytable=server.createobject("adox.table")
Dim MyField
set myfield =server.createobject("adox.column")
Dim pro

On Error resume next

MyDB.ActiveConnection =conn

For Each MyTable In MyDB.Tables
For Each MyField In MyTable.Columns
'response.write "FieldName:" & FieldType(MyField.Type) & " FieldSize:" & MyField.DefinedSize 'FieldType(pro.Type)
'response.write table & "." & MyField.name &":" '呵呵这里有变动,以前的有误
response.write MyTable.name & "." & MyField.name &":" '呵呵这里有变动,以前的有误
For Each pro In MyField.Properties
if pro.name="Description" and pro.Value <> "" then response.write pro.Value & " <br> " 'MyTable.Name & " : " & MyField.Name & " : " & pro.Name & " : " & pro.Value
Next
Next
Next

rs.close()
conn.close()
end if
%>

</body>

</html>

热点内容
内置存储卡可以拆吗 发布:2025-05-18 04:16:35 浏览:333
编译原理课时设置 发布:2025-05-18 04:13:28 浏览:374
linux中进入ip地址服务器 发布:2025-05-18 04:11:21 浏览:610
java用什么软件写 发布:2025-05-18 03:56:19 浏览:31
linux配置vim编译c 发布:2025-05-18 03:55:07 浏览:107
砸百鬼脚本 发布:2025-05-18 03:53:34 浏览:940
安卓手机如何拍视频和苹果一样 发布:2025-05-18 03:40:47 浏览:737
为什么安卓手机连不上苹果7热点 发布:2025-05-18 03:40:13 浏览:802
网卡访问 发布:2025-05-18 03:35:04 浏览:509
接收和发送服务器地址 发布:2025-05-18 03:33:48 浏览:370