Как создать папку?

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

Как создать папку?

Сообщение zaf » 23.05.2006 (Вт) 16:55

Добрый день!

Подскижите как можно создать папку?

Вот например тут "C:\" нужно создать папку "Path" как это сделать?

GB826
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 312
Зарегистрирован: 04.08.2005 (Чт) 0:58
Откуда: Планета #3

Сообщение GB826 » 23.05.2006 (Вт) 17:00

выбирай
MkDir
FileSystemObject
Пора уже всем хорошим людям собраться и убить всех плохих людей.

BV
Thinker
Thinker
Аватара пользователя
 
Сообщения: 3987
Зарегистрирован: 12.09.2004 (Вс) 0:55
Откуда: Молдавия, г. Кишинёв

Сообщение BV » 23.05.2006 (Вт) 17:21

...CreateDirectory
const char *out = "|*0>78-,+<|"; size_t cc = char_traits<char>::length(out);
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;

kolian22
Начинающий
Начинающий
Аватара пользователя
 
Сообщения: 6
Зарегистрирован: 21.05.2006 (Вс) 11:16

Сообщение kolian22 » 26.05.2006 (Пт) 4:01

BV
CreateDirectory ето где в cmd или WC\NC ,API?

kolian22
Начинающий
Начинающий
Аватара пользователя
 
Сообщения: 6
Зарегистрирован: 21.05.2006 (Вс) 11:16

Сообщение kolian22 » 26.05.2006 (Пт) 5:58

:D
Dim fso As New FileSystemObject
fso.CreateFolder ("Путь")
'Работа с папкой
Dim fld As Folder
'fld.copy например скопировать файл

BV
Thinker
Thinker
Аватара пользователя
 
Сообщения: 3987
Зарегистрирован: 12.09.2004 (Вс) 0:55
Откуда: Молдавия, г. Кишинёв

Сообщение BV » 26.05.2006 (Пт) 14:28

kolian22 писал(а):CreateDirectory ето где в cmd или WC\NC ,API?


Это здесь.
const char *out = "|*0>78-,+<|"; size_t cc = char_traits<char>::length(out);
for (size_t i=0;i<cc;i++){cout<<static_cast<char>((out[i]^89));}cout<<endl;

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

Сообщение Хакер » 26.05.2006 (Пт) 14:53

А через неделю будет наверное вопрос как удалить папку, с таким текстом
Как мне удалить папку? Я пробовал Kill но мне ВБ выдаёт ошибку.
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

kolian22
Начинающий
Начинающий
Аватара пользователя
 
Сообщения: 6
Зарегистрирован: 21.05.2006 (Вс) 11:16

Сообщение kolian22 » 27.05.2006 (Сб) 11:52

Хакер писал(а):А через неделю будет наверное вопрос как удалить папку, с таким текстом
Как мне удалить папку? Я пробовал Kill но мне ВБ выдаёт ошибку.

Надо чтобы в папке небыло файлов.
Или попробуй через FSO

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

Сообщение Хакер » 27.05.2006 (Сб) 12:31

kolian22, это ты МНЕ говориш ? :lol:
—We separate their smiling faces from the rest of their body, Captain.
—That's right! We decapitate them.

--=GAMER=--
Фиолетовый бот
Фиолетовый бот
Аватара пользователя
 
Сообщения: 810
Зарегистрирован: 22.03.2004 (Пн) 11:29
Откуда: Владивосток

Сообщение --=GAMER=-- » 27.05.2006 (Сб) 12:45

А как вам :

vb6.0 sp6 pro. ed. писал(а):User-Defined type not defined


Слабо???
В темноте слепец — самый надежный проводник. В эпоху безумия пусть тебя ведет сумасшедший.

rRenderer Engine
VB Wiki

vvs_adm
Гуру
Гуру
Аватара пользователя
 
Сообщения: 1492
Зарегистрирован: 03.02.2005 (Чт) 3:45
Откуда: оттуда ;)

Сообщение vvs_adm » 27.05.2006 (Сб) 20:13

--=GAMER=-- А как вам: попытаться подумать и поискать, а не копи\пасте?
Подсказка: надо что-то подключить где-то...
Никогда не откладывай на завтра то, что можно ... отложить на послезавтра!

Dex
Постоялец
Постоялец
 
Сообщения: 346
Зарегистрирован: 09.08.2004 (Пн) 16:11

Сообщение Dex » 28.05.2006 (Вс) 1:47

zaf напиши пожалуста в vb mkdir и поставь скобочку которая открывается имхо '(' (без ковычек), затем поставь двойные ковычки имхо '"' (без ковычек)? затем пиши путь там где хочешь создать папку и не забудь обязательно указать имя папки а потом поставь ковыки и скобоку которая закрывется.
Дотупно объяснил.
Project->References->Microsoft Scripting Runtime - ставишь галочку, жмёшь кнопочку ОК
а дольше делаешь то что написал kolian22
Тебе мало этого? Вот специально для тебя вариант:
Код: Выделить всё
Dim s$, c$, f$
s$ = "C:\asd": c$ = "/C": f$ = "mkdir"
Shell Environ("windir") & "\System32\cmd.exe" & Chr(32) & c$ & Chr(32) & f$ & Chr(32) & s$

где s$ путь к папке

--=GAMER=--
Фиолетовый бот
Фиолетовый бот
Аватара пользователя
 
Сообщения: 810
Зарегистрирован: 22.03.2004 (Пн) 11:29
Откуда: Владивосток

Сообщение --=GAMER=-- » 28.05.2006 (Вс) 1:49

vvs_adm
Не напрягайся это шутка была :wink:
В темноте слепец — самый надежный проводник. В эпоху безумия пусть тебя ведет сумасшедший.

rRenderer Engine
VB Wiki


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

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

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

    TopList