Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
30/05/2012 13:10
Konu Sahibi
drummers
Yorumlar
2
Okunma
1715
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....
405
11/05/2009
125
İzmir
Ofis 2003
28/08/2017,11:37
Çözüldü 

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

Düşünmek en zor iştir...
Kullanici Avatari
Uzman
O....
6.092
29/10/2008
Bursa
Yazılım Geliştirici
Ofis 2010 32 Bit
20/10/2017,09:01
Çö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....
405
11/05/2009
125
İzmir
Ofis 2003
28/08/2017,11:37
Çözüldü 
(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
Çözüldü VB.NET WebBrowser Açılışta Siteyi Aşagı Kaydırma Mettleshade 2 535 17/12/2016, 00:20 Mettleshade
Çözüldü Vb.net Webbrowser Yeni Pencere Problemi Sherlock.Holmes 9 2.348 04/12/2015, 19:09 Sherlock.Holmes
Çözüldü ListView1 Listeleme Hakkında drummers 7 2.323 23/05/2015, 12:45 alpeki99
Çözüldü ExecuteReader Fonksiyon Hakkında drummers 2 1.944 30/09/2014, 08:54 drummers
Çözüldü reportviewer hakkında umutakkaya 4 1.929 29/09/2014, 10:24 alpeki99

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.