Create a folder on the desktop and share with everyone if it does not exist on a Windows 7 PC - No Domain

Question

I have a script that needs to be modified to create a folder on the desktop and share with everyone if it does not exist on a Windows 7 PC - No Domain.  Here is the script, need help at bottom
=======================================================
Set objShell = CreateObject("WScript.Shell")
objComputer=objShell.ExpandEnvironmentStrings("%ComputerName%")
 IF Right(objComputer,3) = "000" Then
Else
 strShortcut = objShell.SpecialFolders( "Desktop" )  & "\%username% Share.lnk"
  strShortcut = objShell.ExpandEnvironmentStrings(strShortcut)
Set objLink = objShell.CreateShortcut( strShortcut )
 objComputer=objShell.ExpandEnvironmentStrings("%ComputerName%")
  objServer=Left(objComputer,7) & "-000"
 objLink.Description = objShell.ExpandEnvironmentStrings("%username% Share")
  objLink.TargetPath = objShell.ExpandEnvironmentStrings("\\" & objServer & "\Users\%username%\Desktop\%username% Share")
  objLink.Save
End If
=======================================================
if "C:\Users\%username%\desktop\%username% Share" exits do nothing
if not create the folder and share it with everyone read only
======================================================
The section directly above is what I need to add, anyone have a clue how to make this work?

Answer 1

Bill:  Can you suggest a site?  I am in the weeds here trying to get this done yesterday.  I have been reading code and trying to figure this out since yesterday morning.  I have to roll out this image to 2 dozen machines and
this is holding us back.  Any idea which site I can post to for help?
The bigger issue is that you have been given the answer to this in many different forms and, because you have no technical background, you fail to see what is being shown to you.  That is why I have repeatedly suggested that you hire a consultant.
The link to the learning material is at the top o this page.  You can also search the web for Windows consultants.
In the learning link you can also look up how to manage files. If, in the beginning you had chosen to use the learning materials you might not be in this bind.
Look up and research the FileSystemObject.
¯\_(ツ)_/¯