以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- [求助]文件 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=190085) |
-- 作者:江南小镇 -- 发布时间: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
|
-- 作者:有点蓝 -- 发布时间:2024/1/15 20:18:00 -- 最后3行就是打开文件的代码,有啥问题? |
-- 作者:江南小镇 -- 发布时间:2024/1/16 12:34:00 -- 老师好,图片打不开。 |
-- 作者:有点蓝 -- 发布时间:2024/1/16 13:30:00 -- 提示什么错误? |
-- 作者:江南小镇 -- 发布时间:2024/1/16 14:44:00 -- 老师,其他文件能打开,就图片文件打不开。 .NET Framework 版本:2.0.50727.9174 Foxtable 版本:2017.4.22.1 错误所在事件: 详细错误信息: 系统找不到指定的文件。
|
-- 作者:有点蓝 -- 发布时间:2024/1/16 14:54:00 -- 说明合成的路径不正确,不存在这个文件 msgbox(e.Form.Controls("路径").text & "\\" & Tables("文件管理").Current("文件")) |
-- 作者:江南小镇 -- 发布时间:2024/1/16 19:42:00 -- 老师,打开图片找不到应用程序。 错误所在事件: 详细错误信息: 找不到应用程序
|
-- 作者:有点蓝 -- 发布时间:2024/1/16 20:07:00 -- 什么扩展名的文件?电脑没有安装默认打开这种类型文件的程序 |
-- 作者:江南小镇 -- 发布时间:2024/1/16 20:35:00 -- jpg |
-- 作者:有点蓝 -- 发布时间:2024/1/16 20:37:00 -- 电脑的文件关联有问题,或者没有设置默认打开jpg文件的程序 |