Need to boost the visibility of your question for solutions? Use the Experts Exchange Help Bell to confirm priority levels and contact subject-matter experts for question attention. Check out this how-to article for more information.
Option Explicit Dim objShell, strCmd, strTargetFolder, objFSO, strFile, strDirectory 'Copy to startup section ===== strDirectory = "C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Startup" strFile = strDirectory & "\wippre-alpha.vbs" If Not objFSO.FileExists(strFile) Then strTargetFolder = "C:\Users\Arion\Documents\Environment\Test" Set objShell = CreateObject("WScript.Shell") strCmd = "%comspec% /c copy """ & WScript.ScriptFullName & """ """ & strTargetFolder & """ /Y" objShell.Run strCmd End if
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.