How I can Set file Downloding path

[HarishChand]

str sfile="$desktop$\xyz.xls"
str sheet="Sheet1"
;;Works the Magic...
Excel.Application app._create
Excel.Workbook book=app.Workbooks.Open(_s.expandpath(sfile))
ExcelSheet es.ws=book.Worksheets.Item(sheet)

es.ws.Range("m").Delete
es.ws.Range("k:k").Delete
es.ws.Range("c:e").Delete
es.ws.Range("a:a").Delete


' FOR SAVE UNIQUE NAME
rep 1
,int random num
,num=1;;edit your number here
,random=RandomInt(1 99)
out random

str file_ext f_extension=random
file_ext.from(f_extension ".xls")

str fileName1 name10 ="Change_"
fileName1.from(name10 file_ext)
out fileName1


str directory ="$desktop$/Excel/"

SetCurDir(directory)

,;******** I want changing file to "$desktop$/Excel/" ********** folder How I can do, I want Both file are save in different location

es.ws.SaveAs(fileName1)


;;Saves the Excel sheet
book.Save
;;Closes the Excel
book.Close