Переименование файла.

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
alex shestov
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 109
Зарегистрирован: 25.04.2005 (Пн) 12:01

Переименование файла.

Сообщение alex shestov » 24.11.2005 (Чт) 9:48

Уважаемые, подскажите как мне средствами VBA переименовать файл. А то файлы нужные мня для импорта, приходят не с тем расширением. По сути нужно сменить расширение файла, с SAV на TXT, чтобы потом его импортнуть.

Расскажите как переименовать файлец.
Спасибо.

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 24.11.2005 (Чт) 9:55

Name
Lasciate ogni speranza, voi ch'entrate.

Хакер
Телепат
Телепат
Аватара пользователя
 
Сообщения: 16478
Зарегистрирован: 13.11.2005 (Вс) 2:43
Откуда: Казахстан, Петропавловск

Сообщение Хакер » 24.11.2005 (Чт) 11:57

alibek, конечно понятно что ты это знаешь, но вот alex shestov если задаёт такой вопрос, впервые слышет про Name и скорее всего попробует сделать так так:
Код: Выделить всё

Name("C:\DATA\GUGR.SAV", "C:\DATA\GUGR.TXT")


И получит ошибку Sub or Function not defined и скажет мысленно тебе "спасибо".

alex shestov, на всякий случай, знай что писать надо так:
Код: Выделить всё

Name "C:\DATA\GUGR.SAV" As "C:\DATA\GUGR.TXT"
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

alex shestov
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 109
Зарегистрирован: 25.04.2005 (Пн) 12:01

Сообщение alex shestov » 24.11.2005 (Чт) 12:06

Хакер писал(а):alibek, конечно понятно что ты это знаешь, но вот alex shestov если задаёт такой вопрос, впервые слышет про Name и скорее всего попробует сделать так так:
Код: Выделить всё
Name("C:\DATA\GUGR.SAV", "C:\DATA\GUGR.TXT")


И получит ошибку Sub or Function not defined и скажет мысленно тебе "спасибо".

alex shestov, на всякий случай, знай что писать надо так:
Код: Выделить всё
Name "C:\DATA\GUGR.SAV" As "C:\DATA\GUGR.TXT"


Спасибо обоим!

Алибек как всегда краток но точен! :wink:

Сделал через копирование, т.к. файл нужно было еще грабить с др. сетевого диска.


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 21

    TopList