| Вопрос: RenameFile | Добавлено: 09.09.02 11:34 |
Автор вопроса:  spektr
|
|
Подскажите как переименовать файл например есть файл 123.rar программа проверила, что он существует и переименовала его 124.rar и так дальше 125, 126.... |
| Ответы | Всего ответов: 2 |
|
Номер ответа: 1 Автор ответа:  MAGNUS Вопросов: 12 Ответов: 430 |
Профиль | | #1 | Добавлено: 09.09.02 15:39 |
|
Можно попробовать так: FileCopy app.Path & "\123.txt",app.Path & "\124.txt" kill app.Path & "\123.txt". Это не идеал конечно , но зато работает |
||
. А вместо имен пихай переменные и вцикл его! 
|
Номер ответа: 2 Автор ответа:  LISВопросов: 7 Ответов: 256 |
Профиль | | #2 | Добавлено: 09.09.02 15:43 |
|
' Use command NAME ... Dim nm As String Private Sub Form_Load() nm = Dir("c:\dbu\tmp.hlp") If Trim(nm) <> vbNullString Then ' create new name .... Name "c:\dbu\" + nm As "c:\dbu\"+ 'new name End If
End Sub Good LUCK !!! |
||
Страница: 1 |