ogim - 2007-4-22 14:10:00
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()的代码 占不调试其他代码的方法?
© 2000 - 2024 Rising Corp. Ltd.