asp数据库调用
‘壹’ ASP代码如何调用数据库数据
首先需要连接数据库，access还是sql是不同的请度娘。我只说说你后面的问题。在连接成功后存在一个conn
(
看到了楼主的是rsClassBm
,请替换即可
)调用的方法按照楼主的则是<%set
rsnews=conn.execute("select
*
from
ArtBigClass")do
while
not
rsnews
.eof
%>"><%=
rsnews("BigClassName")
%><%
rsnews.movenext
loop%>
‘贰’ asp网页中如何调用mdb数据库。
找到“数据源（ODBC）”并且打开，点击“系统DSN”-“添加”-“Microsoft Access Driver(*.mdb)”
（注明：如果使用的Access 2007以上的版本，数据库文件后缀名为.accdb时，这里应该选择Microsoft Access Driver(*.mdb,*accdb)）-“完成”-填入数据源名称-“选择”-找到你的数据库，并确定-“确定”。
‘叁’ 如何用ASP调用数据库种数据
<%
dim
connstr
set
conn=server.createobject("adodc.connection")
connstr="DRIVER={SQL
sever
(*.db)};Defausltdir=;DBQ="+"server.mappath("这里是数据库文件的地址")"
conn.open
connstr
%>
如上是连接数据库了，如果要做导航的话，得调用数据库的内容，那要再上面文件加上这些
set
recordset1=server.createobject("adodc.recordset")
这句是创建数据集
比如你的导航有一项是news，那你可再加上
recordser1.open()
在导航栏用<%response.write(recordset1.fields.item("news").value)%>
‘肆’ asp中如何调用数据库图片，麻烦仔细点，谢谢！
你没有说清是什么数据库，先说说access吧。
如何从ACCESS数据库中读取images
1。ACCESS和FoxPro数据库中的图形格式
当浏览器遇到一个<IMG>标志时，它会根据你设定的src属性来下载文件。
这可能是一个图形文件或则是一个ASP页面。
如果是一个返回gif二进制的ASP页面
浏览器需要知道返回的是什么格式的图形文件
因为这个原因，就需要指定content type，为image/gif，image/bmp
image/jpeg或则其他什么的。
Response.contentType = "image/gif"
但这会导致另外一个问题，那就是我们只能够显示gif格式的图象，
或则说保存在数据库中的东西只能够是gif格式的了。
但是一些数据库是使用gif格式保存的，但是另外一些则是使用
jpeg格式保存的，甚至其他是采用OLE方式来保存图形的。
所以我们必须根据图形的格式来设置response的content type.
注意的是你也可以从一个文件中新建一个位图对象，但使用这样
的方式保存在数据库中的图形格式是浏览器不能够识别的。
当你往数据库中保存图象时，你应该知道你需要使用什么格式来保存
你可以把文件中的每一个字节保存下来，或则通过ACCESS/Foxpro的把图形保存
为一个OLE格式。
你使用什么格式保存图象决定了你在ASP中用什么格式来读出图形来。
具体来说，如果你在ACCESS/FoxPro中将图形保存为bmp,gif,jpeg(
这个必须要使用到ACCESS/FoxPro的OLE对象，即使用ACCESS的插入对象
对话框来完成)，这是当你使用
image/bmp时浏览器是不能够解释的。
现在假设在数据库中保存的是你所想要的图形格式
(GIF, JPEG, BMP, TIFF, 等)现在来看看要怎么把它们从
数据库中读出来。
在ACCESS中使用了两个关键的技术来保存图形
1。使用了bmp格式
2。78个字节的文件头
<%
response.Expires = 0
response.Buffer = True
response.Clear
response.contentType = "image/bmp"
%>
接着你要干的就是去掉那78个字节的OLE对象的文件头。
<%
Const OLEHEADERSIZE = 78
nFieldSize = rs("photo").ActualSize
oleHeader = rs("photo").GetChunk(OLEHEADERSIZE)
imageBytes = rs("photo").GetChunk(nFieldSize - OLEHEADERSIZE)
Response.BinaryWrite imageBytes
%>
现在举一个例子：
如果你要得到一个职工的信息，这段信息包括一个介绍和他的图象。
并且要同时显示文字和图形。
代码如下：（其中的theImg是一个代理页面）
theImg.asp
<%
response.Expires = 0
response.Buffer = True
response.Clear
response.contentType = Session("ImageType")
response.BinaryWrite Session("ImageBytes")
Session("ImageType") = ""
Session("ImageBytes") = ""
response.End
%>
Function SetImageForDisplay(field, contentType)
OLEHEADERSIZE = 78
contentType = LCase(contentType)
select case contentType
case "gif", "jpeg", "bmp"
contentType = "image/" & contentType
bytes = field.value
case "ole"
contentType = "image/bmp"
nFieldSize = field.ActualSize
oleHeader = field.GetChunk(OLEHEADERSIZE)
bytes = field.GetChunk(nFieldSize - OLEHEADERSIZE)
end select
Session("imageBytes") = bytes
Session("imageType") = contentType
End Function
'注意的是，程序中只使用了4中格式：gif, jpeg, bmp , ole .
<%
sql = "select * from Employees"
Set oRS = Server.CreateObject("ADODB.Recordset")
oRS.CursorLocation = 3
oRS.Open sql, "DSN=NW"
SetImageForDisplay oRS("photo"), "ole"
Set oRS.ActiveConnection = Nothing
%>
要显示图象的话，只需要在另外一个asp中，假设为getEmpInfo.asp中
<img src="theImg.asp"</img>
但这还有一个问题，因为对每个职工的图形都使用了同一个"theImg.asp"
文件，应该再小小修改一下：
<img src="theImg.asp?temp=<%= Request.Form("empLastName")%>"</img>
最后再说一点，如何显示多幅图象呢？
也就是说如果数据库中有多个字段都保存了图形，怎么办？
其实解决办法很简单，只要给SetImageForDisplay多加一个参数
就是用来保存图形的一个session变量。
例如：
SetImageForDisplay oRS1("photo"), "ole", "empPhoto"
SetImageForDisplay oRS2("logo"), "gif", "compLogo"
<img src="theImg2.asp?varName=empPhoto&temp=<%= Request.Form("empLastName")%>">
<img src="theImg2.asp?varName=compLogo&temp=<%= Request.Form("imgCode")%>">
使用这个方法能够完成下面的功能：
1。能够从数据库中取出图形字段。（你唯一需要知道的是数据库中的图形是什么格式
bmp?gif?jpeg?ole?）
2.采用session变量 来保存图形的字节数和content type
asp需要这些信息来联结到<IMG>中的属性
3。只要把theImg放到你想显示图形的地方，就能够显示图象了
‘伍’ ASP问题，如何调用数据库数据
首先需要连接数据库，access还是SQL是不同的请度娘。我只说说你后面的问题。在连接成功后存在一个conn
(
看到了楼主的是rsClassBm
,请替换即可
)调用的方法按照楼主的则是<%set
rsnews=conn.execute("select
*
from
ArtBigClass")do
while
not
rsnews
.eof
%>"><%=
rsnews("BigClassName")
%><%
rsnews.movenext
loop%>
‘陆’ ASP调用SQL数据库
serch.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<style type="text/css">
<!--
.thin { border-collapse: collapse;
}
.STYLE2 {font-size: 12px; color: #000000; }
-->
</style>
</head>
<body>
<table width="80%" border="0" align="center" cellpadding="1" cellspacing="0">
<tr>
<td colspan="3"><form id="form" name="form" method="post" action="sec.asp">
<table width="100%" border="1" cellpadding="0" cellspacing="0" class="thin">
<tr>
<td width="30%" align="right" valign="middle" class="STYLE2">查询内容:</td>
<td align="left" valign="middle" class="STYLE2"><input name="nr" type="text" id="nr" /></td>
</tr>
<tr>
<td width="30%" align="right" valign="middle" class="STYLE2">日期:</td>
<td align="left" valign="middle" class="STYLE2"><input name="ksrq" type="text" id="ksrq" />
到
<input name="jsrq" type="text" id="jsrq" />
(请按2000-1-30这样的格式输入)</td>
</tr>
<tr>
<td colspan="2" align="center" valign="middle" class="STYLE2"><input type="submit" name="Submit" value="查 询" /></td>
</tr>
</table>
</form>
</td>
</tr>
</table>
</body>
</html>
sec.asp:
<% '建立数据库连接
set conn=server.createobject("adodb.connection")
connstr="driver={SQL Server};server=/输入服务器ip地址/; uid=/数据库用户名/;pwd=/数据库密码;database=sql的数据源名，也就是ODBC里建立的数据库名/" '请把/……/改成正确的内容。
conn.open connstr
nr=request.Form("nr")
ksrq=request.Form("ksrq")
jsrq=request.Form("jsrq")
if nr<>"" and ksrq<>"" and jsrq<>"" then
set rs=server.createobject("adodb.recordset")
sql="select * from [表名] where 列标题="&nr&" and 日期列 (between #"&ksrq&"# and #"&jsrq&"#) order by id desc"
rs.open sql,conn,1,1
else
if nr<>"" and ksrq="" and jsrq="" then
set rs=server.createobject("adodb.recordset")
sql="select * from [表名] where 列标题="&nr&" order by id desc"
rs.open sql,conn,1,1
else
if nr="" and ksrq<>"" and jsrq<>"" then
set rs=server.createobject("adodb.recordset")
sql="select * from [表名] where 日期列 between #"&ksrq&"# and #"&jsrq&"# order by id desc"
rs.open sql,conn,1,1
else
msgbox "输入条件不对，请点后退按钮重新输入。"
end if
end if
end if
%>
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<style type="text/css">
<!--
.thin { border-collapse: collapse;
}
.STYLE2 {font-size: 12px; color: #000000; }
-->
</style>
</head>
<body>
<table width="80%" border="1" align="center" cellpadding="0" cellspacing="0" class="thin">
<tr>
<td width="20%" height="20" align="center" valign="middle" bgcolor="#FFFFCC" class="STYLE2">查询结果列1</td>
<td width="20%" height="20" align="center" valign="middle" bgcolor="#FFFFCC" class="STYLE2">查询结果列2</td>
<td width="20%" height="20" align="center" valign="middle" bgcolor="#FFFFCC" class="STYLE2">查询结果列3</td>
<td width="20%" height="20" align="center" valign="middle" bgcolor="#FFFFCC" class="STYLE2">查询结果列4</td>
<td height="20" align="center" valign="middle" bgcolor="#FFFFCC" class="STYLE2">日期列</td>
</tr>
<%do while not rs.eof%>
<tr>
<td width="20%" align="center" valign="middle" bgcolor="#F0F0F0" class="STYLE2"><%=rs("显示查询结果列1")%></td>
<td width="20%" align="center" valign="middle" bgcolor="#F0F0F0" class="STYLE2"><%=rs("显示查询结果列2")%></td>
<td width="20%" align="center" valign="middle" bgcolor="#F0F0F0" class="STYLE2"><%=rs("显示查询结果列3")%></td>
<td width="20%" align="center" valign="middle" bgcolor="#F0F0F0" class="STYLE2"><%=rs("显示查询结果列4")%></td>
<td align="center" valign="middle" bgcolor="#F0F0F0" class="STYLE2"><%=rs("日期列")%></td>
</tr>
<%
rs.movenext
loop
rs.close
set rs=nothing
conn.close
set rs=nothing
%>
</table>
</body>
</html>
复制serch.asp保存为serch.asp
复制sec.asp保存为sec.asp,修改代码,保存,然后就可以了.
‘柒’ 用asp调用数据库中的数据，请帮忙
<table width="200" border="0" align="center" cellpadding="0" cellspacing="0">
<%
if anclassid="" then
set rsok=server.createobject("ADODB.recordset")
sqlok="select * from sort order by anclassidorder"
rsok.open sqlok,conn,1,1
do while not rsok.eof
%>
<tr height="25">
<td width="13%"> </td>
<td width="83%" style="border-bottom:1px solid #CCCCCC " align="center">
<b>【<a href="procts.asp?id=big&anclassid=<%=rsok("anclassid")%>"><%=rsok("anclassname")%></a>】</b></td>
<td width="4%"> </td>
</tr>
<%rsok.movenext
loop
rsok.close
set rsok=nothing
else%>
<tr height="25">
<td width="13%"> </td>
<td width="83%" style="border-bottom:1px solid #CCCCCC " align="center">
</td>
<td width="4%"> </td>
</tr>
<%end if%>
</table>
--------------------------
针对“在对应所需名称或序数的集合中，未找到项目”的调试方法：
语句rsok.open sqlok,conn,1,1 没有问题，追溯到上一关键语句
sqlok="select * from sort order by anclassidorder"
先精简SQl语句
尝试sqlok="select * from sort"看是否报错，如果仍然报错，看数据库中表名sort是否有拼写错误。
如果不报错，查看sort表是否包含字段anclassidorder
如果两者都不是就发消息给我，我给你我的QQ,要快哦，等一下要是下班了今天就帮不到你了
‘捌’ ASP.NET的数据库怎么调用
SqlConnection
conn
=
new
SqlConnection(GetConnectionString.conn());
SqlCommand
cmd
=
conn.CreateCommand();
cmd.CommandType
=
CommandType.StoredProcere;
//指定执行存储过程操作
cmd.CommandText
=
"fangSTDEquGroup";
//存储过程名称
SqlDataAdapter
da
=
new
SqlDataAdapter(cmd);
//定义一个数据适配器
DataSet
DataSet2
=
new
DataSet();
//定义一个数据集
da.Fill(DataSet2);
//填充数据集
DataTable
dt
=
DataSet2.Tables[0];
//取数据集中的表进行操作
TreeView2.Nodes.Clear();
TreeNode
cc
=
new
TreeNode();
cc.Text
=
"设备";
cc.Value
=
"设备";
TreeView2.Nodes.Add(cc);
foreach
(DataRow
dr
in
dt.Rows)
{
TreeNode
tn
=
new
TreeNode();
tn.Text
=
dr["StrName"].ToString();
tn.Value
=
dr["IDCode"].ToString();
cc.ChildNodes
.Add(tn);
}
conn.Close();
提取数据集最好还是改成用自定义函数来调用，这样写你更容易看懂
‘玖’ asp网页关于acc数据库调用的菜鸟问题
数据表不多合并嘛，表倒到一个MBD库里面，用一个conn.asp就可以 ，还有就是conn.asp 打开数据库的链接地址是否正确，是相当路径还是绝对路径，相对路径的话你看看，是不是多了../
链接对象名称不要一样
Set oConn = Server.CreateObject("ADODB.Connection")
Set Conn = Server.CreateObject("ADODB.Connection")
‘拾’ asp调用数据库
ACCESS数据库的连接
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("数据库")
%>
第一句话定义了一个adodb数据库连接组件，第二句连接你的数据库。
<%
exec="select * from 数据库表名"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
这三句加在前面两句的后面。
第一句：设置查询数据库的命令，select后面加的是字段，如果都要查询的话就用*，from后面再加上表的名字。
第二句：定义一个记录集组件，所有搜索到的记录都放在这里面，
第三句：是打开这个记录集，exec就是前面定义的查询命令，conn就是前面定义的数据库连接组件，后面参数“1，1”，这是读取。
<%do while not rs.eof%>
...
<%
rs.movenext
loop
%>
<%=rs("字段名")%>
用do循环，not rs.eof的意思是条件为没有读到记录集的最后，rs.movenext的意思是显示完一条转到下面一条记录。
主要用于显示字段变量。
例如：做一个读取数据库记录的页面
用access2000建立数据库db1，建立表biao1,字段：id（自动编号）,name（文本）,qq（数字）,neirong（备注）,time（时间、日期/默认值now()）。
页面代码是：
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("db1.mdb")
%>
<%
exec="select * from biao1 order by id desc"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
<%do while not rs.eof%>
<%=rs("id")%><%=rs("name")%><%=rs("qq")%><%=rs("neirong")%><%=rs("time")%><br>
<%
rs.movenext
loop
%>