Skip to main content

AccessTr.neT


Kamp Ekleme-Çıkarma

orhantanriverdi
orhantanriverdi
2
1576

Kamp Ekleme-Çıkarma

Çözüldü #1
Sayın hocalarım,

Ekte genelde şantiye kamplarında kullanıcalbilecek bir dosya mevcut. Bir konuda destek ve yardımınıza ihtiyacım bulunmakta. Soruya gelince.

F_PERSONEL formunu açtığımızda ismi seçtikten sonra KAMP BİLGİLERİ butonuna bastığımızda açılan F_KAMP formundan KAMP ADI hucresinden en üstteki 1 - B110 - 110 seçip durumu kutusunu da cilick"ledikten sonra EKLE tuşuna bastığımızda TABLO tbl_ODALAR tablosuna kişiyi atıyor. Buraya kadar herşey normal.
TABLO tbl_ODALAR da KAMADI-1 / BINANO-B110 / ODANO-110 da kalan kişi sayısı 8 kişidir. Yukarıda yaptığımız işlemde kayıt girerken adı-bina-oda ya eşit gelen kayıt var ise F_KAMP formundan gelen bilgileri bunların yanına yazması yani EKLE tuşuna bastığımda gidip yeni kayıt açmayacak Mevcut odada yer var ise odaya eklemeli yok ise uyarıda bulunsun gibi.

Umarım anlatabilmişimdir:
.rar KAMP.rar (Dosya Boyutu: 68,86 KB | İndirme Sayısı: 10)
Cevapla
Çözüldü #2
bunu F_KAMP formuna yapıştırın. istediğiniz olacaktır.

Private Sub KAMPADI_BeforeUpdate(Cancel As Integer)
Dim odakapasite As Integer

odakapasite = DCount("KAMPADI", "tbl_odalar", "KAMPADI='" & kadI & "' AND BINANO=" & BINANO & " AND ODANO=" & ODANUMARA)
If odakapasite = 8 Then
MsgBox "BU ODAYA PERSONEL EKLEYEMEZSİNİZ..."
End If
End Sub
komşuda dülger mi var geliyor keser sesi,
ustalar konuşunca çıraklar keser sesi.
Cevapla
Çözüldü #3
Sayın hocam, malasef çalışmadı. Biryerlerde bir şey var ama çözemedim gitti(((
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task