MsgBox Aciil

ARKADAŞLAR AŞAĞIDAKİ MsgBox KUTUSUNDA EVET VE HAYIR BUTONLARI VAR EVET BUTONUNA BASICA Kayit.submit() olayını çalıştırsın hayır butonuna basınca başka bir MsgBox kutusu açılsın


<script language=vbscript>

MsgBox "Rehberine Numaranız Başarıyla Eklendi..." ,36, "İŞLEM BAŞARILI"

Kayit.submit()

</SCRIPT>



--------------------herkese şimdiden teşşekkür ederim-----------------------------

Dim StrEkdnsMsg1 As String
Dim StrEkdnsMsg2 As String

StrEkdnsMsg1 = MsgBox("Rehberine Numaranız Başarıyla Eklendi...",vbYesNo, "İŞLEM BAŞARILI")
StrEkdnsMsg2= MsgBox("Rehberine Numaranız Başarıyla Eklenemedi...","İŞLEM HATALI")

If StrEkdnsMsg1 = vbYes Then
Kayit.submit()
Else
StrEkdnsMsg2
End If