Re: VBS: Определение настроек по логину пользователя

null@example.com (wildwolf007) — Sat, 14 Dec 2013 16:28:28 +0000

Вопрос закрыт разобрался. Всем спасибо.

VBS: Определение настроек по логину пользователя

null@example.com (wildwolf007) — Fri, 13 Dec 2013 22:03:48 +0000

Не могу понять как реализовать определение настроек пользователя относительно которого запустился скрипт

На диске C располагаете файл file1.txt и запускаете скрипт который прикреплен так же в архиве.

Скрипт ищет по файлу логин Константин и если нашел, то выполняется условие строка найдена.

Но не могу понять если логин не будет явно задан допустим он будет определяться относительно профиля на которой запущен данный скрипт (тобишь будет меняться) как производить сравнение if MyArray(0) = "Константин" ?

Set objNetwork = CreateObject("Wscript.Network")
login = objNetwork.UserName
MsgBox  objNetwork.UserName , vbInformation

Set oFso = CreateObject("Scripting.FileSystemObject")
If oFso.FileExists("C:\File1.txt") Then
     Set vStream = oFso.OpenTextFile("C:\File1.txt", 1, True) 
     Do Until vStream.AtEndOfStream 'цикл по строкам файла
          sLine = vStream.ReadLine 
        '  MsgBox "Прочитана строка: " & sLine 
        Dim MyArray
        MyArray = Split(sLine,";")
        if  MyArray(0) = "Константин" Then
        MsgBox "Строка найдена!"
        End If
     Loop
     vStream.Close 'закрываем файл
End If
MsgBox "Поиск завершен"

Серый форум — VBS: Определение настроек по логину пользователя

Re: VBS: Определение настроек по логину пользователя

VBS: Определение настроек по логину пользователя