Problemas con la salva

Oris
31 de Octubre del 2003
Necesito Ayuda para poder compactar y poder copiar el fichero que compacte, sin que me salga un mensaje de error, como si no estubiera cerrado el compactado.

Les voy a poner un ejemplo de unas lineas de programa:

dirfile=mdir+'scontrol.rar'
Delete File dirfile
!/n WinRar a -va &dirfile ---->Compacta y yo veo cuando se cierra
If Alltrim(dirr)='A:\'
MESSAGEBOX("Coloque el Disco en la torre A:")
Inkey(3)
dis=DiskSpace("A")
If dis=-1
MESSAGEBOX("La torre esta defectuosa o no esta lista")
Else
If file("scontrol.rar")
Copy file &dirfile to &dirr -----> No me permite copiar, porque me dice que esta abierto el fichero que compacte
Endif

Saludos, Oris