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

   
   
     

Форум - ASP и VBScript

Страница: 1 | 2 |

 

  Вопрос: скрипт обработка файлов на VBS Добавлено: 20.01.10 15:17  

Автор вопроса:  Alexander

Ответить

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

Номер ответа: 16
Автор ответа:
 AxeL



ICQ: 264730390 

Вопросов: 2
Ответов: 106
  Профиль | | #16 Добавлено: 26.01.10 02:51
Кстати, зачем тебе такое количество объектов fso? И одного хватит...
Ps Внимательней следи за вложениями If ... End If и For ... Next, а так же за объектами.

Ответить

Номер ответа: 17
Автор ответа:
 AxeL



ICQ: 264730390 

Вопросов: 2
Ответов: 106
  Профиль | | #17 Добавлено: 26.01.10 03:42
Убрал все рожицы - заметил Next... (чтобы не появлялись рожицы, в следующий раз потрудись нажать кнопку "Код";)
По твоему коду получаеся, что все штрихкоды (в количестве больше одного) будут копироваться в combined... Ты действительно этого хочешь? Тогда можно просто склеить ВСЕ файлы в один combined... или ты хочешь склеивать в barcode & "_combined"? Убери лишние проверки
  1. If filesys.FileExists(File) Then
  2. filesys.CopyFile File, newFileName
  3. End if
в любом случае будет существовать, если ты циклом
  1. For Each file In files
перебираешь ВСЕ СУЩЕСТВУЮЩИЕ файлы в папке. Аналогично
  1. If filesys.FileExists(oldoldFileName) Then
  2. filesys.CopyFile oldoldFileName, newFileName
  3. end if
проверяешь существование ВХОДНОГО, файла, ПРОВЕРКА на существование которого уже БЫЛА выше. В обоих случаях, если файл newFileName существует, скрипт вылетит с ошибкой. Проверь ВСЮ Логику скрипта. Его можно сделатьв два раза короче при текущей функциональности. В сложных случаях (когда не знаешь с чего лучше начать) можно нарисовать/написать алгоритм...

Ответить

Страница: 1 | 2 |

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



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