首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 网站开发 > ASP >

asp连接sql解决方法

2012-03-23 
asp连接sql公司网站做好了,要上传到网上,以前我用是access,现在空间是用sql的,下面这些代码该怎么写。。。%s

asp连接sql
公司网站做好了,要上传到网上,以前我用是access,现在空间是用sql的,下面这些代码该怎么写。。。
<%
set   conn=server.createobject( "adodb.connection ")
conn.open   "provider=microsoft.jet.oledb.4.0;data   source= "&   server.mappath( "\bondrise\database\admin.mdb ")

%>
  <%  
set   rs=server.createobject( "ADODB.Recordset ")  
sql= "select   top   10   *   from   news   order   by   id   desc "  
rs.open   sql,conn,1,1
do   while   not   rs.eof
response.write " <a   href= 'newcenter.asp?id= "   &   rs( "id ")   &   " '   target= '_blank '> "   &   rs     ( "content ")   &   " </a> <br> ------------------------------------------------ <br> "

rs.movenext
loop        
%>

[解决办法]
dim conn
dim connstr
dim db
Set conn = Server.CreateObject( "ADODB.Connection ")
connstr= "driver={SQL Server};server=(local);database=bus;uid=sa;pwd=sa; "
conn.Open connstr
If Err Then
Err.Clear
Set conn = Nothing
Response.Write "数据库连接文件出错,请联系管理员。 "
Response.End
End If

热点排行