以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  保存程序设置  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=102009)

--  作者:peibaomin
--  发布时间:2017/6/11 21:53:00
--  保存程序设置
怎样设置关闭程序前保存系统设置呢? 比如启动程序前是否需要打开生日提醒窗体,是否提醒基于上一次的设置
--  作者:有点蓝
--  发布时间:2017/6/12 8:28:00
--  
1、自己做一个表专门保存需要的设置。根据需要获取或者更改这个设置以便进行后续处理,比如


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

使用:

Dim dr As DataRow = DataTables("表A").Find("设置名称=\'是否打开提醒窗口\' and 设置用户=\'" &  user.Name "\'")
If dr IsNot Nothing Then
    If dr("设置内容") = "是" Then Forms("提醒窗口").Open
End If

2、如果只有一两项设置,也可以使用SaveConfigValue,http://www.foxtable.com/webhelp/scr/1544.htm