Skip to main content

AccessTr.neT


Araç Takip programı hakkında.

Araç Takip programı hakkında.

#1
Sayın hocalarım ;

Kolay gelsin hayırlı ramazanlar. Çok soru sorduğumun farkındayım ama birşeyler öğrenmek didikleyerek kurcalayarak birşeyler yapmak istiyorum....

Simendifer arkadaşımızın yazmış olduğu araç takip programına bir kaç düzenleme yaptım. Ama bir kaç eksik yada gözümden kaçan ayar var. Misal bir aracı kaydediyorum. Sonra bakım menüsüne tıkladığım zaman en son kaydettiğim araç  2 tane oluyor. muayene butonuna tıklayınca 3 diğer butonlara sırayla tıkladıkça kaydettiğim son araç hep 1 artıyor.

C*e*l*o*y*c*e hocamım yazmış olduğu araç takip programından aldığım birkaç kısmı bu programa entegre etmeye çalışytım.

Mevlüt hocam senin araç takip programındaki arama kısmında şoför adı plaka araç ismi ne yazarsan yaz buluyordu. O butonu da bu programa ekledim fakat sadece o arama yerini çalıştıramadım sana zahmet olmazsa bakarmısın?
.rar ARAÇ TAKİP PRG V5.28.11.2014.rar (Dosya Boyutu: 464,21 KB | İndirme Sayısı: 176)
Son Düzenleme: 25/06/2016, 19:05, Düzenleyen: IceMan7.
Cevapla
#2
Sayın iceman7

Hangi formdan bahsettiğnizi tam olarak anlayamasamda,

muayene bilgileri formunu açtığınızda yeni kayıt eklenmiş olarak form açılıyor.

Siz formdaki liste kutusunu tıkladığınızda

Me.PLAKA = Me.Liste376.Column(0)
Me.saseno = Me.Liste376.Column(3)
Me.motorno = Me.Liste376.Column(4)
Me.MARKA = Me.Liste376.Column(1)
Me.MODEL = Me.Liste376.Column(2)
Me.ŞOFÖR_ADI = Me.Liste376.Column(5)
Me.YIL = Me.Liste376.Column(7)
Me.TESCIL_TARIHI = Me.Liste376.Column(8)
Me.YAKIT_CINSI = Me.Liste376.Column(9)
Me.KATEGORI = Me.Liste376.Column(6)
Me.HESAP_NO = Me.Liste376.Column(10)


kodu çalıştığı için yeni kayıt eklemiş oluyorsunuz.

Bu kodun tamamını silin,

liste kutusunun güncelleştirme sonrasında olayına aşağıdaki kodu ekleyiniz.

 Dim rs As Object

    Set rs = Me.Recordset.Clone
    rs.FindFirst "[PLAKA] = '" & Me![Liste376] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark

ayrıca, bu kodda, liste kutusunun 1. sütunundaki veriye göre kayıt bulur.

kimlik bilgileri tablosuna otomatik sayı alanı ekleyip (birincil anahtar olmalı) liste kutusunun 1. sütununu yeni oluşturulan alan olarak belirleyin.

Şu anki haliyle, aynı plaka 2 kere girilirse sadece 1. plakayı görebilirsiniz.

Arama mevzusunun ilgili formunun ismini yazarsanız arama olayına çözüm bulabiliriz.
Cevapla
#3
sayın IceMan7,

konu takibiniz açısından,hatırlatma anlamında;
konunuz ile ilgili son gelişme ne durumdadır.

şüphesiz,işlemleriniz tamamlanmış ve sorununuzu çözmüş de olabilirsiniz.site içi aramalarınız neticesinde sitede yer alan konuları ve örnekleri incelemelerinizin sonucu ile bazı gelişimler elde etmiş de olabilirsiniz...bilgilendirmek ister misiniz lütfen.teşekkürler.

bilginize...iyi çalışmalar,saygılar.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#4
Konu;

gerek paylaşılan bilgiler neticesinde çözüme kavuşturuldu düşüncesi ile ve gerekse de
konu sahibinin zaman zarfında ayrıntılı geri dönüş bildirimleri olmaması nedeni ile,
(gerektiğinde konu sahibinin geri bildirim hakkı saklı kalmak üzere)

Cevaplanmış Sorular kategorisi içerisine taşınmıştır.

bilginize.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#5
slm giriş bilgileri verebilirmisiniz
Cevapla
#6
,
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task