webbrowser İF hakkında
Tarih
30/05/2012 13:10
Konu Sahibi
drummers
Yorumlar
2
Okunma
1549
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



drummers
Omur Can
Kullanici Avatari
Destek
O.... C....
400
11/05/2009
125
İzmir
Ofis 2003
Bugün,15:22
Çözüldü 
Sponsor Reklam

Visual Basic Code
1
2
3
4
5
6
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        On Error Resume Next
        
   Me.WebBrowser1.Document.GetElementById("isyeriacilisyil").SetAttribute("Value", 1)
      
    End Sub


Bu kod ile açılan sayfada "isyeriacilisyil" id li alanın "1" (MERKEZ) alanını seçtirtiyorum. ("2" ŞUBE)

Bana bu işlemden önde bir if lazım onunda şartı şudur

Eğer textbox1 de veri varsa

Me.WebBrowser1.Document.GetElementById("isyeriacilisyil").SetAttribute("Value", 1)

Eğer textbox2 de veri varsa

Me.WebBrowser1.Document.GetElementById("isyeriacilisyil").SetAttribute("Value", 2)

Eğer textbox1 ve textbox2 de aynı anda veri varsa "Merkezmi Şubemi kaydı yapılacak" şekline soru sormasını istiyorum. Teşekürler

drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

alpeki99
Yeniden başlayabilmek...
Kullanici Avatari
Uzman
O....
6.023
29/10/2008
Ordu
Ofis 2013 32 Bit
Dün,14:08
Çözüldü 

Visual Basic Code
1
2
3
4
5
6
7
8
9
If (Not String.IsNullOrEmpty(textBox1.Text)) AndAlso (String.IsNullOrEmpty(textBox2.Text)) Then
	MessageBox.Show("1 Dolu - 2 Boş", "AccessTr.Net", MessageBoxButtons.OK, MessageBoxIcon.Information)
ElseIf (String.IsNullOrEmpty(textBox1.Text)) AndAlso (Not String.IsNullOrEmpty(textBox2.Text)) Then
	MessageBox.Show("1 Boş - 2 Dolu", "AccessTr.Net", MessageBoxButtons.OK, MessageBoxIcon.Information)
ElseIf (Not String.IsNullOrEmpty(textBox1.Text)) AndAlso (Not String.IsNullOrEmpty(textBox2.Text)) Then
	MessageBox.Show("1 Dolu - 2 Dolu", "AccessTr.Net", MessageBoxButtons.OK, MessageBoxIcon.Information)
Else
	MessageBox.Show("1 Boş - 2 Boş", "AccessTr.Net", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If


İki tane metin kutusu : textBox1 ve textBox2 ekleyin. Bir buton ekleyin ve Click olayına yukarıdaki kodları yapıştırın. Tüm ihtimallere göre if yapınız bu şekildedir.

AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.
Cevapla

drummers
Omur Can
Kullanici Avatari
Destek
O.... C....
400
11/05/2009
125
İzmir
Ofis 2003
Bugün,15:22
Çözüldü 
Sponsor Reklam
(30/05/2012, 13:47)alpeki99 Adlı Kullanıcıdan Alıntı:

Visual Basic Code
1
2
3
4
5
6
7
8
9
If (Not String.IsNullOrEmpty(textBox1.Text)) AndAlso (String.IsNullOrEmpty(textBox2.Text)) Then
	MessageBox.Show("1 Dolu - 2 Boş", "AccessTr.Net", MessageBoxButtons.OK, MessageBoxIcon.Information)
ElseIf (String.IsNullOrEmpty(textBox1.Text)) AndAlso (Not String.IsNullOrEmpty(textBox2.Text)) Then
	MessageBox.Show("1 Boş - 2 Dolu", "AccessTr.Net", MessageBoxButtons.OK, MessageBoxIcon.Information)
ElseIf (Not String.IsNullOrEmpty(textBox1.Text)) AndAlso (Not String.IsNullOrEmpty(textBox2.Text)) Then
	MessageBox.Show("1 Dolu - 2 Dolu", "AccessTr.Net", MessageBoxButtons.OK, MessageBoxIcon.Information)
Else
	MessageBox.Show("1 Boş - 2 Boş", "AccessTr.Net", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If


İki tane metin kutusu : textBox1 ve textBox2 ekleyin. Bir buton ekleyin ve Click olayına yukarıdaki kodları yapıştırın. Tüm ihtimallere göre if yapınız bu şekildedir.


Teşekkürler
drummers, 11-05-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Star VB.NET WebBrowser Açılışta Siteyi Aşagı Kaydırma Mettleshade 2 196 17/12/2016, 00:20 Mettleshade
Çözüldü Vb.net Webbrowser Yeni Pencere Problemi Sherlock.Holmes 9 1.725 04/12/2015, 19:09 Sherlock.Holmes
Çözüldü ListView1 Listeleme Hakkında drummers 7 1.934 23/05/2015, 12:45 alpeki99
Çözüldü ExecuteReader Fonksiyon Hakkında drummers 2 1.700 30/09/2014, 08:54 drummers
Çözüldü reportviewer hakkında umutakkaya 4 1.586 29/09/2014, 10:24 alpeki99


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya