Как сохранить файл в папке программы с переменным именем?

[toll]

Помогите, пожалуйста!
Как сохранить файл в папке программы с переменным именем.

Dim W As String
W = FormatDateTime(Now, vbShortDate)
objDoc.SaveAs (App.Path & "\W")

В указанном случае создается файл с именем W.
А как сделать, чтобы работала переменная W и создавался файл с именем 04.06.2006 ????

[GSerg]

Вообще-то, в предыдущем закрытом топике успел прозвучать ответ.
Хотим ещё один плюс?

[vvs_adm]

GSerg
Ну так он кавычки убрал и у него не получилось Ошибку выдает

[Amed]

& "\" & W