1   1  /  1  页   跳转

vb连接sql出现问题

vb连接sql出现问题

Private Sub command2_Click()
End
End Sub

Private Sub Form_Load()
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
conn.ConnectionString = "driver={sql server};server=dengjiaxiong;uid=sa;pwd=;dataname=school"

conn.Open

If conn.State = adStateOpen Then
  MsgBox "connection successfull!"

End If
End Sub

Private Sub Label1_Click()
txtuser = ""
txtpwd = ""
End Sub
后来  有人提示 conn不是定义在窗体下,只是load过程中。所以发生错    可以把conn定义在通用那里。如:private conn as ADODB.Connection
  后经改过  依然有错  提示  对象名 admin 无效  可是我的 school数据库中的确有admin表为什么无效?
通过ado来连接sql数据库的,错误提示3001
每当在有调试的时候(按f8)都总是要由load开始调试 想问有什么方法可以只调试当前如command_click()的代码 占不调试其他代码的方法?
最后编辑2007-04-25 10:50:07
分享到:
gototop
 

搞黑客!
呵呵
数据库没那么容易
没那么容易吧
gototop
 

COOK也可以值得研究
呵呵
gototop
 

第一:如果你在多个程序段中调用到CONN变量,就必须将它声明为全局变量,方法可以通过在通用段声明来实现。

第二:从目前你发布的这段程序来看,没有更多信息可以检查,看不出什么错误,甚至CONN放在这里声明都没有问题,所以无法给出更多建议。

第三:另外还需要给你一个提示,你在调用ADODB之前,必须在VB6环境中包含对ADO的引用,方法是在“工程”菜单下,选择“引用”,然后在“Microsoft ActiveX Data Objects 2.8 Library”前面选择勾取。具体调用2.0还是2.1……2.8,就看你的数据库版本了,这个你自己掌握。

第四:我用的是VB6简体中文版,你可以试试在“工程”菜单下的“工程属性”,然后选择将“启动对象”直接设置为你需要调试的程序段看看,不知道着方法行不行,我没有直接试过。
gototop
 

参照TsunamiGZ的提示,同时修改连接串

Private Sub cmdConn_Click()

Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
conn.ConnectionString = "Driver={SQL Server};Server=localhost;Database=northwind;Uid=sa;Pwd=sa;"
conn.Open

If conn.State = adStateOpen Then
MsgBox "connection successfull!"
conn.Close
End If

End Sub

gototop
 

风云的这个连接串,应该是适用于SQL服务器安装在本机上吧,具体看LZ调试程序时,是在局域网进行调试,还是在单机上进行调试了;用户名和密码均为SA,就看LZ是否修改过数据库密码吧。
gototop
 
1   1  /  1  页   跳转
页面顶部
Powered by Discuz!NT