Вопрос : Сценарий VB - кратчайший путь падения на всем потребителе Deskop

Мы имеем тип 2 рабочих мест в нашей окружающей среде предпринимательства. киоски

1. - запертые вниз рабочие места внесенные в журнал в родовой учет одиночного потребителя.
2. управленческое - рабочие места потребители могут indivdually внести в журнал на. Обычно специфически персона задана к этому типу приспособления.

I хотел было бы упасть архив htm на настольный компьютер на обоих типах. Сценарий, котор я в настоящее время имею конструирован к первой проверке если computername сопрягает username, то если настолько после этого он копирует его к киоскам desktop. Если это не будет случаем после этого, то оно автоматически падает на управленческие компьютеры все потребители \ настольный компьютер folder.

Currently, котор оно работает для рабочего места киоска но не на управленческом. Все мысли о почему это могло происходить? oNetwork Next

Dim резюма ошибки


Option Explicit

'On, strComputer, strDesktopLNK strUsername
Dim, strStartMenuLNK, objWMIService strDefaultLNK
Dim, oFSO colOSInfo
Dim, oShell, oLink, objItem, oNetwork strOS

Set =
ork») oFSO/>strComputer = oNetwork.ComputerName

Set = Wscript.CreateObject («Scripting. oShell
Set FileSystemObject») = WScript.CreateObject («WScript. Обстреливайте " strDesktopLNK


If oFSO.FolderExists ) («ments и установок \» & strComputer & «\ настольный компьютер») Then

= «C:\Documents and Settings\» & strComputer &» \ настольный компьютер \ shortcut.lnk" oLink

УСТАНОВЛЕННОЕ =
oShell.CreateShortcut (strDesktopLNK) oLink.TargetPath = chr (34) & «исследователь c:\program files\internet \ iexplore.exe» &
chr (34) oLink.Arguments = «URL "
oLink.WorkingDirectory = chr (34) & «исследователь c:\program files\internet \» &
chr (34) oLink.IconLocation = «32.dll C:\Windows\System32\shell, 21 " strStartMenuLNK
oLink.Save

= «C:\Documents and Settings\» & strComputer &» \ меню старта \ программы \ shortcut.lnk " oLink

УСТАНОВЛЕННОЕ =
oShell.CreateShortcut (strStartMenuLNK) oLink.TargetPath = chr (34) & «исследователь c:\program files\internet \iexplore.exe» &
chr (34) oLink.Arguments =
«URL " oLink.WorkingDirectory = chr (34) & «исследователь c:\program files\internet \» &
chr (34) oLink.IconLocation = «32.dll C:\Windows\System32\shell, 21 " strDefaultLNK
oLink.Save

Else

= «oLink

потребителя \ настольный компьютер C:\Documents and Settings\All \ shortcut.lnk " УСТАНОВЛЕННОЕ =
oShell.CreateShortcut (strDefaultLNK) oLink.TargetPath = chr (34) & «исследователь c:\program files\internet \ iexplore.exe» &
chr (34) oLink.Arguments =
«URL " oLink.WorkingDirectory = chr (34) & «исследователь c:\program files\internet \» & chr (34)
oLink.IconLocation = «32.dll C:\Windows\System32\shell, 21 " strDefaultLNK_SM
oLink.Save

= «потребитель C:\Documents and Settings\All \ старт oLink

меню \ shortcut.lnk " УСТАНОВЛЕННОЕ =
oShell.CreateShortcut (strDefaultLNK_SM) oLink.TargetPath = chr (34) & «исследователь c:\program files\internet \ iexplore.exe» &
chr (34) oLink.Arguments =
«URL " oLink.WorkingDirectory = chr (34) & «исследователь c:\program files\internet \» &
chr (34) oLink.IconLocation = «32.dll C:\Windows\System32\shell, 21 "
oLink.Save

End If class=

Ответ : Сценарий VB - кратчайший путь падения на всем потребителе Deskop

Огорченные специалисты… Я нашел разрешение в другом месте.

Для вашей справки, здесь соединение к ему…
http://www.visualstudiodev.com/visual-basic-express-edition/trying-to-debug-receive-requested-operation-requires-elevation-48897.shtml

Это будет часть помогла мне…

Вы применение имеете слова «быть setup», «уточнение», «установите», или любо другие фразы ключа которым перспектива использует в своем heuristics для того чтобы определить программы установки? Если так, вам не нужно руководить визуально студия как администратор. Вам как раз нужно или изменить имя вашей программы или добавить очевидный архив (трудно вниз ПРОТИВ 2005 вариантов) и маркировать его так, что перспектива UAC не выполнит испытание heuristics на ей.

Имя моего app имело уточнение слова в ем…

Возблагодарите к любому пыталось найти разрешение для меня.

Позаботьтесь!