SQLTable 的sel*ect语句如何写呢 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → SQLTable 的sel*ect语句如何写呢

共有2573人关注过本帖树形打印复制链接主题：SQLTable 的sel*ect语句如何写呢

蓝蚂蚁

小大 11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：672 积分：7885 威望：0 精华：0 注册：2016/6/11 11:10:00

Post By：2020/4/14 9:05:00 [只看该作者]

老师我做了例子麻烦你帮帮忙看看目录对配送企业窗口中的保存按钮的代码如何写谢了

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目1.zip

有点蓝

小大 12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：107479 积分：546674 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/4/14 10:12:00 [只看该作者]

比如

Dim cmd As new SQLCommand

Dim r As Row = e.Form.Controls("Table1").Table.current

cmd.CommandText = "UPDATE 目录 SET 名称 = ?,规格 = ? WHERE 目录编号 = ?"

cmd.Parameters.Add("@名称",r("名称"))

cmd.Parameters.Add("@规格",r("规格"))

cmd.Parameters.Add("@目录编号",r("目录编号"))

cmd.ExecuteNonQuery

或者

Dim r As Row = e.Form.Controls("Table1").Table.current

dim dr as datarow = datatables("目录").sqlfind("目录编号='" & r("目录编号") & "'")

if dr isnot nothing then

dr("名称") = r("名称")

dr.save

end if

蓝蚂蚁

小大 13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：三尾狐帖子：672 积分：7885 威望：0 精华：0 注册：2016/6/11 11:10:00

Post By：2020/4/14 10:47:00 [只看该作者]

能按我的思路解决问题了，但还有点不足的地方：假如目录表有十几列，每列都有可能修改，每一个列名都一一对上去，显得有点麻烦，能不能类似这样： dr2(dc.Name) = dr1(dc.name) 这样不管有多少列都很方便。

[此贴子已经被作者于2020/4/14 10:47:01编辑过]

有点蓝

小大 14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：107479 积分：546674 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/4/14 11:00:00 [只看该作者]

参考：http://www.foxtable.com/webhelp/topics/1533.htm

下一主题 >> << 上一主题

总数 14 上一页 1 2

主题：SQLTable 的sel*ect语句如何写呢