1. Набираем команду codeby webinar. Набираем команду для организации и проведения вебинаров. Подробнее ...

    Скрыть объявление
  2. Требуются разработчики и тестеры для проекта codebyOS. Требования для участия в проекте: Знание принципов работы ОС на базе Linux; Знание Bash; Крайне желательное знание CPP, Python, Lua; Навыки системного администрирования. Подробнее ...

    Скрыть объявление
  3. Получи 30.000 рублей. Для получения денег необходимо принять участие в конкурсе авторов codeby. С условиями и призами можно ознакомиться на этой странице ...

    Внимание! Регистрация авторов на конкурс закрыта.

    Скрыть объявление

Вопрос по Vbs

Тема в разделе "Visual Basic", создана пользователем sergor2009, 1 апр 2009.

  1. sergor2009

    sergor2009 Гость

    Репутация:
    0
    Есть скрипт на VBS, который выполняет работу автообновления для одной программки: копирует новые файлы с фтп(+всякие проверки, например есть ли место на диске и т.п.), т.е. создает текстовый файл с кодом для исполнения и запускает ftp.exe -s:namescript.vbs(в котором список файлов для копирования)
    Проблема: скрипт работает только в ХР, соотвественно в ранних версиях, типа win 98-2000, выдает различные ошибки, либо запускается, но ничего не происходит. Может ли быть проблема в том, что я сначало объвляю открытие файла на чтение, а потом на запись этого же файла или же проблема только в том, что нет поддержки новых команд, работающих в ХР?

    Код:
    Set fso9 = CreateObject("Scripting.FileSystemObject") 
    set f = fso9.GetFile(pathtoupdate + "update_list.txt")
    Set fso = CreateObject("Scripting.FileSystemObject") 
    Set file = fso.OpenTextFile(pathtoupdate + "update_list.txt", 1, true)
    Set fso2 = CreateObject("Scripting.FileSystemObject") 
    Set file2 = fso2.OpenTextFile(pathtoupdate + "update_list.txt", 1, true)
    Set fso7 = CreateObject("Scripting.FileSystemObject")
    Set file7 = fso7.OpenTextFile(pathtoupdate + "update_list.txt", 8, true)
    .
    .
    .
    file.Close
    fill.Close
    file1.Close
    file2.Close
    file3.Close
    file4.Close
    file5.Close
    file6.Close
    file7.Close
    В принципе могу выложить весь код целиком:)

    Что нужно сделать, что бы все работало и на остальных версиях винды без установки каких-либо доп. средств для запуска скрипта?
    И еще вопрос: можно ли скомпилировать код VBS на обычном VB?

    Заранее спасибо!
     
  2. Jumpy

    Jumpy Гость

    Репутация:
    0
    Не уверен, но скорее всего если не юзать fso - все получится.

    VBS компилица VB но требуются косметические поправочки.
     
Загрузка...

Поделиться этой страницей