Questione : Scritto di VB - goccia raccorciata su tutto l'utente Deskop

Abbiamo tipo due di stazioni di lavoro nel nostro ambiente di impresa. chioschi del

1. - giù stazioni di lavoro bloccate annotate in un cliente generico del monoutente.
2. amministrativo - stazioni di lavoro su che gli utenti possono indivdually annotare. Una persona specifica è assegnata solitamente a questo tipo di dispositivo. il

I vorrebbe cadere una lima del htm sul tavolo su entrambi i tipi. Lo scritto che attualmente ho è progettato al primo controllo se il computername abbina il username, se così allora lo copia ai chioschi da tavolino. In caso contrario allora cade automaticamente sui calcolatori amministrativi tutti gli utenti \ tavolo folder.

Currently che funziona per la stazione di lavoro del chiosco ma non sull'amministrativo. Dei pensieri quanto a perché questo potrebbe accadere? oNetwork di Next

Dim del riassunto di errore del


Option Explicit

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

Set =
ork„) oFSO di oNetwork.ComputerName
strComputer/>
Set = Wscript.CreateObject (“Scripting. oShell del
Set di FileSystemObject„) = WScript.CreateObject (“WScript. Di Shell " del ) del


If oFSO.FolderExists (“ments e regolazioni \„ & strComputer & “\ strDesktopLNK del tavolo„) Then

= “C:\Documents and Settings\„ & strComputer &„ \ tavolo \ shortcut.lnk" oLink STABILITO del
del
=
di oShell.CreateShortcut (strDesktopLNK) oLink.TargetPath = chr (34) & “esploratore \ iexplore.exe di c:\program files\internet„ &
del chr (34) oLink.Arguments =
“del URL " oLink.WorkingDirectory = chr (34) & “esploratore di c:\program files\internet \„ &
del chr (34) oLink.IconLocation = “32.dll, 21 " strStartMenuLNK di C:\Windows\System32\shell del
oLink.Save

= “C:\Documents and Settings\„ & strComputer &„ \ oLink STABILITO del
del
del menu \ programmi \ shortcut.lnk di inizio " = oShell.CreateShortcut (strStartMenuLNK)
oLink.TargetPath = chr (34) & “esploratore \ iexplore.exe di c:\program files\internet„ &
del chr (34) oLink.Arguments =
“del URL " oLink.WorkingDirectory = chr (34) & “esploratore di c:\program files\internet \„ &
del chr (34) oLink.IconLocation = “32.dll, 21 " strDefaultLNK di C:\Windows\System32\shell del
oLink.Save

Else

= “oLink STABILITO del

dell'utente \ tavolo \ shortcut.lnk di C:\Documents and Settings\All " =
di oShell.CreateShortcut (strDefaultLNK) oLink.TargetPath = chr (34) & “esploratore \ iexplore.exe di c:\program files\internet„ &
del chr (34) oLink.Arguments =
“del URL " oLink.WorkingDirectory = chr (34) & “esploratore di c:\program files\internet \„ &
del chr (34)    oLink.IconLocation = “32.dll, 21 " strDefaultLNK_SM di C:\Windows\System32\shell del
oLink.Save

= “utente di C:\Documents and Settings\All \ inizio oLink STABILITO del

del menu \ shortcut.lnk " =
di oShell.CreateShortcut (strDefaultLNK_SM) oLink.TargetPath = chr (34) & “esploratore \ iexplore.exe di c:\program files\internet„ &
del chr (34) oLink.Arguments =
“del URL " oLink.WorkingDirectory = chr (34) & “esploratore di c:\program files\internet \„ &
del chr (34) oLink.IconLocation = “32.dll, 21 "
oLink.Save

End If di C:\Windows\System32\shell class= del

Risposta : Scritto di VB - goccia raccorciata su tutto l'utente Deskop

Esperti spiacenti… Ho trovato la soluzione altrove.

Per il vostro riferimento, qui è il collegamento ad esso…
http://www.visualstudiodev.com/visual-basic-express-edition/trying-to-debug-receive-requested-operation-requires-elevation-48897.shtml

Ciò è la parte che lo ha aiutato…

L'applicazione fate “installare„ le parole, “aggiornamento„, “installare„, o c'è ne delle altre frasi di chiave che Vista utilizza nella relativa euristica per identificare i programmi di messa a punto? In caso affermativo, non dovete dirigere lo studio visivo come coordinatore. Dovete appena cambiare il nome del vostro programma o aggiungere una lima manifesta (che è difficile sotto CONTRO 2005 edizioni) e contrassegnarli in modo che Vista UAC gli non effettui la prova di euristica.

Il nome del mio app ha avuto l'aggiornamento di parola in esso…

Ringraziare a chiunque che stesse provando a trovarmi una soluzione per.

Ciao!