Foxtable(狐表)用户栏目专家坐堂 → [求助]外部数据表


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

主题:[求助]外部数据表

帅哥哟,离线,有人找我吗?
江南小镇
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/7/13 17:33:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:保存按钮.txt

 

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/7/13 19:13:00 [显示全部帖子]

老师,没有提示。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:保存.rar
 

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/7/14 16:42:00 [显示全部帖子]

老师,还是保存不了。


Dim cmd As New SQLCommand
cmd.C
With e.form
    If .Controls("TextBox2").Value Is Nothing Then
        MsgBox("货品编码不能为空!",64,"提示")
    Else
        cmd.CommandText = "upd  ate 库存商品 set 货品编码 = '" & e.Form.Controls("TextBox2").text & "' where 货品类型='" & e.Form.Controls("TextBox3").text & "'"
        cmd.ExecuteNonQuery
        .Close()
        DataTables("窗口1_Table1").load
    End If
End With

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/7/14 22:05:00 [显示全部帖子]

老师,实在搞不懂,还是保存不了。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试.rar
 

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/7/15 7:37:00 [显示全部帖子]

老师,只能保存货品编码改变后的数据,不能和窗口表同步。本人水平太差盖了28楼还不能封顶,恳请老师帮忙,谢了。

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/7/15 9:43:00 [显示全部帖子]

老师,保存并关闭 "库存商品改",的窗口后不能刷新"窗口1"的 “窗口1_Table1”表 。货品类型列也修改不了。

 
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试.rar

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  17楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/7/15 19:38:00 [显示全部帖子]

老师,标出的不能刷新窗口表,修改货品编码、货品类型后该两列全部变成一样的字段了。

Dim cmd As New SQLCommand
cmd.C
With e.form
    If .Controls("TextBox2").Value Is Nothing Then
        MsgBox("货品编码不能为空!",64,"提示")
    Else
        cmd.CommandText = "upd  ate 库存商品 set 货品编码 = '" & e.Form.Controls("TextBox2") .text & "', 货品类型 = '" & e.Form.Controls("TextBox3").text & "'"
        cmd.ExecuteNonQuery
        DataTables("窗口1_Table1").load
        .Close()
    End If
End With

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  18楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/7/16 9:12:00 [显示全部帖子]

老师,你帮我加一下吧,谢谢了。

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  19楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/7/16 11:52:00 [显示全部帖子]

老师,能否把更新的条件说的明确一些,谢谢。

where 某某列='某某值'"

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  20楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1700 积分:11344 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2020/7/16 14:34:00 [显示全部帖子]

老师,序号的值怎么写。

where  序号 ='
某某值'"

 回到顶部
总数 27 上一页 1 2 3 下一页