标题:求教,将图片另存到桌面遇到的问题
只看楼主
igaoyuan
Rank: 2
等 级:论坛游民
帖 子:84
专家分:49
注 册:2022-12-19
得分:0 
回复 9楼 丁春秋yxp
我在win10x64下运行附件里的表单,操作三和四都可以正常保存,没有问题
Video_20230211164301.rar (850.45 KB)
2023-02-11 16:47
丁春秋yxp
Rank: 4
等 级:贵宾
威 望:10
帖 子:239
专家分:287
注 册:2017-10-31
得分:0 
以下是引用igaoyuan在2023-2-11 16:47:33的发言:

我在win10x64下运行附件里的表单,操作三和四都可以正常保存,没有问题

谢谢测试。你的另存为对话框一打开,查找范围那里默认就是桌面,其实是操作一,这没问题的。
其实后来我还发现,出问题是在选择桌面时,按的是左边那排里的桌面,如果是在计算机里找到的桌面,则也不会出问题。

[此贴子已经被作者于2023-2-11 22:21编辑过]

2023-02-11 22:20
igaoyuan
Rank: 2
等 级:论坛游民
帖 子:84
专家分:49
注 册:2022-12-19
得分:0 
以下是引用丁春秋yxp在2023-2-11 22:20:33的发言:


谢谢测试。你的另存为对话框一打开,查找范围那里默认就是桌面,其实是操作一,这没问题的。
其实后来我还发现,出问题是在选择桌面时,按的是左边那排里的桌面,如果是在计算机里找到的桌面,则也不会出问题。


默认是上一次退出时访问路径。
实际上是依赖getfile这个函数返回你的路径而已,可能是碰上路径字串里有空格、中文等等出现解析不完整,才会无法保存。

理论上按左边的桌面和计算机里的桌面路径,返回串值是一样的,你可以用这个 ? getfile('jpg','search my desktop') 命令测试一下
2023-02-11 22:33
丁春秋yxp
Rank: 4
等 级:贵宾
威 望:10
帖 子:239
专家分:287
注 册:2017-10-31
得分:0 
以下是引用igaoyuan在2023-2-11 22:33:35的发言:



默认是上一次退出时访问路径。
实际上是依赖getfile这个函数返回你的路径而已,可能是碰上路径字串里有空格、中文等等出现解析不完整,才会无法保存。

理论上按左边的桌面和计算机里的桌面路径,返回串值是一样的,你可以用这个 ? getfile('jpg','search my desktop') 命令测试一下

谢谢,试了半天,问题依旧,会不会是我的win11有问题(虽然我已将vfp改成兼容win7了),我再找台win7的试试。
使用 ?getfile('jpg','search my desktop')来查看,运行结果与提出的问题一样,仿照操作三、四来做,也出了同样的问题。
2023-02-11 22:46
sam_jiang
Rank: 8Rank: 8
等 级:贵宾
威 望:10
帖 子:542
专家分:781
注 册:2021-10-13
得分:20 
我在我的电脑上运行了这个程序,发现没有楼主所说的问题。

另外,getfile函数不能填写默认文件名,你可以试试putfile函数!

usage:
PUTFILE([cCustomText] [, cFileName] [, cFileExtensions])
2023-02-12 18:57
igaoyuan
Rank: 2
等 级:论坛游民
帖 子:84
专家分:49
注 册:2022-12-19
得分:0 
回复 14楼 丁春秋yxp
试过在win11下保存没有问题,估计是用户权限设置问题,当前用户可能没有桌面文件夹写的权限,可以尝试以管理员身份运行vfp的快捷方式
2023-02-12 20:06
igaoyuan
Rank: 2
等 级:论坛游民
帖 子:84
专家分:49
注 册:2022-12-19
得分:0 
以下是引用sam_jiang在2023-2-12 18:57:14的发言:

我在我的电脑上运行了这个程序,发现没有楼主所说的问题。

另外,getfile函数不能填写默认文件名,你可以试试putfile函数!

usage:
PUTFILE([cCustomText] [, cFileName] [, cFileExtensions])

好办法!
2023-02-12 20:07
zhken
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:11
帖 子:273
专家分:594
注 册:2012-9-21
得分:0 
可以试试 改变路径,这样子
wsh = Createobject("WSCRIPT.SHELL")
ML_=wsh.SpecialFolders("desktop")
ML_1=sys(5)+sys(2003)+'\'
cd '&ML_'
file_temp=getfile('txt')
cd &ML_1 &&返回当前目录
2023-02-12 20:56
laowan001
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:54
帖 子:802
专家分:1914
注 册:2015-12-30
得分:0 
以下是引用丁春秋yxp在2023-2-11 16:22:46的发言:


请问有没有办法解决

我的办法是躲着走
2023-02-12 21:50
丁春秋yxp
Rank: 4
等 级:贵宾
威 望:10
帖 子:239
专家分:287
注 册:2017-10-31
得分:0 
以下是引用sam_jiang在2023-2-12 18:57:14的发言:

我在我的电脑上运行了这个程序,发现没有楼主所说的问题。

另外,getfile函数不能填写默认文件名,你可以试试putfile函数!

usage:
PUTFILE([cCustomText] [, cFileName] [, cFileExtensions])


换成putfile后所有问题迎刃而解。非常非常感谢指导。
2023-02-13 11:09



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-511255-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.096716 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved