2.8w+
社区成员
求ASP查询ACCESS数据库代码
求ASP查询ACCESS数据库代码
数据库名字是zhongyi
数据表名是mincheng
查找其中的所有xingming
求ASP查询ACCESS数据库代码
求ASP查询ACCESS数据库代码
求ASP查询ACCESS数据库代码
数据库名字是zhongyi
数据表名是mincheng
查找其中的所有xingming
求ASP查询ACCESS数据库代码
求ASP查询ACCESS数据库代码
求ASP查询ACCESS数据库代码
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
philcc 2008-04-11
<%
'数据库连接
dim conn,connstr
on error resume next
connstr="DBQ="+server.mappath("zhongyi.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (数据库路径)};"
Set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>
<body>
<%
Sql="select xingming from mincheng "
Set mRs=Server.CreateObject("adodb.recordSet")
mRs.open sql,conn,1,1
If mRs.bof and mRs.eof then
Response.Write"<span>没有记录</span>"
Else
while not mRs.eof
response.Write mRs("xingming") & "<br>"
mRs.movenext
wend
End If
%>
</body>
<%
conn.close
mRs.close
set conn = nothing
set mRs = nothing
%>
'数据库连接
dim conn,connstr
on error resume next
connstr="DBQ="+server.mappath("zhongyi.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (数据库路径)};"
Set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>
<body>
<%
Sql="select xingming from mincheng "
Set mRs=Server.CreateObject("adodb.recordSet")
mRs.open sql,conn,1,1
If mRs.bof and mRs.eof then
Response.Write"<span>没有记录</span>"
Else
while not mRs.eof
response.Write mRs("xingming") & "<br>"
mRs.movenext
wend
End If
%>
</body>
<%
conn.close
mRs.close
set conn = nothing
set mRs = nothing
%>
叶随风 2008-04-11
select xingming from [mincheng]
No_Data_Found 2008-04-11
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!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=utf-8" />
<title>无标题文档</title>
</head>
<%
'数据库连接
dim conn,connstr
on error resume next
connstr="DBQ="+server.mappath("zhongyi.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};" '数据库连接地址
Set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>
<body>
<%
Sql="select xingming from mincheng "
Set mRs=Server.CreateObject("adodb.recordSet")
mRs.open sql,conn,1,1
If mRs.bof and mRs.eof then
Response.Write"<span>没有任何记录</span>"
Else
while not mRs.eof
response.Write mRs("xingming") & "<br>"
mRs.movenext
wend
End If
%>
</body>
<%
conn.close
mRs.close
set conn = nothing
set mRs = nothing
%>
</html>ASP获取ACCESS数据库表名及结构的代码 获取ACCESS数据库表名_www.jb51.net</title> </head> <body style=”text-align:left;margin-left:50px;font-family:’arial’;font-size:12px”> <form style=”padding:5px;margin:5px;...
Asp.net在线备份、压缩和修复Access数据库示例代码 1.问题的提出 在设计中小型Web应用程序时，可以选择... 虽然Access数据库自身具有“压缩和修复数据库”功能（工具è数据库实用工具è压缩和修复数据库）。但对一般使用者来说操作不方便。通常Accesss数据库放置
asp+access数据库操作代码.txt conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ="&dbpath 读数据库相关操作 dim strsql strsql="select * from stu_info" rs.open strsql,conn,1,1 '打开数据库，使用strsql变量中的路径 if rs.EOF ...
asp 获取access系统表，查询等操作代码 Const adSchemaTables = 20 adSchemaColumns = 4 dim Conn,db dim ConnStr db=”temp.mdb” ‘ACCESS数据库的文件名，请使用相对于网站根目录的的绝对路径 ConnStr = “Provider=Microsoft.Jet.OLEDB.4.0...
检查access数据库中是否存在某个名字的表的asp代码 可以把本功能写成一个函数，函数的处理过程描述如下： 首先调用adodb.connection对象中的openSchema函数，这样会得到一个Recordset，其中每一条“纪录”对应着数据库中的一张表，“纪录”的每个“字段”包含了对应表...
asp连接access数据库代码（包含.mdb和.accdb两种格式） 现在的access数据库有2种后缀格式：.mdb和.accdb，区别是.mdb是access2003版及以前，.accdb是2007版access的格式。因为版本不一样，所以连接代码会有一些区别，我们来分别看一下！.mdb格式<% dim conn,...
ASP 连接Access数据库的登陆系统 首先在Access数据库Database.mdb中存在着用户信息表test： 编写一个登陆系统，如果用户输入的用户名在表中没有，则提示“查无此人”，如果输入密码错误，则提示“密码错误” 如果用户输入的用户名与密码都正确，...
