Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Создание папки с именем = сегодняшнему числу. Добавлено: 21.03.03 16:02  

Автор вопроса:  Acid | ICQ: 333714175 

Привет Добры люди! Помощь необходима, следующего плана: Нужно чтобы Vb файл запускался, создавал папку например подобную "21.03.2003" и закрывался.

Я в Vb очень недавно, может чем поможите. Спасибо заранее всем откликнувшимся.

Ответить

  Ответы Всего ответов: 3  

Номер ответа: 1
Автор ответа:
 Bratok



ICQ: 5585601 

Вопросов: 0
Ответов: 15
  Профиль | Цитата | #1 Добавлено: 21.03.03 17:10

Private Sub Command1_Click()
On Error GoTo errorfolder:
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CreateFolder "c:\" & Date
errorfolder:
If Err = 58 Then MsgBox "File already exists"
Exit Sub
End Sub

Мог бы в Библиотеке кодов посмотреть, я сам оттуда содрал...

Ответить

Номер ответа: 2
Автор ответа:
 Илья



ICQ: 251647191 

Вопросов: 37
Ответов: 167
  Web-сайт: www.lirc.narod.ru
 Профиль | Цитата | #2 		Добавлено: 22.03.03 16:13

Dim fold as String

fold = date

MkDir "C:\" & fold

Ответить

Номер ответа: 3
Автор ответа:
 Алексей



black  admin

ICQ: 261779681 

Вопросов: 87
Ответов: 633
  Web-сайт: aleksey.nemiro.ru
 Профиль | Цитата | #3 		Добавлено: 23.03.03 04:41

MkDir App.Patch & "\" & Now 'Создает папку с ичслом и временем в папке в которой находится программа

 

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам