Aida Yo también pase por lo mismo, y en el foro encontré respuestas, hice una pequeña variación que muestro y quedó así: Descomprime(cFileZip,cPathDesempaque) FUNCTION Descomprime(cFile,cPathDescarga) LOCAL oDlg,nFiles,aFiles,oText, cMsg, oMeter,nActual:=0 DEFAULT cPathDescarga:="E:\" IF F...