n=adir(filearray,"*.rar")
if n<>0
  for i=1 to n
     *?filearray[i,1]
     
     run /n C:\Program Files\WinRAR\winrar.exe  x -ibck filearray[i,1]  
  endfor
endif  
提示
 *?filearray[i,1]
都能显示所有的.rar 文件，为什么会出现上述的提示

[此贴子已经被作者于2017-6-13 23:36编辑过]

filearray[i,1] 只是一个数组元素表达式，不是一个文件名。
试试用名字表达式：(filearray[i,1])。
或用宏替换。

C:\Program Files\WinRAR\winrar.exe  
是长文件名/路径名，要用引号圈起来，，，

吹水佬:试试用名字表达式：(filearray[i,1])。
或用宏替换。
红星二锅头:是长文件名/路径名，要用引号圈起来，，，
都修改了都不行，提示

用宏替换试试：
n=adir(filearray,"*.rar")
for i=1 to adir(filearray,"*.rar")
    cFile = filearray[i,1]
    run /n7 C:\Program Files\WinRAR\winrar.exe  x -ibck &cFile
endfor

filearray[i,1]是不含路径的文件名
如果对路径敏感，cFile要加上路径

如果文件名不符合WinRAR规范，文件名用双引号，如：cFile = ["c:\temp\test - tmp.rar"]

成功了，诚心诚意谢谢!

吹水佬班主“
又要麻烦您了，如果把N个XLS文件分别压缩到已有的N个RAR文件。

n=adir(filearray,"*.rar")
for i=1 to adir(filearray,"*.rar")
    cFile = filearray[i,1]
    *?cFile
   *?JUSTSTEM(JUSTFNAME("&cFile"))
   *?JUSTSTEM(JUSTSTEM(JUSTFNAME("&cFile")))+".dbf"
    run /n7 C:\Program Files\WinRAR\winrar.exe  a -ibck JUSTSTEM(JUSTFNAME("&cFile"))  JUSTSTEM(JUSTSTEM(JUSTFNAME("&cFile")))+".dbf"
endfor
为什么提示
附上附件：我的思路是N个rar中已有xls的文件，现在想把N个dbf文件分别压缩到对应的压缩包中去 如bmk065101.dbf 添加到bmk065101.xls.rar，bmk065102.db 添到bmk065102.xls.rar中.....。

一样用宏替换
FOR i=1 TO ADIR(filearray, "*.rar")
    cRAR = filearray[i,1]
    cDBF = LEFT(cRAR, AT(".",cRAR)) + "dbf"
    RUN /N7 "C:\Program Files\WinRAR\winrar.exe" a -ibck &cRAR &cDBF
ENDFOR

高!实在之高，太感谢!无私的指教，在另一个QQ群中请教要收红包才给你指教，真是一切向钱前。