Подскажите как переименовать папку в VB

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

Подскажите как переименовать папку в VB

Сообщение Brisvall » 02.12.2003 (Вт) 18:02

:cry: Подскажите как переименовать папку в VB

A.A.Z.
Член-корреспондент академии VBStreets
Член-корреспондент академии VBStreets
 
Сообщения: 3035
Зарегистрирован: 30.06.2003 (Пн) 13:38

Сообщение A.A.Z. » 02.12.2003 (Вт) 21:17

1)
Код: Выделить всё
Private Sub Form_Load()
Name "C:\12345" As "C:\54321"
End Sub


2)
Код: Выделить всё
Private Declare Function MoveFile Lib "kernel32" Alias "MoveFileA" (ByVal lpExistingFileName As String, ByVal lpNewFileName As String) As Long

Private Sub Form_Load()
MoveFile "C:\12345", "C:\54321"
End Sub


3)
Подключаешь в ссылках (Project->References / Проект->Ссылки) "Microsoft Scripting Runtime"
Код: Выделить всё
Private Sub Form_Load()
Dim FSO As New Scripting.FileSystemObject
FSO.MoveFile "C:\12345", "C:\54321"
End Sub


:idea:
Нет меня больше

skiperski
Идеолог
Идеолог
Аватара пользователя
 
Сообщения: 1386
Зарегистрирован: 25.06.2002 (Вт) 15:52

Сообщение skiperski » 03.12.2003 (Ср) 11:58

A.A.Z. писал(а):1)
Код: Выделить всё
Private Sub Form_Load()
Name "C:\12345" As "C:\54321"
End Sub


С последними двумя примерами всё ясно, а вот кто ещё кроме A.A.Z. знал о такой конструкции? Я, например, за пять лет ни разу её не встречал и сейчас приятно удивлён.

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

Сообщение alibek » 03.12.2003 (Ср) 13:01

skiperski, GWBasic надо было учить :) Там этот оператор был просто незаменим, т.к. выполнять команды DOS (типа Shell) он не умел и приходилось на полную катушку использовать все, что позволял GWBasic :)
Lasciate ogni speranza, voi ch'entrate.

skiperski
Идеолог
Идеолог
Аватара пользователя
 
Сообщения: 1386
Зарегистрирован: 25.06.2002 (Вт) 15:52

Сообщение skiperski » 03.12.2003 (Ср) 13:23

alibek писал(а):skiperski, GWBasic надо было учить :)

Каюсь, каюсь! А я по-незнанию начал с изучения Паскаля :(. Что теперь будет-то?


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

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

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 9

    TopList