51Testing软件测试论坛

标题: 用VB连接了TD服务器后如何执行SQL语句进行查询?调试时总是报：实时错误424 缺少对象 [打印本页]

作者: wyjzjwyj 时间: 2007-10-4 17:48
标题: 用VB连接了TD服务器后如何执行SQL语句进行查询?调试时总是报：实时错误424 缺少对象
以下是一个简单的小程序
Private Sub Command1_Click()
  Dim com As TDAPIOLELib.Command
  Dim RecSet As Recordset

Set com = tdc.Command  //tdc在登录窗体中已经定义为 Dim tdc As New TDAPIOLELib.TDConnection，调试时该行变黄，报错：实时错误424 缺少对象
com.CommandText = "select * from bug"
Set RecSet = com.Execute

For i = 1 To RecSet.RecordCount
List1.AddItem (RecSet.FieldValue(i))
RecSet.Next
Next
End Sub

请教各位高手，大侠！！！！多谢啦！我的msn:yujuan.wang@gmail.com 我的QQ：93687970，请注明51job，谢谢！

作者: wyjzjwyj 时间: 2007-10-4 17:49
标题: 自己给自己个沙发，恭候各位大侠光临！
救命啊！！！

作者: eaglechy 时间: 2007-10-17 11:34
如果是td8.0，需要先调用tdc的InitConnectionEx和ConnectProjectEx方法连接到具体的td工程库才行

欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/)