commondialog farklı kaydet

[mtl]

Hazırladığım programda "commondialog farklı kaydet" dialog kutusunda iptal ve kaydet butonları aynı işi görüyor. Yani "kaydet" ya da "iptal" e bastığımda her ikisinde de kaydediyor. Bu durumu nasıl düzeltebilirim?

 

[xxcell]

Nesneye ait ilgili olay, kaydetmeye yarayan kodları çalıştırıyordur. Örnek dosya eklerseniz düzeltilebilir.

 

[mtl]

Zip 'li dizini, C 'nin içine kopyalayın. urun_malzeme.xls isimli dosyayı açtığınızda gelen pencereye kapat deyin. Kırmızı butona tıklayın.

 

[mtl]

Arkadaşlar lütfen bu konuda bilgisi olan yok mu? :???::yardim:

 

[xxcell]

Yani "kaydet" ya da "iptal" e bastığımda her ikisinde de kaydediyor.

Ben bahsettiğiniz durumla karşılaşmadım. Örnek dosyanızı çalıştırdığımda
CommonDialog1.ShowSave satırında Farklı kaydet ekranını getiriyor.
Kaydete basınca sorunsuz devam ediyor, İptal'e basınca Cancel Was Selected açıklamalı 32755 no.lu hatayı üretiyor.

Bunuda ilgili yordamın başına;
On Error Goto Hata
ekleyip

End Sub 'undan önce

exit sub

hata:
if Err=32755 then msgbox "İptal seçildiği için kaydetmedi"

kodlarını eklerseniz sorunsuz çalışıyor.

 

[mtl]

Sn. xxcell teşekkür ederim.