找回密码
 加入
搜索
查看: 2248|回复: 7

如何实现在复制完成后提示复制完成啊

[复制链接]
发表于 2008-12-19 00:03:07 | 显示全部楼层 |阅读模式
$run = InputBox("提示","请输入一个路径","d:\bak","",400,150)
If Not FileExists($run) Then DirCreate($run)
FileCopy("temp\*.jpg",$run)
后加什么语句判断复制完成后提示复制完成啊

[ 本帖最后由 today2004 于 2008-12-19 09:47 编辑 ]
发表于 2008-12-19 02:30:53 | 显示全部楼层
不知道能不能用对比文件的方式来做判断?
对比原文件的大小和新copy的文件的大小来判断?如果相等就提示,否则怎么样怎么样的。。 小弟是超级新手。说错了不要怪我!!
发表于 2008-12-19 12:43:37 | 显示全部楼层
加个MSGBOX啊。。。。。。。。
发表于 2008-12-19 17:50:01 | 显示全部楼层
2楼的方法貌似不错。
如果后面加MSGBOX,是复制完成后才执行MSGBOX,还是刚执行完上一语句,开始复制的时候就MSGBOX呢?
要有FILECOPYWAIT就好了,像RUNWAIT一样。哈哈。
发表于 2008-12-19 19:19:28 | 显示全部楼层
$copy = FileCopy("temp\*.jpg",$run)
if $copy = 1 then
msgbox(0,"复制","复制成功")
else
msgbox(0,"复制","复制失败")
endif
发表于 2008-12-19 19:37:32 | 显示全部楼层
直接调用系统的复制对话框不就行了?
发表于 2008-12-19 19:57:31 | 显示全部楼层
怎么调用系统复制对话框????
发表于 2008-12-20 12:26:04 | 显示全部楼层
[/au3]
原帖由 78391493 于 2008-12-19 19:19 发表
$copy = FileCopy("temp\*.jpg",$run)
if $copy = 1 then
msgbox(0,"复制","复制成功")
else
msgbox(0,"复制","复制失败")
endif


  我喜欢这样写

If FileCopy("a.jpg",$run)=1 Then
        MsgBox(0,"","yes")
Else
        MsgBox(0,"","no")
EndIf
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-12-23 11:34 , Processed in 0.088133 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表