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

today2004

$run = InputBox("提示","请输入一个路径","d:\bak","",400,150)
If Not FileExists($run) Then DirCreate($run)
FileCopy("temp\*.jpg",$run)
后加什么语句判断复制完成后提示复制完成啊

[ 本帖最后由 today2004 于 2008-12-19 09:47 编辑 ]

TonyW

不知道能不能用对比文件的方式来做判断？
对比原文件的大小和新copy的文件的大小来判断？如果相等就提示，否则怎么样怎么样的。。 小弟是超级新手。说错了不要怪我！！

大绯狼

加个MSGBOX啊。。。。。。。。

范统.贾

2楼的方法貌似不错。
如果后面加MSGBOX，是复制完成后才执行MSGBOX，还是刚执行完上一语句，开始复制的时候就MSGBOX呢？
要有FILECOPYWAIT就好了，像RUNWAIT一样。哈哈。

78391493

$copy = FileCopy("temp\*.jpg",$run)
if $copy = 1 then
msgbox(0,"复制","复制成功")
else
msgbox(0,"复制","复制失败")
endif

sanhen

直接调用系统的复制对话框不就行了？

sht123960585

怎么调用系统复制对话框？？？？

笨笨℃

[/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