Foxtable(狐表)用户栏目专家坐堂 → 求教,通过表单添加数据库数据


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

主题:求教,通过表单添加数据库数据

帅哥哟,离线,有人找我吗?
cqyanglm
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:101 积分:740 威望:0 精华:0 注册:2013/5/4 13:10:00
求教,通过表单添加数据库数据  发帖心情 Post By:2013/5/8 13:11:00 [只看该作者]

求教,谢谢了

现在,设计好一个窗口,窗口内有一个表A及添加按钮,当在表A内输入数据后

按添加按钮,数据可被保存在数据库对应的字段内。

如图:图1表A  ,图2 ACCESS数据库

 


图片点击可在新窗口打开查看此主题相关图片如下:03.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:04.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:八尾狐 帖子:1812 积分:12993 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2013/5/8 13:25:00 [只看该作者]

大概如此:

For  r1 as row In Tables("A").Rows
   Dim SQL as string ="UPDATE {订单} SET 当月用电量 =" & r1("当月用电量") & "," & "当月用水量 =" & r1("当月用水量") & " WHERE 工序 = '" & r1("工序") & "'"
    Dim cmd As New SQLCommand
    cmd.ConnectionName =
"region"

   cmd.CommandText = SQL

   cmd.ExecuteNonQuery()
Next


DataTables("订单").Load





 回到顶部