Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для kotkovets

Ветеран


Сообщения: 1216
Благодарности: 486

Профиль | Отправить PM | Цитировать


Цитата dix75:
но мне нужно чтобы в папке небыло папок а файлы могут быть »
ну можно как-то так
Код: Выделить весь код
!include "FileFunc.nsh"
!include "LogicLib.nsh"

Function FindEpmty
   Intop $R0 $R0 + 1
   Push $0
FunctionEnd

Section
StrCpy $R0 0
ClearErrors
${Locate} "путь к папке" "/L=DE" "FindEpmty"
 IfErrors 0 +2
 StrCpy $R0 -1
${If} $R0 == -1
      MessageBox MB_OK "указываемая папка не существует" IDOK
${ElseIf} $R0 == 0
      MessageBox MB_OK "В указываемой папке нет вложенных папок или папки не пусты" IDOK
${ElseIf} $R0 > 0
   MessageBox MB_OK "В указываемой папке есть пустые вложенные папки(папка)" IDOK
${EndIf}
SectionEnd
В справке читайте - Locate, там все подробнее расписано.
---
зы.
каждая пустая папка увеличивает $R0 на единицу.

-------
Спасибо ВСЕМ за то, что тратите свое время, что бы ПОМОЧЬ МНЕ.


Отправлено: 15:17, 04-07-2012 | #2870