Advertisement
Guest User

Execute Programs

a guest
Jan 17th, 2013
105
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.48 KB | None | 0 0
  1. Let>INPUT_BROWSE=2
  2. Input>FolderSel,Please Select Required Folder
  3. If>FolderSel=
  4. Goto>Exit
  5. Else
  6. Endif
  7.  
  8. Let>RP_WAIT=1
  9. Let>RP_WINDOWMODE=0
  10. Let>RP_DISPLAYERROR=0
  11. DeleteFile>%TEMP_DIR%files.txt
  12. RunProgram>cmd /c dir "%FolderSel%\*.*" /a /on /b > "%TEMP_DIR%files.txt"
  13.  
  14. Let>RP_WAIT=1
  15. Let>RP_WINDOWMODE=1
  16. Let>LineNum=1
  17. While>line<>##EOF##
  18. ReadLn>%TEMP_DIR%files.txt,LineNum,line
  19. If>line<>##EOF##
  20. Run>%FolderSel%\line
  21. Endif
  22. Let>LineNum=LineNum+1
  23. EndWhile
  24.  
  25. Label>Exit
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement