给个简单的连接显示数据库的ASP页面! 谢谢
1个回答
展开全部
sql:
Dim conn
Dim sDatabaseName
sDatabaseName = "数据库名"
Set conn= Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=SQLOLEDB;Data Source=连接地址(ip或者local);User ID=用户名;Password=密码;"
ACCESS数据库:
set conn=Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("数据库名")
conn.Open "provider=microsoft.jet.oledb.4.0;data source="&dbpath
提取数据
set rs=server.createobject("adodb.recordset")
SQL="select * from 表名 where 条件”
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof /多行就用这个循环
response.write(rs("表里的字段名"))
rs.movnext /多行就用这个循环
loop/多行就用这个循环
end if
Dim conn
Dim sDatabaseName
sDatabaseName = "数据库名"
Set conn= Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=SQLOLEDB;Data Source=连接地址(ip或者local);User ID=用户名;Password=密码;"
ACCESS数据库:
set conn=Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("数据库名")
conn.Open "provider=microsoft.jet.oledb.4.0;data source="&dbpath
提取数据
set rs=server.createobject("adodb.recordset")
SQL="select * from 表名 where 条件”
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof /多行就用这个循环
response.write(rs("表里的字段名"))
rs.movnext /多行就用这个循环
loop/多行就用这个循环
end if
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询