先用ADOXBuilder新建了外部数据表再用insert into给外部数据表写入了数据
从SQL server上已经看到了该数据表及其数据
之后在代码中有如下内容:
If not DataTables.Contains(strTableName) Then
txtInfo.Value &= vblf + vbcr + "加载外部数据表..."
Dim q As new OuterTableBuilder
q.TableName = strTableName
q.TableCaption = strTableName
q.Conn ectio nN ame = "EquipAndMaterial"
q.S elec tS tring = "Sele ct * F rom {" & strTableName & "}"
q.Build
txtInfo.Value &= " 加载外部数据表完成。"
Else
DataTables(strTableName).L oa dF ilt er = ""
DataTables(strTableName).Load()
End If
却没有任何数据被加载进来。
然后又用命令窗口进行测试,输入如下代码:
Dim dr As DataRow = DataTables("动力系统_接触器").S Q L Find("供应商 = '****电器'")
If dr IsNot Nothing Then
messagebox.show("find dr ")
Else
messagebox.show("not find dr ")
End If
Dim cmd As New SQLCommand
Dim cnt As Integer
cmd.Con nection Name = "EquipAndMaterial"
cmd.Command Text = "Sele ct Cou nt(*) Fr om {动力系统_接触器} wh ere [供应商] = '****电器'"
cnt = cmd.Execute Scalar
messagebox.show(CStr(cnt))
运行结果是没有找到dr,但cnt=344
请教这是什么情况?
说明:本工程只有一个外部数据源"EquipAndMaterial"