永发信息网

ASP连接数据库的问题

答案:1  悬赏:70  手机版
解决时间 2021-02-04 19:04
  • 提问者网友:美人性情
  • 2021-02-04 11:35
<%
dim conn
dim connstr

set conn=Server.Createobject("adodb.connection")
connstr = "Provider=SQLOLEDB;Server=127.0.0.1;Database=数据库名; uid=sa; pwd=123;"
conn.open connstr

set rs = server.CreateObject("adodb.recordset")

SQL="select TOP 20 * from table"

rs.Open SQL,con,1,1

response.Write("连接数据库")

%>

这是语句,然后进去了就显示
An error occurred on the server when processing the URL. Please contact the
system administrator.
If you are the system administrator please click here to find out more
about this error.
我想知道是不是我哪里写错了。数据库是本地的,本来是要连接Oracl数据库,不过我现在SQL数据库都连不上,求教!

<%
dim conn
dim connstr

set conn=Server.Createobject("adodb.connection")
connstr = "Provider=SQLOLEDB;Server=127.0.01;Database=数据库名
;User ID=sa;Password=123;"
conn.open connstr

set rs = server.CreateObject("adodb.recordset")

SQL="select TOP 20 * from table"

rs.Open SQL,conn,1,1

response.Write("连接数据库")

%>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

我现在改成这个,直接显示网页无法访问是什么情况呢?
最佳答案
  • 五星知识达人网友:老鼠爱大米
  • 2021-02-04 11:45
发一段 access 的数据库连接
<%
Response.Expires=-1
response.charset="utf-8"

Toskydb ="/data/#xsystem.mdb" '数据库路径
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&Toskydb&"")

Set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>


mssql 2005的数据库连接
Dim clearapp,Tosky_,conn,connstr,rs
dim DB_ServerName,DB_SecurityInfo,DB_UserName,DB_PassWord,DB_DateBase,DB_Provider

DB_ServerName ="SQLOLEDB.1"                 '打开数据库用oledb的方式连接
DB_SecurityInfo = "False"                   '是否保存安全信息
DB_UserName = "sa"                          'SQL用户名
DB_PassWord = "224589"                      'SQL用户密码
DB_DateBase = "sq_zhongguohun"              '数据库名
DB_Provider = "XP-201104181029\SQL2005"     '数据源

clearapp=request.QueryString("cl")
if clearapp="cl" then
application.Contents.RemoveAll()
end if

connstr = "Provider="&DB_ServerName&";Persist Security Info="&DB_SecurityInfo&";User ID="&DB_UserName&";password="&DB_PassWord&";Initial Catalog="&DB_DateBase&";Data Source="&DB_Provider&";"

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connstr

' over 数据库连接
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯