Establezca el directorio "Iniciar en" para un acceso directo utilizando comandos por lotes

He creado el siguiente acceso directo para mi software usando un archivo por lotes.

set target_file_a=\\%server_name%\program.exe
@echo off
set SCRIPT="%TEMP%\%RANDOM%-%RANDOM%-%RANDOM%-%RANDOM%.vbs"
echo Set oWS = WScript.CreateObject("WScript.Shell") >> %SCRIPT%
echo sLinkFile = "%USERPROFILE%\Desktop\shortcut.lnk" >> %SCRIPT%
echo Set oLink = oWS.CreateShortcut(sLinkFile) >> %SCRIPT%
echo oLink.TargetPath =  "%target_file_a%" >> %SCRIPT%
echo oLink.Save >> %SCRIPT%
cscript /nologo %SCRIPT%
del %SCRIPT%

Necesito configurar el directorio "Iniciar en". ¿Cómo puedo hacer esto en lote?

Usa el WorkingDirectorymiembro. En tu caso:

echo oLink.WorkingDirectory = "something" >> %SCRIPT%