vb.net下多表查询SQL, SELECT语句不能执行
[code=VB.NET][/code]
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
Dim conn As New SqlConnection("uid=sa;pwd=123;database=esap;server=192.168.2.42;connect timeout=5")
Dim da As New SqlDataAdapter("select a.仓库分类,a.采购产线分类,a.部材类别,a.贸易方式,a.品番号,a.部品名称规格,a.计量单位,a.仓库在库,a.厂家未归还,a.厂家不良,a.制造不良,a.品番内码,a.到货待检数,a.品管判定未入库,a.供应商昵称 b.期末结存数量 as 上期结存 from GX部材基本信息_主表 a,GX财务现场盘点帐_明细 b,GX财务现场盘点帐_主表 c where a.品番内码=b.品番内码 and b.rcid=c.rcid and c.盘点时间='011-5-31' and a.是否永久停用 <>'是' and a.仓库分类 like '%" & ComboBox1.Text & "%' and a.部品名称规格 like '%" & TextBox1.Text & "%' and a.品番号 like '%" & TextBox2.Text & "%' and (a.贸易方式 = '" & ComboBox2.Text & "' or '" & ComboBox2.Text & "' ='') order by a.仓库分类 DESC,a.采购产线分类 DESC,a.部材类别 DESC,a.贸易方式 DESC,a.品番号 DESC,a.部品名称规格 DESC,a.计量单位 DESC", conn)
Dim ds As New DataSet
da.Fill(ds, "bom")
DataGridView1.DataSource = ds.Tables("bom")
Catch
MessageBox.Show("错误!")
End Try
End Sub
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
Dim conn As New SqlConnection("uid=sa;pwd=123;database=esap;server=192.168.2.42;connect timeout=5")
Dim da As New SqlDataAdapter("select a.仓库分类,a.采购产线分类,a.部材类别,a.贸易方式,a.品番号,a.部品名称规格,a.计量单位,a.仓库在库,a.厂家未归还,a.厂家不良,a.制造不良,a.品番内码,a.到货待检数,a.品管判定未入库,a.供应商昵称 b.期末结存数量 as 上期结存 from GX部材基本信息_主表 a,GX财务现场盘点帐_明细 b,GX财务现场盘点帐_主表 c where a.品番内码=b.品番内码 and b.rcid=c.rcid and c.盘点时间='011-5-31' and a.是否永久停用 <>'是' and a.仓库分类 like '%" & ComboBox1.Text & "%' and a.部品名称规格 like '%" & TextBox1.Text & "%' and a.品番号 like '%" & TextBox2.Text & "%' and (a.贸易方式 = '" & ComboBox2.Text & "' or '" & ComboBox2.Text & "' ='') order by a.仓库分类 DESC,a.采购产线分类 DESC,a.部材类别 DESC,a.贸易方式 DESC,a.品番号 DESC,a.部品名称规格 DESC,a.计量单位 DESC", conn)
Dim ds As New DataSet
da.Fill(ds, "bom")
DataGridView1.DataSource = ds.Tables("bom")
Catch
MessageBox.Show("错误!")
End Try
End Sub
作者: wygg3568 发布时间: 2011-06-15
盘点日期我写错了,应为'2011-5-31' ,但还是不能执行。高手帮忙!!!
作者: wygg3568 发布时间: 2011-06-15
(a.贸易方式 = '" & ComboBox2.Text & "' or '" & ComboBox2.Text & "' ='') 这个地方有点问题。写得不对,你查看一下。
如果是:字段名称不要用'',也没有写明:那个字段=''
如果是:字段名称不要用'',也没有写明:那个字段=''
作者: linjimu 发布时间: 2011-06-15
用存储过程多好,效率也高!
作者: z_f_p 发布时间: 2011-06-15