WSS = Новый COMОбъект("WScript.Shell");
ПутьКРабочемуСтолу=WSS.SpecialFolders().Item("Desktop");