Vraag : De kortere weg van Internet via partijdossier

Ik probeer om een Internet kortere weg automatisch tot stand te brengen & een pictogram op het via een openings van een sessiemanuscript toe te passen. Hier is het manuscript:

xcopy \ \ ipremisesvr \ netlogon \ HelpMe.url „%userprofile% \ Desktop“ /y
echo IconFile= \ \ ipremisesvr \ netlogon \ icon.bmp > " %userprofile% \ Desktop \ HelpMe.url "
echo IconIndex=0 > " %userprofile% \ Desktop \ HelpMe.url "

tot dusver het manuscript met succes wordt geroepen en een verbinding wordt gecre�ërd op de Desktop van de gebruiker, maar het is een gebroken verbinding. Het klikken op het resulteert in de fout het „Doel "" van deze Kortere weg van Internet ongeldig is. Ga naar het het bezitsblad van de Kortere weg van Internet en zorg ervoor het doel.“ correct is Het urldossier dat absoluut wordt gekopi�ërd werkt though.

Also, wordt het pictogram niet veranderd. Ik kan het in het kleine bitmap beeld, maar niet via de partij file.

manueel veranderen

Antwoord : De kortere weg van Internet via partijdossier

O.k., zegt dit lidstaten- artikel http://support.microsoft.com/kb/110006 dit:

Nota: De de controledoos van de Verwijzingen van de Update Verre is niet het universele plaatsen. Wanneer twee werkboeken open zijn, zou één werkboek kunnen zijn Verre Verwijzingen die van de Update hebben geselecteerd plaatsen terwijl de controledoos in het andere werkboek wordt ontruimd. Nochtans, wanneer u een werkboek opent, zal zijn de controledoos van de Verwijzingen van de Update Verre worden geselecteerd, geen kwestie hoe het werd bewaard, tenzij het verbindingen aan een externe gegevensbron bevat.

Er is een procedure VB aangaande de pagina voor het draaien van het vertrekken:

  Sub Voorbeeld ()
       'Nul na updateLinks wijst erop dat noch extern noch
       de 'verre verwijzingen zouden moeten worden bijgewerkt wanneer het dossier wordt geopend.
       fileName van Workbooks.Open: = " C:\EXCEL\TEST.XLS ", updateLinks: =0
       'Draai van de Verre Verwijzingen die van de Update voor het werkboek plaatsen.
       ActiveWorkbook.UpdateRemoteReferences = Vals
   Sub van het eind