CommonDialog cancel problem (solved)

[choas]

Hi again, I have another strange prob with the Save box of my commondialog control. When I create a new file with it at the first lunch of my project it work fine and create it, but then if I lunch it again and click cancel button, it act like if I had press OK. It lunch my "file already exist" error even if I change the name in the save box before click cancel.

CDialog1.DialogTitle = "Create a new databse"
CDialog1.DefaultExt = "dtk"
CDialog1.Filter = "DVD-ROM (*.dtk)|*.dtk |DVD-Video (*.dtv)|*.dtv"
CDialog1.Flags = &H800
CDialog1.CancelError = False
CDialog1.ShowSave
Test = CDialog1.FileTitle

If Test = Dir(CDialog1.FileName) Then
MsgBox ("The database already exist")
Else
Set dbs = CreateDatabase(CDialog1.FileName, dbLangGeneral, dbVersion30)
Select Case CDialog1.FilterIndex
Case 1
Call createDVDROM
Case 2
Call createDVDVideo
End Select
End If

I hope someone could help me, I am new with VB I started 2 days ago and I have got a lot of small problem of that kind