企业管理器-->实例名-->安全性-->登录-->双击右边的SA-->更改密码<%
dim conn
dim connstr
set conn=server.createobject("adodb.connection")
connstr="driver={sql server};server=192.168.8.9;uid=sa;pwd=你的密码;database=ok"
conn.open connstr
%>

解决方案 »

  1.   

    change localhost to your sql server machine name:
    <%
    sConn = "Provider=SQLOLEDB;Database=法律sql;Server=localhost;UID=sa;PWD=19791010;"
    set conn = Server.CreateObject("ADODB.Nonnection")
    conn.Open sConn
    set rs = conn.Execute("select * from [l1000]")
    do until rs.EOF
      for i=0 to rs.fields.count - 1
        Response.Write rs.fields(i).name & "=" & rs.fields(i).value & "<BR>"
      next
      rs.moveNext
    loop
    rs.close
    conn.close
    set conn=nothing
    %>see more connection strings at
    http://www.able-consulting.com/ado_conn.htm?f=ado_conn.htm#DSN
      

  2.   

    <%
    dim conn
    dim connstr
    set conn=server.createobject("adodb.connection")
    connstr="driver={sql server};server=192.168.8.9;uid=sa;pwd=ok;database=ok"
    conn.open connstr
    %>
    谢谢彭大力!!!
    我按照你的方法试了一下,但还是提示同样的错误!!!前一段时间,我曾遇到过此类情况,那时sql server 有两张盘,两张都可以装,但只有一张安装的数据库可以连接!!!这是怎么回事???疯狂郁闷!!
      

  3.   

    企业管理器-->右键你的实例(就是那个有绿色图标的)-->属性-->安全-->改为sql与window混合
      

  4.   

    <%
    sConn = "Provider=SQLOLEDB;Database=ok;Server=192.168.8.9;UID=sa;PWD=ok;"
    set conn = Server.CreateObject("ADODB.Nonnection")
    conn.Open sConn
    .....%>????