Foxtable(狐表)用户栏目专家坐堂 → [求助]数据库查询修改问题


  共有9768人关注过本帖树形打印复制链接

主题:[求助]数据库查询修改问题

美女呀,离线,留言给我吧!
lemon
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:9 积分:137 威望:0 精华:0 注册:2012/7/11 14:18:00
[求助]数据库查询修改问题  发帖心情 Post By:2012/8/2 10:00:00 [只看该作者]

我要建立一个窗口,有表ExportHead,ExportItem来自SQLServer,目的是实现一个查询功能和一个修改功能,

我输入表ExportItem中的PackingNo字段,查到表ExportHead中ShipmentNo与ExportItem中ShipmentNo相同的数据,

并显示到页面上。请教高手如何实现,可以给我一段类似的代码吗?我有尝试过,可一直提示我Select语句有错,但在数据库中

我的select语句是可以执行的。

str1= e.Form.controls("TextBox1").Text
Select Case e.sender.name
    Case "Button1"
        Dim dt As Integer
        Dim s ,ss As String
      Dim cmd As New SQLCommand
       cmd.ConnectionName  = "TWQEC"
               cmd.CommandText = "SELECT ExportHead.ShipmentNo FROM ExportHead INNER JOIN ExportItem ON ExportHead.ShipmentNo=ExportItem.ShipmentNo WHERE ExportItem.ExportPackingNo= '"& str1 &"' "

           s=cmd.ExecuteScalar()

     If s Is Nothing
           MessageBox.Show("无此id号")
       Else                
           Dim jb As New SQLJoinTableBuilder("table1","ExportHead")
            jb.Build
            DataTables("table1").LoadFilter = "ShipmentNo = '"& s &"' "
            DataTables ("table1").Load() 

我代码是这样写的,连自己都不知道逻辑对不对,学的时间很短,东西都是跳着看的,因为要在一周之类交出一些东西,谢谢你啦!
 


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/8/2 10:13:00 [只看该作者]

先学习,再工作,磨刀误不了砍柴工。

跳着看,只会让你愈看愈糊涂,踏踏实实学习,轻轻松松后来居上。


 回到顶部