+ -
当前位置:首页 → 问答吧 → 困扰多时,寻求帮忙!是我的数据库没装好吗

困扰多时,寻求帮忙!是我的数据库没装好吗

时间:2010-11-09

来源:互联网

公司的新电脑,装的是win7,数据库是SQL Server 2005,然后我把SQL Server 2000中的PUBS数据库附加上去了
现在想查询一下表authors的内容,代码如下
复制内容到剪贴板
代码:
<%@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>
<body>
<%
on error resume next
dim connStr,myConn,mySQL,myRec
connStr="provider=SQLOLEDB;data source=(local);initial catalog=pubs;user id=sa;password=123456;"
set myConn=server.CreateObject("ADODB.Connection")
myConn.open connStr
set myRec=server.CreateObject("ADODB.Recordset")
myRec.open "authors",myConn,1,1
response.Write "<table border=1>"
response.Write "<tr><td>编号</td><td>地址</td><td>城市</td><td>电话</td><tr>"
do while not myRec.eof
  response.Write "<tr><td>" & myRec("au_id") & "</td><td>" & myRec("address") & "</td><td>" & myRec("city") "</td><td>" & myRec("phone") & "</td></tr>"
  myRec.movenext
loop
response.Write "</table>"
myRec.close
myConn.close
set myRec=nothing
set myConn=nothing  
%>
</body>
</html>
然后测试老是出现“HTTP 500内部服务器错误,网站无法显示该页面”

不知道是我代码写错了,还是数据库没配置好,还请高手指点,鄙人不胜感激!
ps:SQL Server 2005 安装完之后需要其他的操作吗,以前一直用SQL Server 2000,装完之后,同样的代码都没问题的,晕~~~

作者: tianyingu   发布时间: 2010-11-09

作者: tianyingu   发布时间: 2010-11-09