AccessTr.neT

Tam Versiyon: Depo Hareketleri, Seri No Takibi ve Garanti belgesi basımı
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Merhaba,

Sizlerin sayesinde Accesstr.net'ten bu güne kadar çok şey öğrendim ve bunları yaptığım iki uygulamada kullandım.
ilk defa soru soracağım ekte gönderdiğim uygulama ile depo hareketlerinde seri numarası takibini yapıyorum tabi gerçek verileri silerek gönderdim.
sizlerden üç konuda yardım rica ediyorum.

1. seri numaralarını girdiğim alanda sol tarafta girdiğim ürün adeti kadar seri numarası satırı ile sınırlı kalması gerekiyor. (mümkünse)
2. henüz tasarım aşamasında olan garanti belgesi basımı kısmınıda yine seri numarası satırlarının yanında bir tik olabilir onu seçerek tek tek yazdırma ile birlikte seri numarası kısmının en üstünde tek bir tik ile tümünü seçerek tümünü yazdırma.

Ek Dosyalar
 DepoHareket.rar(231.48 KB)

3. seri numarası olmayan ürünler için formun ürünleri girdiğim kısmı üzerinden istediğim adet kadar yazdırma.

örneği 2007 formatında göndermek zorunda kaldım 2003 yaptığımda bazı şeyler çalışmıyor.
şimdiden çok teşekkür ederim.
Lütfen konularınızı Site Kurallarına uygun olarak açınız.

10-) Konu açarken sorununuzu açık bir şekilde ifade etmelisiniz. Sorunuz ile ilgili form, rapor, sorgu vs. nesne isimlerini mutlaka belirtiniz. Sorunuzu mutlaka konuya yazınız, sorunuzu Access form üzerine yazmayınız, konuya soru veya resim içeren slayt veya döküman eklemeyiniz.

Sorunuzun hangi form ile ilgili olduğunu yazmadığınız için görebildiğim kadarıyla;
1. sorunuzun cevabı,
serileri girdiğiniz "Seriler Alt Form" isimli altformun "FormAltbilgisi"ne "KayitSayisi" adında metin kutusu ekle ve denetim kaynağına;
=[Forms]![FisMain]![FisUrun Alt Form].[Form]![MIKTAR]

yaz.

Alt formun Geçerli olduğunda olayına
Private Sub Form_Current()
Form.AllowAdditions = True
End Sub

kodunu, Ekleme Öncesinde olayına;

Private Sub Form_BeforeInsert(Cancel As Integer)

If Me.Metin7.Value < KayitSayisi Then
Form.AllowAdditions = True
Else
Form.AllowAdditions = False
End If
End Sub
kodnu ekle,

2.ve3. sorunuza cevap yazamıyorum.
Site Kuralları:

6/d-) Birden fazla soruyu aynı konuda sormak yasaktır. Her soru için farklı başlıklı yeni konu açınız.
access 2007 olduğu için inceleyemiyorum.
ancak şu Sql kodunun sorguda karşılığı nedir
Kod:
(SELECT GİRİŞ.[FİRMA ADI] FROM GİRİŞ WHERE (((GİRİŞ.[FİRMA ADI])<>"")) ORDER BY GİRİŞ.[FİRMA ADI])UNION (SELECT"(Tümü)"AS [FİRMA ADI] FROM GİRİŞ);
Sayın sledgeab yardımınız için çok teşekkür ederim yazdıklarınızı uyguladım oldu
kayıt sayısı sınırlanıyor ancak sayıyı aştığımızda sürekli son satırdaki kayıtın üstüne yazıyor bunu aşmamızın bir yolunu gösterirseniz zahmet veriyorum kusura bakmayın.
Form.AllowAdditions = False
kodunun hemen altına
Me.SERI_NO.Enabled = False
yazarak metin kutusunu kilitleyebilir, gerektiğinde FisMain formundaki butonun tıklandığında olayına yazacağın
[Seriler Alt Form].[Form]![SERI_NO].Enabled = True
kodu ile kilidi açabilirsin.
Hata veriyor "Bir denetimi odak üzerindeyken devreden çıkaramazsınız"
Sayfalar: 1 2