download excel file from sharepoint

[#1]

HI,

I want to download latest excel file from share point to local folder path using VBscript.

I have the VBscript code it is down loading current month file if it is present,that is this month file it is downloading if it present in share point but i want to download latest file upload in share point.

Ex: my file formate is :

10_2014 Filename.xlsx...etc..

if they uploaded 12_2014 Filename.xlsx file then i want to download this file.

i am using following code but it is downloading current month file:

Sub DownloadFile

'Identifying the latest Security file'

latestDate = Date

strYear = Year(latestDate)

strMonth = Right("0" & Month(latestDate), 2)

fileName = strMonth&"_"&strYear&" Filename.xlsx"

'strMonth&"_"&strYear&" Filename.xlsx"'

SharePointURL = "http://sharepointpath"

Current Month Data Load File/"&fileName

Set WinHttpReq = CreateObject("Microsoft.XMLHTTP")

WinHttpReq.Open "GET", SharePointURL, False, "username", "password"

WinHttpReq.send

SharePointURL = WinHttpReq.responseBody

If WinHttpReq.Status = 200 Then

    Set oStream = CreateObject("ADODB.Stream")

    oStream.Open

    oStream.Type = 1

    oStream.Write WinHttpReq.responseBody

    oStream.SaveToFile "folderpath\"&fileName, 1 ' 1 = no overwrite, 2 = overwrite

    oStream.Close

End If

End Sub