Cuestión : Escritura de VB - gota atajada en todo el usuario Deskop

Tenemos tipo dos de sitios de trabajo en nuestro ambiente de la empresa. quioscos del

1. - trabados abajo de los sitios de trabajo registrados en una cuenta de solo usuario genérica.
2. administrativo - sitios de trabajo sobre los cuales los usuarios pueden indivdually registrar. Asignan generalmente una persona específica a este tipo de dispositivo. el

I quisiera caer un archivo del htm en la mesa en ambos tipos. La escritura que tengo actual se diseña al primer cheque si el nombre de computadora empareja el username, si tan entonces lo copia a los quioscos de escritorio. En caso contrario entonces cae automáticamente sobre las computadoras administrativas a todos los usuarios \ mesa folder.

Currently que trabaja para el sitio de trabajo del quiosco pero no en el administrativo. ¿Pensamientos en cuanto a porqué esto pudo ocurrir? oNetwork de Next

Dim del curriculum vitae del error del


Option Explicit

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

Set =
ork”) oFSO de/>strComputer = de oNetwork.ComputerName

Set = Wscript.CreateObject (“Scripting. oShell del
Set de FileSystemObject”) = WScript.CreateObject (“WScript. De Shell " del ) del


If oFSO.FolderExists (“ments y ajustes \” y strComputer y “\ strDesktopLNK de la mesa”) Then

de C:\Docu = “C:\Documents and Settings\” y strComputer y” \ mesa \ shortcut.lnk" oLink DETERMINADO del
del
=
de oShell.CreateShortcut (strDesktopLNK) oLink.TargetPath = chr (34) y “explorador \ iexplore.exe de c:\program files\internet” y
del chr (34) oLink.Arguments = “
del URL " oLink.WorkingDirectory = chr (34) y “explorador de c:\program files\internet \” y
del chr (34) oLink.IconLocation = “32.dll, 21 " strStartMenuLNK de C:\Windows\System32\shell del
oLink.Save

= “C:\Documents and Settings\” y strComputer y” \ oLink DETERMINADO del
del
del menú \ de los programas \ shortcut.lnk del comienzo " = oShell.CreateShortcut (strStartMenuLNK)
oLink.TargetPath = chr (34) y “explorador \ iexplore.exe de c:\program files\internet” y
del chr (34) oLink.Arguments =
del “URL " oLink.WorkingDirectory = chr (34) y “explorador de c:\program files\internet \” y
del chr (34) oLink.IconLocation = “32.dll, 21 " strDefaultLNK de C:\Windows\System32\shell del
oLink.Save

Else

= “oLink DETERMINADO del

del usuario \ de la mesa \ shortcut.lnk de C:\Documents and Settings\All " =
de oShell.CreateShortcut (strDefaultLNK) oLink.TargetPath = chr (34) y “explorador \ iexplore.exe de c:\program files\internet” y
del chr (34) oLink.Arguments =
del “URL " oLink.WorkingDirectory = chr (34) y “explorador de c:\program files\internet \” y
del chr (34)    oLink.IconLocation = “32.dll, 21 " strDefaultLNK_SM de C:\Windows\System32\shell del
oLink.Save

= “usuario \ comienzo oLink DETERMINADO del

del menú \ shortcut.lnk de C:\Documents and Settings\All " =
de oShell.CreateShortcut (strDefaultLNK_SM) oLink.TargetPath = chr (34) y “explorador \ iexplore.exe de c:\program files\internet” y
del chr (34) oLink.Arguments =
del “URL " oLink.WorkingDirectory = chr (34) y “explorador de c:\program files\internet \” y
del chr (34) oLink.IconLocation = “32.dll, 21 "
oLink.Save

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

Respuesta : Escritura de VB - gota atajada en todo el usuario Deskop

Expertos apesadumbrados… Encontré la solución a otra parte.

Para su referencia, aquí está el acoplamiento a él…
http://www.visualstudiodev.com/visual-basic-express-edition/trying-to-debug-receive-requested-operation-requires-elevation-48897.shtml

Ésta es la pieza que me ayudó…

¿Usted uso hace las palabras “fijar”, “actualización”, “instalar”, o un de los otras frases claves que Vista utilice en su heurística para identificar programas de disposición? Si es así usted no necesita funcionar el estudio visual como administrador. Usted apenas necesita cambiar el nombre de su programa o agregar un archivo manifesto (que sea difícil debajo CONTRA 2005 ediciones) y marcarlo de modo que Vista UAC no realice la prueba de la heurística en ella.

El nombre de mi app tenía la actualización de la palabra en él…

Agradecer a cualquier persona que intentaba encontrar una solución para mí.

¡Tomar el cuidado!