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

Derecelendirme: 0/5 - 0 oy



mehmetb84

Kullanici Avatari
Özel Üye
M.... B....
451
29/12/2010
0
Denizli
Ofis 2013 64 Bit
Bugün,15:46
Çö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.047
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Bugün,20:16
Çözüldü 
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....
451
29/12/2010
0
Denizli
Ofis 2013 64 Bit
Bugün,15:46
Çö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.047
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Bugün,20:16
Çözüldü 
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....
451
29/12/2010
0
Denizli
Ofis 2013 64 Bit
Bugün,15:46
Çö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.047
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Bugün,20:16
Çözüldü 
(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
  Liste Kutusunda Satıra Sığmama ve Fİltreleme Sorunu mmert06 7 168 29/10/2016, 01:27 ozguryasin
Question Alt Form Otomatik Yeni Satıra Geçiş Akifff 6 333 11/07/2016, 14:35 Akifff
Brick Microsoft Access Yüklü Olmayan Bilgisayarlarda Access Kullanımı (Runtime) OFA 4 359 20/06/2016, 14:47 OFA
  Liste kutusu her satıra renk? aliyorga 2 341 08/05/2016, 11:31 atoz112
Çözüldü alt formdaki satıra koyulan düğme ile satır verilerini rapora aktarmak aragooorn 4 493 24/01/2016, 00:42 aragooorn


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