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

Derecelendirme: 0/5 - 0 oy

arzuu

desire
Kullanici Avatari
Aktivasyon Bekleyen
341
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


Cevapla

accessman

Aktif Üye
Kullanici Avatari
Aktif Üye
2.367
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
Cevapla

arzuu

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


Cevapla

ogulcan92

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


Cevapla

Puletin


Kullanici Avatari
Altın Üye
1.715
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...
Cevapla

benremix

Uzman
Kullanici Avatari
Uzman
R.... S....
4.433
17/05/2009
365
Ankara
Ofis 2010
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


Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

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

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