- 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=108017)
-- 发布时间：2017/10/14 12:41:00
-- [求助]提示
老师好
此主题相关图片如下：图像 2.png
-- 发布时间：2017/10/14 14:13:00
--
这个无法控制
-- 发布时间：2017/10/14 15:06:00
--
以下是引用江南小镇在2017/10/14 12:41:00的发言：
此主题相关图片如下：图像 2.png
老师好
此主题相关图片如下：图像 2.png此主题相关图片如下：图像 9.png
-- 发布时间：2017/10/14 15:48:00
--
设置提示参考：http://www.foxtable.com/webhelp/scr/0857.htm
时间无法控制
-- 发布时间：2017/10/14 20:46:00
--
老师，重启动项目好了。
[此贴子已经被作者于2017/10/14 21:17:54编辑过]
-- 发布时间：2017/10/15 10:17:00
--
此主题相关图片如下：图像 3.png
老师好，用窗口按钮打开项目以外的文件时被打开的文件总是夹在项目和窗口的中间，要想查看必须关掉窗口才能浏览，麻烦的不得了，
[此贴子已经被作者于2017/10/15 11:25:16编辑过]
-- 发布时间：2017/10/15 14:38:00
--
方法一：
| 下载信息 [文件大小：308.0 KB 下载次数：6] | |
 点击浏览该文件:嵌入exe程序到自己的窗口.table |
方法二：
http://www.foxtable.com/webhelp/scr/2713.htm
-- 发布时间：2017/10/15 15:49:00
--
此主题相关图片如下：图像 4.png
-- 发布时间：2017/10/15 16:13:00
--
实例发上来测试。
-- 发布时间：2017/10/16 15:11:00
--
老师，我想在下面代码中加上验证代码。如果文件列的单元格已经有字段了就弹出对话框（有文件，要删除吗）点击是就删除原文件，如果否就返回并提示请在新增行中输入。
If GetConfigValue("文件夹路径1" & ComputerId,"") = "" Then
MessageBox.Show("请先指定存储路径!","提醒")
Return
Else
Dim dlg As new OpenFileDialog
If dlg.ShowDialog = DialogResult.OK Then
Dim i As Integer = dlg.FileName.LastIndexOf("\\")
Dim wjm As String = dlg.FileName.SubString(i+1)
Tables("文件管理").Current("文件") = wjm
e.Form.Controls("文件名").text = wjm
FileSys.CopyFile(dlg.FileName,e.Form.Controls("路径").text & "\\" & wjm,True)
Functions.Execute("文件管理") \'义函数名
End If
End If