在程序中怎样实现SQL SERVER本地数据库连接？！

Question

你问的好奇怪，本地系统中既然没有装SQL，那么又怎么会有本地数据库呢，还是你是指装的是DESKTOP版而不是SERVER版

Answer 1

用ADO连接Sql server数据库
   
strCN="Driver={SQL Server};Server=服务器名;DataBase=数据库;UID=用户;PWD=口令;"
 eg:SQL服务器名为 WEBSVR,数据库名为WebMis(在SQL Enterprise Manager中查看到),用户sa,口令123,则以上为: 
     
dim cn as adodb.connection 
      set cn =new adodb.connection 
     dim strCn as string 
     strCN="Driver={SQLServer};Server=WEBSVR;DataBase=WebMis;UID=sa;PWD=123;" 
     cn.open strCN

Answer 2

要连本地的话将上面的WEBSVR改为你本地的电脑的sql server名字即可

Answer 3

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