标题:不懂 ASP 数据库连接问题
只看楼主
xtdhwl
Rank: 2
等 级:论坛游民
帖 子:29
专家分:11
注 册:2008-3-23
 问题点数:0 回复次数:1 
不懂 ASP 数据库连接问题
<%
' 创建数据库连接
Function GetConn(Connstr)   
    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.Open Connstr
    Set GetConn = Conn
End Function
' 创建SqlServer数据库连接
Function GetSQLServerConn(DBServer,UserID,Password,DataBase)
    Dim Params,Conn
         
    Set GetSQLServerConn = Nothing
       Params = "Driver={SQL Server}"
       Params = Params & ";Database=" & DataBase
    Params = Params & ";Server=" & DBServer
    Params = Params & ";Uid=" & UserID
    Params = Params & ";Pwd=" & Password           
    Set GetSQLServerConn = GetConn (Params)
End Function

' 获得RecordSet
Function GetRecordSet (Sql)
    'response.write sql
    'response.end
    rs.Open Sql,Conn,1,1
    Set GetRecordSet = rs
End Function

' 生成SQL Server连接
Set Conn = GetSQLServerConn("(local)","sa","","ww")

Set rs = Server.CreateObject("ADODB.Recordset")
---------------------------------------------------------
上面是源码 如果我 SQL 的账户是 sa 密码是ww 数据库路径 "../数据库/数据库.bak"

我改修改什么地方能

希望师傅赐教 QQ:307651871
搜索更多相关主题的帖子: 数据库 ASP 
2010-03-13 13:39
aspic
Rank: 17Rank: 17Rank: 17Rank: 17Rank: 17
等 级:贵宾
威 望:51
帖 子:2258
专家分:8050
注 册:2008-2-18
得分:0 
Set Conn = GetSQLServerConn("服务器地址或服务器名","用户名","密码","数据库名")
2010-03-13 15:15



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-299288-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.673829 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved