Серый форум — VBS:Автоматическое создание папок из полей таблицы c помощью VBS

Re: VBS:Автоматическое создание папок из полей таблицы c помощью VBS

null@example.com (JSmаn) — Tue, 05 Jul 2011 06:46:01 +0000

Язык программирования в заголовке укажите, как это делают остальные.

Re: VBS:Автоматическое создание папок из полей таблицы c помощью VBS

null@example.com (NecroTYN) — Mon, 04 Jul 2011 14:24:39 +0000

на одном из форумов составили вот такой вот код,но чёт не работает:

Set FSO = CreateObject("Scripting.FileSystemObject")

strPath="C:\Documents"
If Not FSO.FolderExists(strPath) Then FSO.CreateFolder(strPath)
strPath=strPath & "\Заказы"
If Not FSO.FolderExists(strPath) Then FSO.CreateFolder(strPath)
strPath=strPath &"\"& WScript.Arguments(0)
If Not FSO.FolderExists(strPath) Then FSO.CreateFolder(strPath)
strPath=strPath &"\"& WScript.Arguments(1)
If Not FSO.FolderExists(strPath) Then FSO.CreateFolder(strPath)
strPath=strPath &"\"& WScript.Arguments(2)
If Not FSO.FolderExists(strPath) Then FSO.CreateFolder(strPath)

К сожалению Я не знаю языков программирования, и не могу ничего откомментировать

VBS:Автоматическое создание папок из полей таблицы c помощью VBS

null@example.com (NecroTYN) — Mon, 04 Jul 2011 13:34:38 +0000

Здравствуйте Господа программисты!!!

Очень нужна ваша помощь в следующем вопросе:

Есть программа работающая с базой данных Access, включающая в себя следующие таблицы: ... Заказы,продукты....

Нужно создать скрипт VBS чтобы при создании ЗАКАЗА автоматически создавалась группа папок в определенном месте диска (D:\Documents\Заказы\...), а имена этих папок создавались бы из определенных полей таблиц. Например:
после создания заказа должны появится папки по указанному пути с таким вот именем:
D:\Documents\Заказы\ул.Красная\Сергеев\
где ул.Красная это адрес клиента(Поле "Адресс" в таблице "Заказы", Сергеев это Фамилия клиента(Поле "Клиент"в таблице заказы).
В папке "Сергеев" в свою очередь создаются папки (Стойка компьютерная,Стол письменный,Шкаф купе), имена которых берутся из таблицы "продукты" (в которой мы собственно и составляем заказ), каждая из которых содержит в себе еще 4 папки с неизменными названиями(Замер,Модель,Раскрой,Эскизы,Документы)....

имя 1ой и 2ой папки-берется из таблицы tblOrders - Address

имя 3ей папки-берется из таблицы tblOrdersProducts - Product

"третьих" папок должно создаваться столько, сколько заказано продуктов, за исключением услуг(которые кстати тоже находятся в таблице tblOrdersProducts), в каждой из них создаются следующие папки:

Замер
Модель
Раскрой
Эскизы
Документы

С нетерпением жду ответа