以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  sqlfind  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=143273)
--  作者：巷弄太过弯曲
--  发布时间：2019/11/19 10:56:00
--  sqlfind
老师 请问我这段代码 怎么样用SQLfind查询出物料名称

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.ConnectionNa me = "ces hi"
cmd.CommandText = "SE LE CT top 0 d.fname as 物料名称,b.FQty As 数量,d.FModel as 规格型号 " & _
" From POOrder a left join POOrderentry b on a.finterid = b.finterid " & _
" left join t_ICItem d on b.fitemid = d.fitemid "
dt = cmd.ExecuteReader()
Tables("窗口1_table1").DataSource= dt
Tables("窗口1_table1").DataTable.DataCols("数量").Decimals = 1
Tables("窗口1_table1").DataTable.DataCols("数量").SetFormat("0.0")
--  作者：有点蓝
--  发布时间：2019/11/19 11:04:00
--  
根据什么条件查询？
--  作者：巷弄太过弯曲
--  发布时间：2019/11/19 11:37:00
--  
就给根据d.fitemid内码查询对应的物料名称，如63421对应的是物料名称为钢笔
--  作者：有点蓝
--  发布时间：2019/11/19 11:52:00
--  
1楼的代码似乎和SQLfind没有什么关联。

如果要通过fitemid 获取名称，这样就行

Dim cmd As New SQLCommand
cmd.ConnectionNa me = "ceshi"
Dim id As String = "63421"
cmd.CommandText = "SELECT top 0 fname from t_ICItem where fitemid =\'" & id & "\'"
Dim 名称 As String = cmd.ExecuteScalar
msgbox(名称)