![\"Script](\"http:\/\/img.microsoft.com\/library\/media\/1033\/technet\/images\/scriptcenter\/ad.jpg\" "\\"Script")
<\/A> \nHey, KP. You\u2019ll have to excuse us if we sound a little out of breath; we\u2019ve been running around like crazy looking for a complicated and highly-technical solution to this problem. It was only after we failed miserably in that quest that we began to think about what we were trying to do. Maybe we were trying to make this much harder than we needed to. After all, My Network Places is nothing more than a folder on the hard disk, and a \u201cnetwork place\u201d is nothing more than a shortcut. Could creating a network place involve nothing more than creating a shortcut in a folder? You be the judge:<\/P>
Const NETHOOD = &H13&<\/p>\nSet objWSHShell = CreateObject(“Wscript.Shell”)\nSet objShell = CreateObject(“Shell.Application”)<\/p>\n
Set objFolder = objShell.Namespace(NETHOOD)\nSet objFolderItem = objFolder.Self\nstrNetHood = objFolderItem.Path<\/p>\n
strShortcutName = “Finance Department Public Folder”\nstrShortcutPath = “\\\\atl-finance-01\\public”<\/p>\n
Set objShortcut = objWSHShell.CreateShortcut _\n (strNetHood & “\\” & strShortcutName & “.lnk”)\nobjShortcut.TargetPath = strShortcutPath\nobjShortcut.Save\n<\/PRE>\n
We begin by defining a constant named NETHOOD and assigning it the value &H13&; we\u2019ll use this in a moment to locate the My Network Places folder. We then create instances of two difference objects: the Windows Script Host Shell<\/B> object and the Windows Shell<\/B> object. That\u2019s what these two lines of code do:<\/P>Set objWSHShell = CreateObject(“Wscript.Shell”)\nSet objShell = CreateObject(“Shell.Application”)\n<\/PRE>\nNext we use a Windows Shell object method and property – Namespace<\/B> and Self<\/B>, respectively – to determine the location of the My Network Places folder. The Namespace method actually locates the folder for us; however, it returns a Folder<\/B> object. For technical reasons we don\u2019t need to worry about, we can\u2019t do much with this object; therefore we use the Self property to return a FolderItem<\/B> object representing the My Network Places folder. We do that because a FolderItem object is something that our script can<\/I> deal with.<\/P>\n
As soon as we have a FolderItem we can then grab the Path<\/B> property and assign it to the variable strNetHood; strNetHood will now be equal to something along the lines of C:\\Documents and Settings\\kenmyer\\NetHood. And, yes, that is<\/I> a long and convoluted explanation for just three lines of code:<\/P>Set objFolder = objShell.Namespace(NETHOOD)\nSet objFolderItem = objFolder.Self\nstrNetHood = objFolderItem.Path\n<\/PRE>\nNext we simply assign the name of the shortcut and the path to our network place to a pair of variables. We don\u2019t really need to do this; we could just hard-code the values into the script. But assigning the values to variables will make it a little easier for you to modify the script to fit your own needs.<\/P>\n
Now we turn to the WSH Shell object to actually create our shortcut. We begin by calling the CreateShortcut<\/B> method, passing it the path to the new shortcut name. That will be a combination of four items: the path to the My Network Places folder (strNetHood), a trailing \\, the name of our new shortcut (strShortcutName), and the file extension .lnk<\/B>. That gives us a shortcut path similar to this:<\/P>C:\\Documents and Settings\\kenmyer\\NetHood\\Finance Department Public Folder.lnk\n<\/PRE>\nWe set the TargetPath<\/B> property of the shortcut to the network place (\\\\atl-finance-01\\public) and then call the Save<\/B> method to write the new shortcut to the file system. Just like that, we have a new network place.<\/P>\n
Now, if you\u2019ll excuse us, we need to go lie down for a moment. Who\u2019d have thought that scripting would be such hard work?<\/P><\/p>\n","protected":false},"excerpt":{"rendered":"
Hey, Scripting Guy! How can I create a shortcut in My Network Places?— KP Hey, KP. You\u2019ll have to excuse us if we sound a little out of breath; we\u2019ve been running around like crazy looking for a complicated and highly-technical solution to this problem. It was only after we failed miserably in that quest […]<\/p>\n","protected":false},"author":595,"featured_media":87096,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"_acf_changed":false,"footnotes":""},"categories":[1],"tags":[237,16,3,5],"class_list":["post-69853","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-scripting","tag-basic-computer-information","tag-desktop-management","tag-scripting-guy","tag-vbscript"],"acf":[],"blog_post_summary":"
Hey, Scripting Guy! How can I create a shortcut in My Network Places?— KP Hey, KP. You\u2019ll have to excuse us if we sound a little out of breath; we\u2019ve been running around like crazy looking for a complicated and highly-technical solution to this problem. It was only after we failed miserably in that quest […]<\/p>\n","_links":{"self":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts\/69853","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/users\/595"}],"replies":[{"embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/comments?post=69853"}],"version-history":[{"count":0,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts\/69853\/revisions"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/media\/87096"}],"wp:attachment":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/media?parent=69853"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/categories?post=69853"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/tags?post=69853"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}
![\"Hey,](\"https:\/\/devblogs.microsoft.com\/wp-content\/uploads\/sites\/29\/2019\/02\/q-for-powertip.jpg\" "\\"Hey,")
\n![\"Spacer\"](\"https:\/\/devblogs.microsoft.com\/scripting\/wp-content\/uploads\/sites\/29\/2019\/05\/spacer.gif\")
![\"Hey,](\"https:\/\/devblogs.microsoft.com\/wp-content\/uploads\/sites\/29\/2019\/02\/a-for-powertip.jpg\" "\\"Hey,")