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

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

Аватара для kotkovets

Ветеран


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

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


Цитата wolkow70:
Но как сделать, чтобы каждый раз ранее созданная папка Opera Backup автоматически переимеовывалась с новым именем »
Элементарно, вариант на счетчике:
Код: Выделить весь код
  ${If} ${FileExists} "$EXEDIR\Opera Backup"
      StrCpy $2 0 ;иницилизируем счетчик в нуль
      FindFirst $0 `$1` "$EXEDIR\Opera Backup*" ;поиск по маске Opera Backup
      ${Do}
          IntOp $2 $2 + 1 ;счетчик папок начинающийся с названия Opera Backup
          FindNext $0 `$1` 
      ${LoopUntil} $1 == ``
      FindClose $0 ;закрываем поиск
      ${If} $2 != 0
         Rename "$EXEDIR\Opera Backup" "$EXEDIR\Opera Backup_old$2" ;переименовываем предыдущую папку "Opera Backup"
         CreateDirectory "$EXEDIR\Opera Backup" ;создаем новую папку "Opera Backup"
      ${EndIf}
   ${Else}
      CreateDirectory "$EXEDIR\Opera Backup"
  ${EndIf}
вариант на макросе GetTime
Код: Выделить весь код
!include "filefunc.nsh"
OutFile "setup.exe"
var time_backup
Section
  ${GetTime} "" "L" $0 $1 $2 $3 $4 $5 $6
  StrCpy $time_backup "$0.$1.$2[$4.$5.$6]"
  CreateDirectory "$EXEDIR\Opera Backup_$time_backup"
SectionEnd

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

Это сообщение посчитали полезным следующие участники:

Отправлено: 17:46, 10-12-2011 | #2000