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不存在,或拒绝访问。
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不存在,或拒绝访问。
解决方案 »
- 请推荐可以在vb中使用的图像处理控件
- ado MoveComplete 问题
- 求高人帮我解释代码什么意思
- TabStrip使用方法 特急
- {问!!!』如何让一个EXE程序在运行时把自己扶植到指定的地方?回帖有分!!
- VB向导生成的程序,按钮上的图片保存在哪里?
- vb的数据库连接代码不能写在模块中,我本来是想把连接都放在一个模块中,
- (vb低手不要进来)誰能解决这个问题,我给他100分,up者不给份,在线等候
- 窗体如何关闭
- 软件中的向导是怎么回事?
- 关于判断坐标颜色
- 我这里是一套题库(我取出两个),我想把这两个工程弄到一起,再添加一个窗体(窗体显示“选择题”和“计算题”2个按钮)点击按钮即可进行对应题目的联系或者编辑
with conn
If .State = adStateOpen Then .Close
.ConnectionString = "driver=SQL Server;server=计算机名或IP地址;uid=sa;pwd=;database=数据库名"
.CommandTimeout = 0
.Open
end with
至于那种认证来源你SQl 的安装,你看看你Sql的配置再说,希望能帮助你