SQL后台取值 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → SQL后台取值

共有8482人关注过本帖树形打印复制链接主题：SQL后台取值

有点蓝

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

加好友

发短信

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

Post By：2019/5/10 21:07:00 [显示全部帖子]

Dim je As String
改为
Dim je As Double

有点蓝

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

加好友

发短信

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

Post By：2019/7/9 20:33:00 [显示全部帖子]

cmd.CommandText = "se lect * from {" & bm & "} where 项目名称 = '" & xmmc & "'"

Tables("首页_Table4").DataSource = cmd.ExecuteReader() '生成一个临时表

Dim rgd As WinForm.RecordGrid = e.Form.Controls("RecordGrid1")

If bm = "JY_投标立项" Then

rgd.Table = Tables("首页_Table4") '绑定临时表 '这个如何绑定dt这个临时表

rgd.Columns = "项目名称|资质|区域|预算造价|到场人员"

End If

有点蓝

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

加好友

发短信

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

Post By：2019/7/18 9:03:00 [显示全部帖子]

没看出来这段代码和目录树有什么关系，贴出完整代码

有点蓝

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

加好友

发短信

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

Post By：2019/7/18 15:00:00 [显示全部帖子]

必须在加载之后设置

DataTables(e.Form.name & "_table1").DataCols("进度").SetFormat("0%")

有点蓝

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

加好友

发短信

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

Post By：2019/7/23 12:06:00 [显示全部帖子]

max = e.DataTable.SqlCompute

http://www.foxtable.com/webhelp/topics/2897.htm

有点蓝

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

加好友

发短信

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

Post By：2019/7/23 14:11:00 [显示全部帖子]

max = e.DataTable.sqlCompute("Max(档案编号)","档案编号 like '" & bh & "%' And [_Identify] <> " & e.DataRow("_Identify"))

有点蓝

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

加好友

发短信

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

Post By：2019/7/23 14:20:00 [显示全部帖子]

msgbox("档案编号 like '" & bh & "%' And [_Identify] <> " & e.DataRow("_Identify"))

显示什么内容？

[此贴子已经被作者于2019/7/23 14:19:51编辑过]

有点蓝

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

加好友

发短信

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

Post By：2019/7/23 14:37:00 [显示全部帖子]

这句代码不可能有问题，不是这里的问题。检查其他代码

有点蓝

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

加好友

发短信

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

Post By：2019/7/26 9:00:00 [显示全部帖子]

"投保金"列是数值型吧，会存入"已支付"这种值？

有点蓝

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

加好友

发短信

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

Post By：2019/8/5 20:21:00 [显示全部帖子]

FileSys.RenameFile只能重命名本地文件，对ftp无效，ftp参考：http://www.foxtable.com/webhelp/topics/1410.htm

先使用ftp.FileExists判断是否存在，存在则ftp.DeleteFile删除，再上传

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

总数 23 1 2 3 下一页

主题：SQL后台取值