- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 关于初始问题 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=149938)
-- 发布时间：2020/5/15 19:28:00
-- 关于初始问题
| Syscmd.Project.Initialize() | 初始化项目 |
-- 发布时间：2020/5/15 19:33:00
--
1.窗口上的“初始化”按键事件：Syscmd.Project.Initialize()，选中表，30张表，确认执行，一张提示一次，按一下确认，关键没有清空表的内容，如何解决？
2.防止误操作或恶意操作，想在“初始化”按键，单击它之前，输入密码，才能进入初始化，这个怎么实现？谢谢
-- 发布时间：2020/5/16 8:33:00
--
1、我测试没有问题，上传实例说明
2、只有自定义用户管理才做得到，导入系统菜单，改“初始化”按键代码：http://www.foxtable.com/webhelp/topics/2435.htm
Dim pwd As String
If InputPassWord(pwd,"提示","请输入密码:") Then
if pwd = "888" then
If InputPassWord(pwd,"提示","请输入密码:") Then
if pwd = "888" then
Syscmd.Project.Initialize()
end if
End If
End If
-- 发布时间：2020/5/16 9:27:00
--
初始后，报错
.NET Framework 版本：4.0.30319.42000
Foxtable 版本：2019.12.17.18
错误所在事件：项目,AfterOpenProject
详细错误信息：
此行已从表中移除并且没有任何数据。BeginEdit() 将允许在此行中创建新数据
此主题相关图片如下：初始化.jpg
-- 发布时间：2020/5/16 9:36:00
--
AfterOpenProject事件有问题，检查代码
-- 发布时间：2020/5/16 9:53:00
--
AfterOpenProject事件有放这些代码：
\'Tables("订单登记主表").Sort = "订单登记单号"
Forms("系统界面").Open()
If User.Type <> UserTypeEnum.Developer
TableCaptionVisible = False
End If
-- 发布时间：2020/5/16 9:58:00
--
检查"系统界面"窗口afterload事件
-- 发布时间：2020/5/16 10:48:00
--
1.
检查"系统界面"窗口afterload事件： |
2，初始化是一个表提示一个确认，有100张表要确认100次，真的费用，不友好，是否可以，类于面前提到，进入初始化，要有密码，按确认键，再提示，是否初始化的安全提示，让用户确认后，批量执行，不要一张一个确认
-- 发布时间：2020/5/16 11:34:00
--
自己写代码清空表格数据
for each dt as datatable in datatables
dt.datarows.clear
next