saving an excel sheet vb6 code

[Hema Suresh]

Hi all

I developed a database using vb6 code
I passed all the data to an excel file through code

And I saved and closed the Excel application in the name "D:\Books Database.xls" via vb6 code

My code to save and close is
*************** *************** *****
oXLApp.Visible = True

oXLBook.Close

oXLApp.Quit

Set oXLSheet = Nothing
Set oXLBook = Nothing
Set oXLApp = Nothing
*************** *************** *****

For 2,3 times it worked perfectly saving the database to the excel sheet in the name "Books Database.xls"

But now, I dont know what happened, whenever i am trying to save, it is prompting as "Do you want to save the changes?".. i gave yes to it but it is showing the "Save As" dialog box with the default name "Copy of Books Databse"

I dont want this to happen...

I dont know where i went wrong

Please anyone help me in this