Veritabani Iliskisizde Silme Uyarisi Getirme

   Merhabalar, 

NDI da kod alanina vb deki gibi Silme uyarisi getirme gibi

----------------------------------------------------------------------------------------------

Dim secim, mesaj, tip, baslik
mesaj = "Bu ekrana ait tüm bilgileriniz silinecektir. Emin misiniz ?"
tip = vbYesNoCancel + vbCritical + vbDefaultButton2
baslik = "Onaylama"
secim = MsgBox(mesaj, tip, baslik)
If secim = 6 Then
MsgBox("Evet Butonuna Tiklandi")
'komut satiri
ElseIf secim = 7 Then
MsgBox("Hayir Butonuna Tiklandi")
'komut satiri
ElseIf secim = 2 Then
MsgBox("Iptal Butonuna Tiklandi")
'komut satiri
End If

----------------------------------------------------------------------------------------------------

bir uyari yapmamiz mümkünmü bu kodu suan için kullaniyorum fakat bu evet hayir uyari penceresini netsis in standart penceresi olarak getirmem mümkün mü  ;

NETSISCORE.NetLibWin32.ShowNetsisMesaj  ("Toplam kayitlari saklanmamis !..") ,2

gibi ? Ama bunun evet hayir ve iptalli olanini ilginiz için simdiden tesekkür ederim...

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
hakan055 Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Üye Kayıt Tarihi: 22 Ekim 2010 Durum: Aktif Değil Puanlar: 0	Mesaj Seçenekleri Yanıt Yaz Alıntı hakan055 Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: Veritabani Iliskisizde Silme Uyarisi Getirme Gönderim Zamanı: 09 Kasım 2010 Saat 11:58
	Merhabalar, NDI da kod alanina vb deki gibi Silme uyarisi getirme gibi ---------------------------------------------------------------------------------------------- Dim secim, mesaj, tip, baslik mesaj = "Bu ekrana ait tüm bilgileriniz silinecektir. Emin misiniz ?" tip = vbYesNoCancel + vbCritical + vbDefaultButton2 baslik = "Onaylama" secim = MsgBox(mesaj, tip, baslik) If secim = 6 Then MsgBox("Evet Butonuna Tiklandi") 'komut satiri ElseIf secim = 7 Then MsgBox("Hayir Butonuna Tiklandi") 'komut satiri ElseIf secim = 2 Then MsgBox("Iptal Butonuna Tiklandi") 'komut satiri End If ---------------------------------------------------------------------------------------------------- bir uyari yapmamiz mümkünmü bu kodu suan için kullaniyorum fakat bu evet hayir uyari penceresini netsis in standart penceresi olarak getirmem mümkün mü ; NETSISCORE.NetLibWin32.ShowNetsisMesaj ("Toplam kayitlari saklanmamis !..") ,2 gibi ? Ama bunun evet hayir ve iptalli olanini ilginiz için simdiden tesekkür ederim...

rifatgunduz Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Üye Kayıt Tarihi: 29 Mayıs 2009 Konum: Ystanbul Durum: Aktif Değil Puanlar: 44	Mesaj Seçenekleri Yanıt Yaz Alıntı rifatgunduz Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 09 Kasım 2010 Saat 12:29
	Selam Hakan, Istemis oldugun kodlama asagidaki gibidir. prmResult = NETSISCORE.NetLibWin32.ShowNetsisMesaj("Bu kayit silinecektir, Emin misiniz?", 8) If prmResult=2 Then ElseIf prrmResult=7 then ElseIf prmresult=8 then End If Not:Cevabi cepten yazdigim icin belki harf hatalari olabilir. Iyi Calismalar...
	Rifat Gündüz www.netsis.com.tr

hakan055 Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Üye Kayıt Tarihi: 22 Ekim 2010 Durum: Aktif Değil Puanlar: 0	Mesaj Seçenekleri Yanıt Yaz Alıntı hakan055 Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 09 Kasım 2010 Saat 12:53
	Üstad süpersinn sen yaa ellerine saglik....