分类: 数据库开发技术
2009-05-09 14:13:22
<%
'程序功能:ASP与ACCESS数据库连接
'程序作者:bbird
'创建时间:2009-5-9
'程序备注:连接的数据库的uid名称任意,文件若无密码请取消uid和pwd两项;access文件应该给予一定权限,一般使该文件的everyone组用户拥有读写等权限;
dim conn,db,connstr
set conn=server.createobject("adodb.connection")
db=server.mappath("datebase.mdb")
connstr="driver={microsoft access driver (*.mdb)};uid=username;pwd=password;dbq="&db
conn.open connstr
'以下是测试程序,可用此部分测试连接的正确性
'set rs=server.CreateObject("adodb.recordset")
'sqlstr="select * from table"
'rs.open sqlstr,conn,2,3
'response.write rs("field")
%>
<%
'程序功能:ASP与MSSQLServer数据库连接
'程序作者:bbird
'创建时间:2009-5-9
'程序备注:
dim conn,ConnStr,IP,UserName,PassWord,DateBase
'此处填写您的数据库信息
IP="127.0.0.1"
UserName="username"
PassWord="password"
DateBase="datebase"
'以下是固定内容,不必改动
set conn=server.createobject("adodb.connection")
ConnStr="Driver={SQL Server};Server="&IP&";UID="&UserName&";PWD="&PassWord&";database="&DateBase&";"
conn.Open ConnStr
'以下是测试程序,可用此部分测试连接的正确性
'set rs=server.CreateObject("adodb.recordset")
'sqlstr="select * from authors"
'rs.open sqlstr,conn,2,3
'response.write rs("au_id")
%>