See my reply in your other thread
--
Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm
"Yuvraj" wrote in message ...
Hi Guys,
I have a strange Problem with my code.
My code zips the file from File Server and then opens and reads it in
excel application.
The code then opens the unzipped file in the Temp folder in the path given
above. I have given the code below.
Initially we were using winzip but now we are using windows shell
programming where the code is
obj.Namespace(sourceFileName) Namespace(DestinationFilename).Items
Ideally this function needs to unzip the *.xls item in the Temp
folder.
Problem:
The above function using windows is also creating a Tempory Folder
inside Temp with New name and then
pasting the *.xls inside it.
This was not happening when we were using winzip.
The problem is i first get the zipped file from server to Temp using
some method, then i try and unzip it using
obj.Namespace(sourceFileName) Namespace(DestinationFilename).Items
the file is copied or unzipped to the Temp folder
now i try to use the function having the code like
if filedownloaded = true
wasFDownloaded = True
If openBookF = True Then
On Error Resume Next
Set filedownload = Application.Workbooks.Open
(filename:=localFilename, ReadOnly:=True, _
AddToMru:=False) /////This line then creates a Temporary folder 1
and ////places xls file in zipfile again which was not happening
before
On Error GoTo 0
Else
filedownloaded = localFilename
End If
End If
I want to avoid the creation of temp folder:
The parameters used in this line of code
obj.Namespace(sourceFileName) Namespace(DestinationFilename).Items
cannot avoid the creation of same file inside TemporaryFiolder 1, but
i want my application to open the file which is already in the Temp
copied but not create a Folder with Temporary Folder1 name everytime
it tries and open the file unzipped using the above two code.
Any help and iseas will be appreciated.
Regards,
Yuvraj