Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
19/01/2010 10:54
Konu Sahibi
arzuu
Yorumlar
8
Okunma
3303
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

arzuu

Aktivasyon Bekleyen
 29
 341
 38
 17/02/2009
 -
 
 Ofis XP
 24/04/2010,10:04
Eklenecek nesneler
option1=kitap adına göre arama
option2=yazar adına göre arama
text1
datagrid1 ,adodc1(Bu işlemi Ctrl+T ile yapabildiğimiz gibi Menü çubuğundan Project>Components i seçerek de yapabiliriz. Microsoft ADO Data Control 6.0 ) Microsoft DataGrid Control 6.0 ))
kitap.mdb , t_kitapgiris tablosu=KitapAd ve Yazar alanlarını ekliycez.

Adodc1 sağ tıklayıp "General" sekmesinde 3. kısım olan "Use Connection String" Bölümündeki "Build" butonunu basalım. Açılan kısımdaki listeden "Microsoft 4.0 Jet OLE DB provider'i seçelim ve ileri butonuna basarak sonraki pencereden veritabanımızı (kitap.mdb) yerini belirtelim. "Tamam" butonu ile bu pencereyi kapatalım.

Adodc1:visible=false
Adodc1:enabled=true
Datagrid1:datasource=adodc1

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Text1_Change()
If Option1.Value=True Then
Adodc1.CommandType=adCmdUnknwn
Adodc1.RecordSource="select * form t_kitapgiris where[KitapAd]Like'"& _
Trim(Ucase(Text1.Text)) & "%'"
Adodc1.Refresh
End If

If Option2.Value=True Then
Adodc1.CommandType=adCmdUnknwn
Adodc1.RecordSource="select * form t_kitapgiris where[Yazar]Like'"& _
Trim(Ucase(Text1.Text)) & "%'"
Adodc1.Refresh
End If
End Sub



Kullanici Avatari

accessman

Aktif Üye
 Belirtilmemiş
 2.367
 561
 31/10/2008
425
 Denizli
 
 Ofis 2003
 20/09/2016,00:20
teşekkürler arzuu hanım
bu vb mi yoksa Access örneğimi tam anlayamadım
keşke örneği ekleme imkanınız olmuş olsa idi


@benbendedeilem

Kullanici Avatari

arzuu

Aktivasyon Bekleyen
 29
 341
 38
 17/02/2009
 -
 
 Ofis XP
 24/04/2010,10:04
vb örneği sn accessman



Kullanici Avatari

ogulcan92

Aktif Üye
 54
 1.159
 154
 06/05/2009
480
 İzmir
 
 Ofis 2003
 07/08/2015,11:50
Sn:Arzu Hanım
Paylaşım için teşekkürler.



Kullanici Avatari

Puletin

Onursal Üye
 Belirtilmemiş
 1.717
 40
 01/11/2008
416
 -
 
 Ofis 2003
 24/12/2016,00:18
sn.arzuu paylaşım için teşekkürler


Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...

Kullanici Avatari

benremix

Onursal Üye
RA.... SO....
 51
 4.443
 127
 17/05/2009
365
 Ankara
 Şirket Sahibi
 Ofis 2010 64 Bit
 16/12/2018,08:51
Sn Arzu hanım paylaşım için teşekkürler. Saygılar...


Bilgi paylaşıldıkça çoğalır....
Her engel, yaşam koşullarınızı daha iyileştirecek bir fırsattır.


Access için her zaman lazım olacak konu başlıkları listesi




Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  TextBox İçerisinde İçerik Arama ogulcan92 5 2.993 10/03/2012, 19:26
Son Yorum: benremix
  Vb 6 Arama Rapor Sorgu İle Basit Örnekler |By|KiDnArUt| 4 3.925 26/05/2011, 17:13
Son Yorum: |By|KiDnArUt|

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.