Skip to main content

AccessTr.neT


Bir alana bilgi girildiğinde diğer alanın otomatik olarak değişmesi

Bir alana bilgi girildiğinde diğer alanın otomatik olarak değişmesi

Çözüldü #1
Merhaba,

Ekteki çalışmala ilişkin iki konuda yardımlarınıza ihtiyacım var.

1. Dava_Kayit Tablosuna bağlı Q_Dava_Kayıt formunda ismini Yeni Gelişme olarak verdiğim (Tablo üzerindeki ismi Son_Durum_2) alana kayıt girildiğinde otomatik olarak rapor tipinin aylığa dönmesini ve burdaki kaydı sildiğimde ise kaydın tekrar boş olarak kalmasını sağlamak;

2. Dava Statüsünü Kararlı-Arşiv olarak değiştirdiğimde Arşiv tarihine değiştirme tarihinin otomatik olarak yazılması ve Derdest çekinin ise false konumuna gelmesini sağlamak.

Şimdiden teşekkürler.

Not:Form üzerinde arama yaptırabilmek için elinde uyarlayabileceğim çalışması olan var ise paylaşabilirmisiniz.

İyi Geceler.
.rar Dava_Kayıt.rar (Dosya Boyutu: 373,19 KB | İndirme Sayısı: 7)
.rar Dava_Kayıt2003_frmt_coskun.rar (Dosya Boyutu: 155,45 KB | İndirme Sayısı: 0)
Cevapla
Çözüldü #2
örneğinizi 2003 formatında yüklerseniz daha çok cevap alırsınız.
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)

+rep Yollar biter Access bitmez. +rep
Cevapla
Çözüldü #3
aynı sorun bendede var. diğer konuda cevap alamadığım için burayada yazıyım dedim.
Cevapla
Çözüldü #4
1. mesaja 2003 formatında eklenmiştir.
GERİ SAYIM;Sen doğduğunda başladı ! Eğer (9) canlı bile olsaydın en fazla (8) kez kaçabilirdin Ölümden ! Bil ki (7) Düvele sultan dahi olsan yerin (6) Mekan olacak sana. En fazla (5) Metre kumaş götürebileceksin ! Kapatacaksın (4) açsanda gözlerini ! Bu (3) günlük fani dünyada Azraile (2) kat olup yalvarsanda nafile EceL geldiğinde (1) gün öleceksin ! İşte, o an herşey (0) dan başlayacak. Çünkü,
ÖLÜM BİR YOK OLUŞ DEĞİL,YENİDEN DOĞUŞTUR !
Cevapla
Çözüldü #5
Sn. aakkir;

1- Madde'de belirtmiş olduğunuz işlem tamamdır aşağıdaki kod ile belirtmiş olduğunuz gibi Son_Durum2 değiştiğinde bilgi yazılı ise Rapor boş("") dolu ise AYLIK olarak yazacaktır.

Private Sub Text89_Exit(Cancel As Integer)
If (Me.Text89.Value = "") Then
Me.Text71.Value = " "
MsgBox ("Rapor Türü Silindi")
Else
Me.Text71.Value = "AYLIK"
MsgBox ("Rapor Türü Aylık Olarak Düzenlendi")
End If
End Sub
2- Arşivleme Statüsü değiştiğinde değiştirme tarihi yazılacak.

Private Sub STATU_Exit(Cancel As Integer)
If (Me.STATU = "Kararlı - Arşiv") Then
Arsiv_Date.Value = Date
Check81.Value = False
MsgBox ("Dava Arşivlendi")
Else
Arsiv_Date.Value = Null
Check81.Value = True
MsgBox ("Dava Arşivden Çıkarıldı")
End If
End Sub

Kolay gelsin.
.rar Dava_Kayıt.rar (Dosya Boyutu: 336,91 KB | İndirme Sayısı: 22)
Son Düzenleme: 10/03/2011, 13:26, Düzenleyen: schworse.
Cevapla
Çözüldü #6
teşekkürler schworse benimde aklımdan geçenler bunlardı.
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)

+rep Yollar biter Access bitmez. +rep
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task