• Администрация SafeZone приветствует вас на нашем форуме!
    Если вы больше не желаете видеть рекламу при просмотре тем и сообщений - то достаточно просто зарегистрироваться. Для зарегистрированных пользователей реклама не отображается.

свободный файл

  1. Паразит

    VBS Поиск свободного файла

    Привет. Задача такая. Создать текстовый документ. Если документ существует, надо его не переписывать, а добавить счётчик. Dim FSO, Name, Ext Set FSO = CreateObject("Scripting.FileSystemObject") Name = "777" Ext = ".txt" If Not fso.FileExists(Name) Then Set Txt = FSO.CreateTextFile(Name...