じいちゃんの形見のマクロがぁぁ

fso = new ActiveXObject( "WScript.Shell" );
strFileName = document.Name;
strFullPath = fso.SpecialFolders("Desktop") + "\\" + strFileName + ".txt";
var stream = fso.CreateTextFile(strFullPath);
stream.WriteLine('hello');
stream.Write('good-bye');
stream.WriteBlankLine(5);
stream.Close();

うごかないよぉ~
どうしたら動くんだよぉうごけうごけぇ