access yazılan kodun satıra sığımaması
Tarih
21/09/2011 15:09
Konu Sahibi
mehmetb84
Yorumlar
8
Okunma
2335
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
mehmetb84

Kullanici Avatari
Özel Üye
M.... B....
464
29/12/2010
0
Denizli
Ofis 2013 64 Bit
08/05/2017,17:31
Çözüldü 
MErhaba arkadaşlar,
yöndendirmelerinizle daha önce çevçeveyle süzme işlemini ve arama yaptığım liste kutusunu süzme işlemini başka bir veritabanı için kullanmıştım.Bu veritabanıma bunu uyarlamak istedim fakat tablo ve alan isimleri dha auzun olduğu için kod satıra sığımadı.Ve Access satırın bittiği yerde kodu otomatik olarak kapatıyor 2. satırda kalan kodu başka bir kod olarak algılıyor.
Yardımcı olabilirseniz sevinirim.
Tşkler

veritabanı son soruya göre güncellendi.!


Ek Dosyalar
.rar   Database3.rar (Dosya Boyutu: 53,04 KB / İndirme Sayısı: 18)
Cevapla

ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.601
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,00:42
Çözüldü 
Sponsor Reklam
kodu aşağıdaki ile değiştir.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Çerçeve43_AfterUpdate()
hareket = "LARMADEPO"
Select Case Çerçeve43
Case 1
Me.Listekutusu.RowSource = "SELECT t_hambezgönderilen.G_Anahtar, t_hambezgönderilen.giden_ürünadı, t_hambezgönderilen.giden_hambezmt, t_hambezgönderilen.giden_irsaliyeno, t_hambezgönderilen.giden_faturano, t_hambezgönderilen.giden_beztarihi, t_hambezgönderilen.giden_geldigiyer, t_hambezgönderilen.giden_sevkyeri, t_hambezgönderilen.giden_not, t_hambezgönderilen.giden_beztipi, t_hambezgönderilen.giden_kimlik," & _
"[giden_hambezmt] & '*' & [giden_irsaliyeno] & '*' & [giden_geldigiyer] & '*' & [giden_sevkyeri] & '*' & [giden_ürünadı] & '*' & [giden_not] & '*' & [giden_beztipi] & '*' & [giden_kimlik] & '*' & [giden_beztarihi] & '*' & [giden_faturano] AS Arama FROM t_hambezgönderilen WHERE (((t_hambezgönderilen.giden_geldigiyer)='" & hareket & "') AND (([hambezsipno] & '*' & [giden_hambezmt] & '*' & [giden_irsaliyeno] & '*'" & _
"& [giden_geldigiyer] & '*' & [giden_sevkyeri] & '*' & [giden_ürünadı] & '*' & [giden_not] & '*'&[giden_beztipi]&'*' & [giden_beztarihi] & '*' & [giden_faturano]) Like '*' & [Formlar]![t_hambezgönderilen]![Metin100] & '*')) ORDER BY t_hambezgönderilen.giden_beztarihi;"
Case 2
Me.Listekutusu.RowSource = "SELECT t_hambezgönderilen.G_Anahtar, t_hambezgönderilen.giden_ürünadı, t_hambezgönderilen.giden_hambezmt, t_hambezgönderilen.giden_irsaliyeno, t_hambezgönderilen.giden_faturano, t_hambezgönderilen.giden_beztarihi, t_hambezgönderilen.giden_geldigiyer, t_hambezgönderilen.giden_sevkyeri, t_hambezgönderilen.giden_not, t_hambezgönderilen.giden_beztipi, t_hambezgönderilen.giden_kimlik," & _
"[giden_hambezmt] & '*' & [giden_irsaliyeno] & '*' & [giden_geldigiyer] & '*' & [giden_sevkyeri] & '*' & [giden_ürünadı] & '*' & [giden_not] & '*' & [giden_beztipi] & '*' & [giden_kimlik] & '*' & [giden_beztarihi] & '*' & [giden_faturano] AS Arama FROM t_hambezgönderilen WHERE (((t_hambezgönderilen.giden_geldigiyer)<>'" & hareket & "') AND (([hambezsipno] & '*' & [giden_hambezmt] & '*' & [giden_irsaliyeno] & '*'" & _
"& [giden_geldigiyer] & '*' & [giden_sevkyeri] & '*' & [giden_ürünadı] & '*' & [giden_not] & '*'&[giden_beztipi]&'*' & [giden_beztarihi] & '*' & [giden_faturano]) Like '*' & [Formlar]![t_hambezgönderilen]![Metin100] & '*')) ORDER BY t_hambezgönderilen.giden_beztarihi;"
End Select
Me.Listekutusu.Requery
End Sub


Cevapla

mehmetb84

Kullanici Avatari
Özel Üye
M.... B....
464
29/12/2010
0
Denizli
Ofis 2013 64 Bit
08/05/2017,17:31
Çözüldü 
_ koyuyoruz kodun sonuna anladım.Fakat yeni bir sorunum var sanırım kodum hatalı, çünkü hangi seçeneği seçersem seçeğim koşullarımı sağlamıyor.Bir kontrol edebilir misiniz?

dosyayı güncelledim ,son hali ektedir.
Cevapla

ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.601
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,00:42
Çözüldü 
Sponsor Reklam
1. mesaja eklediğiniz ilk örnek ile şu anki örnek farklı
Seçenek grubunu değiştirmişsiniz. Son örneğinizde seçenek grubunun adı "Çerçeve109", siz kodda

Visual Basic Code
Select Case Çerçeve43

yazmışsınız.

Visual Basic Code
Select Case Çerçeve109

olarak değiştirin.

2. olarak; benim 2. mesajda gönderdiğim koddaki case 2 koduna bakacak olursanız

Visual Basic Code
((t_hambezgönderilen.giden_geldigiyer)<>'" & hareket & "')

kodunu göreceksiniz, ama siz case 2'ye

Visual Basic Code
((t_hambezgönderilen.giden_geldigiyer)='" & hareket & "')

kodunu eklemişsiniz.

Cevapla

mehmetb84

Kullanici Avatari
Özel Üye
M.... B....
464
29/12/2010
0
Denizli
Ofis 2013 64 Bit
08/05/2017,17:31
Çözüldü 
evet çerçeve ismi gözümden kaçmış,sıkıntı orda ,diğer kodları değiştirmiştim evet doğru onlar istediğim gibi son hali.Çok tşkler çalıştı şimdi,emeğinize aklınıza sağlık. Kısa birşey daha sorucam, caselerin sonunda geçen sıralama kodunu azalan veya artan olarak nasıl değiştirebilirim ,yani vb kodu nedir o sıralamayı uygulamanın? ( ORDER BY t_hambezgönderilen.giden_beztarihi;")
Cevapla

ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.601
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,00:42
Çözüldü 
Sponsor Reklam
(22/09/2011, 10:37)mehmetb84 Adlı Kullanıcıdan Alıntı: _ koyuyoruz kodun sonuna anladım......


kodun sonuna _ koymuyoruz,

SQL Code
"SELECT Tablo1.Kimlik, Tablo1.Alan1, Tablo1.Alan2, Tablo1.Alan3 FROM Tablo1 WHERE (((Tablo1.Kimlik)=1))"


kodunu

SQL Code
"SELECT Tablo1.Kimlik, Tablo1.Alan1,"& _
" Tablo1.Alan2, Tablo1.Alan3 FROM Tablo1"& _
" WHERE (((Tablo1.Kimlik)=1))"


şeklinde yazıyoruz.



Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Access Te Alt Satıra Geçemiyorum sancho16 3 81 Dün, 11:42 atoz112
  Access 2003 De Yapılan Dosyanın Access 2010 Da Çalıştırılması Kullanıcı Güvenlik Prob keskin78 9 191 14/05/2017, 14:54 keskin78
  Tabloda Seçili Satıra Ait Veriyi Güncelleme pelitt 14 330 13/05/2017, 12:22 atoz112
  Wep Access Dosyasını Masaüstü Access Dosyasına Çevirme next 7 295 02/04/2017, 23:36 next
  Liste Kutusunda Satıra Sığmama ve Fİltreleme Sorunu mmert06 7 334 29/10/2016, 01:27 ozguryasin


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