Codejock Developer Community : CommonDialog FilterShowSave http://forum.codejock.com/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Wed, 13 May 2026 07:33:18 +0000 Wed, 14 May 2008 07:23:47 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 forum.codejock.com/RSS_post_feed.asp?TID=10616 <![CDATA[Codejock Developer Community]]> http://forum.codejock.com/forum_images/codejock-logo.gif http://forum.codejock.com/ <![CDATA[CommonDialog FilterShowSave : Hi, we have to make it work...]]> http://forum.codejock.com/forum_posts.asp?TID=10616&PID=35182&title=commondialog-filtershowsave#35182 Author: Oleg
Subject: 10616
Posted: 14 May 2008 at 7:23am

Hi,
 
we have to make it work same as standard CommonDialog form Microsoft.
 
Use CancelError property.
 
Private Sub PushButton1_Click()
 On Error GoTo ErrHandler
Dim FiNam As String
Set ComCom = Me.CommonDialog1
With ComCom
    .CancelError = True
 
    '.DialogStyle = 1
    .DefaultExt = "*.jpg"
    .Filter = "Joint Photographic Experts Group (.jpg)|*.jpg|Windows Bitmap (.bmp)|*.bmp|Graphics Interchange Format (.gif)|*.gif|Tagged Image Format (.tif)|*.tif|Windows Metafile (.wmf)|*.wmf"
    .DialogTitle = "Wo befindet sich die Grafikdatei?"
    .InitDir = "c:\"
    .FileName = "c:\Test.jpg"
'    .FileTitle = ""
    .ShowSave
    FiNam = .FileName
    If .FileTitle = "" Then Exit Sub
   
    MsgBox FiNam, vbInformation, .FileTitle
End With

ErrHandler:
  'User pressed the Cancel button
  Exit Sub
 
]]> Wed, 14 May 2008 07:23:47 +0000 http://forum.codejock.com/forum_posts.asp?TID=10616&PID=35182&title=commondialog-filtershowsave#35182 <![CDATA[CommonDialog FilterShowSave : uploads/20080514_015455_CodeJo...]]> http://forum.codejock.com/forum_posts.asp?TID=10616&PID=35174&title=commondialog-filtershowsave#35174 Author: McKloony
Subject: 10616
Posted: 14 May 2008 at 1:59am

uploads/20080514_015455_CodeJock_Dialog.zip
 
How can i find out, if the user has pressed the Cancle Button of the ShowSave or ShgowOpen Dialog. If I check the FileTitle Porperty it only works teh first time of use.
 
1. Open the attached VB sample
2. Press the Form Button and then press the Save Button in the ShowSave dialog
3. Then Press the Form Button again and then press the Cancle Button in the ShowSave dialog.
4. You will see, that die FileTitle Dialog shows agaon the content of the saved file in step 2.
 
]]> Wed, 14 May 2008 01:59:04 +0000 http://forum.codejock.com/forum_posts.asp?TID=10616&PID=35174&title=commondialog-filtershowsave#35174