ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Создание папок
8 сообщений из 8, страница 1 из 1
Создание папок
    #34691246
Mazai-XZ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Mazai-XZ
Гость
Подскажите, пожалуйста как программно создать папку, и сразу после этого создать вторую папку в ранее созданной папке? в смысле нужно следующее: есть диск С:\ создаём на нём папку А (получаем С:\А) потом в папке А создаём папку Б (должно получиться С:\А\Б) Папку А создать не проблема Dim fso As New FileSystemObject, fldr As Folder, s As String
FolN = InputBox("Создание новой папки", "Введите имя новой папки")
fso.CreateFolder (Dir2.Path & "\" & FolN)
Dir2.Refresh
...
Рейтинг: 0 / 0
29.07.2007, 19:23
| Ответить | Цитировать | Написать  
Создание папок
    #34691247
Mazai-XZ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Mazai-XZ
Гость
Подскажите, пожалуйста как программно создать папку, и сразу после этого создать вторую папку в ранее созданной папке? в смысле нужно следующее: есть диск С:\ создаём на нём папку А (получаем С:\А) потом в папке А создаём папку Б (должно получиться С:\А\Б) Папку А создать не проблема

Dim fso As New FileSystemObject, fldr As Folder, s As String
DirN = "Data"
fso.CreateFolder (App.Path & "\" & DirN)
End Sub

создаётся папка Data в папке с программой, а нужно чтоб в этой папке (Data) была создана ещё и папка "Files"
...
Рейтинг: 0 / 0
29.07.2007, 19:26
| Ответить | Цитировать | Написать  
Создание папок
    #34691267
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
Mazai-XZ нужно следующее: есть диск С:\ создаём на нём папку А (получаем С:\А) потом в папке А создаём папку Б (должно получиться С:\А\Б)

Mazai-XZ
Dim fso As New FileSystemObject, fldr As Folder, s As String
DirN = "Data"
fso.CreateFolder (App.Path & "\" & DirN)
End Sub
создаётся папка Data в папке с программой, а нужно чтоб в этой папке (Data) была создана ещё и папка "Files"
Так вам нужно в корне диска С создать папку, или в папке с программой ?
В любом случае в продолжение вашего кода
DirN = "Folder1"
fso.CreateFolder (App.Path & "\Data\" & DirN)
ну можно и покрасивее , но суть та же.
...
Рейтинг: 0 / 0
29.07.2007, 19:49
| Ответить | Цитировать | Написать  
Создание папок
    #34691640
Фотография gjghjc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gjghjc
Участник
Код: plaintext
1.
mkdir "C:\A\"
mkdir "C:\A\B\"

С уважением, Николай.
...
Рейтинг: 0 / 0
30.07.2007, 09:43
| Ответить | Цитировать | Написать  
Создание папок
    #34692445
Mazai-XZ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Mazai-XZ
Гость
В папке с программой, да и вообще в любом нужгом месте... просто принцип понять не могу (
Попробовал ВАШ метод, но к сожалению ругается на пусть, пишет Path not Found ...
Но всё-равно спасибо за участие )
...
Рейтинг: 0 / 0
30.07.2007, 13:02
| Ответить | Цитировать | Написать  
Создание папок
    #34692461
Mazai-XZ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Mazai-XZ
Гость
[quot gjghjc]
Код: plaintext
1.
mkdir "C:\A\"
mkdir "C:\A\B\"

ААААААААААА!!! Гениально!!! Пашет! )) блин, а я и не подозревал, что VB скушает досовские комманды ) Спасибо огромное!!! Буду мутить с App.Path
Огромное сасибо! )
...
Рейтинг: 0 / 0
30.07.2007, 13:05
| Ответить | Цитировать | Написать  
Создание папок
    #34692491
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
big-duke
Участник
Код: plaintext
1.
2.
3.
4.
5.
Dim f As New FileSystemObject
Dim strDir1 As String, strDir2 As String
strDir1 = "dir1": strDir2 = "dir2"
f.CreateFolder App.Path & "\" & strDir1
f.CreateFolder App.Path & "\" & strDir1 & "\" & strDir2
В какой строке ошибка ?
...
Рейтинг: 0 / 0
30.07.2007, 13:12
| Ответить | Цитировать | Написать  
Создание папок
    #34692784
Фотография gjghjc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
gjghjc
Участник
ну так до кучи
http://vbnet.ru/vbguide/

С уважением, Николай.
...
Рейтинг: 0 / 0
30.07.2007, 14:22
| Ответить | Цитировать | Написать  
8 сообщений из 8, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Создание папок
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&fpage=225&tid=2163670]:
 0ms
get settings:
 7ms
get forum list:
 16ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 45ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 53ms
get tp. blocked users:
 2ms
others: 232ms
total:  376ms
созд. / загр.: 376ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]