getfile()函数的疑问(6.0下)

[z4mbb]

我先创建了个文件为:d:\tz.xls

然后用"getdir()"函数通过选择要存储的径把d:\tz.xls存到任意想存的地方,但我发现,选择存"d:\"就会出现错误提示(提示不能创建文件).其它路径没事,这是怎么回事,不能覆盖吗?

命令如下:


ls=getdir('d:\','请选择要备份的文件夹')


copy file "d:\tz.xls" to "&ls.\*.*"

[十豆三]

Copy 操作前比较一下源路径和目标路径，如果相同提示一下并不执行 Copy 操作。

[sdjnjdxc]

测试了，代码没有问题。
当你选择了"d:\"时，相当于执行了：
copy file "d:\tz.xls" to "d:\tz.xls"
就会出现“不能创建文件”的错误

[十豆三]

ls=Getdir('d:\','请选择要备份的文件夹')
If "d:\tz.xls"="&ls.\tz.xls"
	Messagebox('源路径和目标路径相同，禁止操作',48,'信息提示')
	Return
Endif
Copy File "d:\tz.xls" To "&ls.\*.*"

[z4mbb]

[Quote=引用 3 楼 dfwxj 的回复:]
必须要写容错代码的~~~~~
[/Quote]

容错代码能帮我写出来吗?拜托！

[z4mbb]

[Quote=引用 2 楼 apple_8180 的回复:]
Copy 操作前比较一下源路径和目标路径，如果相同提示一下并不执行 Copy 操作。
[/Quote]

比较命令是哪个，我找了一天没找到，麻烦帮我写出来下，谢了！

[dfwxj]

必须要写容错代码的~~~~~