请诸位帮忙vb连接SQL

请各位帮忙vb连接SQL
Dim cnn1 As ADODB.Connection
Dim rs As ADODB.Recordset
Dim strCnn As String
Dim varDate As Variant

strCnn = "Provider=sqloledb;" & _
"Data Source=localhost;Initial Catalog=wygl;User Id=sa;Password=; "
Set cnn1 = New ADODB.Connection
cnn1.Open strCnn
以上连接不知道出了什么问题，提示sqlserver不存在，或拒绝访问。
[最优解释]
将localhost改成计算机名或IP地址试试
[其他解释]
连接字符串你这样写看看： g_SqlDBString = "DRIVER={SQL Server};server=.;UID=sa;PWD=;database=mydb"
[其他解释]

dim conn as new adodb.connection
with conn
    If .State = adStateOpen Then .Close
    .ConnectionString = "driver=SQL Server;server=计算机名或IP地址;uid=sa;pwd=;database=数据库名"
    .CommandTimeout = 0
    .Open
end with

[其他解释]
查查是不是可以用sa登录的,还是只允许window用户登录
[其他解释]
你本机上SQLSERVER启动正常不?
[其他解释]
先检查SQL本身是否正常，然后再检查语句
[其他解释]
1连接sql的有两种认证方式，你是选择windows认证还是sql的用户名密码验证，如果不同的话连接的字符串是不同的，你要先知道。然后在可以进行连接操作，都是搞这个的怎么连接都清楚了，你先判断你的连接方式吧。
至于那种认证来源你SQl 的安装，你看看你Sql的配置再说，希望能帮助你
[其他解释]
看看本机上SQLSERVER

请诸位帮忙vb连接SQL

热点推荐