Foxtable(狐表)用户栏目专家坐堂 → [求助]文件


  共有2065人关注过本帖树形打印复制链接

主题:[求助]文件

帅哥哟,离线,有人找我吗?
江南小镇
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1765 积分:11811 威望:0 精华:0 注册:2015/6/22 8:11:00
[求助]文件  发帖心情 Post By:2024/1/15 19:00:00 [显示全部帖子]

老师,下面代码能添加打开图片文件的代码吗?

If GetConfigValue("文件夹路径1","") = "" Then
    MessageBox.Show("请先指定存储路径!","提醒")
    Return
End If

If Tables("文件管理").Current.isnull("文件") = True Then  '若未存储文件名
    MessageBox.Show("未上传文件!","提醒")
    Return
End If

If e.Form.Controls("文件名").text = "文件已被删除!" Then
    Tables("文件管理").Current("文件") = Nothing
    e.Form.Controls("文件名").text = "未上传文件!"
    e.Form.Controls("PictureBox1").image = getimage("other.png")
    Return
End If


msgbox(e.Form.Controls("路径").text)
msgbox(e.Form.Controls("文件名").text)
Dim proc As new Process
proc.File = e.Form.Controls("路径").text & "\" & Tables("文件管理").Current("文件")
proc.Start

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1765 积分:11811 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2024/1/16 12:34:00 [显示全部帖子]

老师好,图片打不开。

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1765 积分:11811 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2024/1/16 14:44:00 [显示全部帖子]

老师,其他文件能打开,就图片文件打不开。


.NET Framework 版本:2.0.50727.9174
Foxtable 版本:2017.4.22.1
错误所在事件:
详细错误信息:
系统找不到指定的文件。

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1765 积分:11811 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2024/1/16 19:42:00 [显示全部帖子]

老师,打开图片找不到应用程序。


错误所在事件:
详细错误信息:
找不到应用程序

 回到顶部
帅哥哟,离线,有人找我吗?
江南小镇
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1765 积分:11811 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2024/1/16 20:35:00 [显示全部帖子]

jpg

 回到顶部