Sayfayı Yazdır | Pencereyi Kapat

Veritabani Iliskisizde Silme Uyarisi Getirme

Nereden Yazdırıldığı: ERP Nedir? | Türkiye'nin ERP Forum Platformu
Kategori: ERP Özel Uyarlamalar
Forum Adı: ERP Özel Ekran Modülü
Forum Tanımlaması: Özel Ekran Modülü İle İlgili Bilgiler ve Sorular İçin...
URL: http://www.erpne.org/forum_posts.asp?TID=2330
Tarih: 22 Kasım 2024 Saat 18:29
Program Versiyonu: Web Wiz Forums 11.10 - http://www.webwizforums.com


Konu: Veritabani Iliskisizde Silme Uyarisi Getirme
Mesajı Yazan: hakan055
Konu: Veritabani Iliskisizde Silme Uyarisi Getirme
Mesaj Tarihi: 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...
 



Cevaplar:
Mesajı Yazan: rifatgunduz
Mesaj Tarihi: 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


Mesajı Yazan: hakan055
Mesaj Tarihi: 09 Kasım 2010 Saat 12:53

Üstad süpersinn sen yaa ellerine saglik....




Sayfayı Yazdır | Pencereyi Kapat

Forum Software by Web Wiz Forums® version 11.10 - http://www.webwizforums.com
Copyright ©2001-2017 Web Wiz Ltd. - https://www.webwiz.net