linux判断两个文件是否相同,写shell怎么判断两个文件内容是否相同？如果相同则删除文件，如果不同则提示信息！...

复制文件和文件夹,然后判断是否成功

msgbox copy("c:\boot.ini", "d:\123.ini") '返回true则成功

function copy(filepatha as string, filepathb as string) as boolean

dim msg as integer

msg = vbyes

if dir(filepatha, 7) <> "" then '如果输入的路径是一个存在的文件

if dir(filepathb, 7) <> "" then msg = msgbox("文件" & filepathb & "已经存在,是否替换文件?", vbyesno, "文件已存在") '如果存在目标文件,添加存在询问语句,如果不需要就删掉

if msg = vbyes then '如果选了替换和不存在filepathb文件

if dir(filepathb, 7) <> "" then kill filepathb '如果存在filepathb,就删除filepathb文件

if dir(filepathb, 7) <> "" then '如果还存在filepathb文件(那么表示删除失败,文件被其他程序占用,覆盖也肯定失败)

msgbox filepathb & "文件正被使用,无法替换文件", 16, "复制失败" '弹出复制文件失败消息,如果不要可以删除

else

filecopy filepatha, filepathb '如果一切正常,就复制文件到目标

if dir(filepathb, 7) <> "" then copy = true '如果存在目标文件了,就说明复制成功,返回布尔值true

end if

end if

end if

end function

先给 文件复制的,今天太晚了, 要睡了, 明天还有事,这个东西 明天补齐,现在只能复制文件

◆◆

评论读取中....

请登录后再发表评论!

◆◆

修改失败，请稍后尝试