AccessTr.neT

Tam Versiyon: Listbox İle İlgili
Ş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 Kadir Bey,

listbox ile ilgili birkaç sıkıntım var,

1) KayitId nin formatını 5 haneli yaptım(00001) fakat  kayitno diye diğer numaralamaya  yıl+ ay + kayit id eklediğimde 00001 yerine 1 olarak geliyor. keza yandaki kayıtnumarasına da o şekilde geliyor (pozid+yil+ay+kayitid).
2)pozid listede rakam olarak (1,2,3) olarak gözüküyor, yazı olarak yani sutun 2 deki değerleri nasıl gösteririz.
3)listbox ın sonundaki son eleman olan fax dan sonra boxın bitmesini istiyorum ama beyaz uzun bir boşluk eklenmiş sonuna, onu da nasıl yok edebiliriz.
merhaba 
otomatik ıd alanı ile oynamanızı hiç tavsiye etmem.
yani illaki 00001görünmesi isteniyor ise
Kod:
SELECT tblKayitlar.KayitId, tblKayitlar.PozNo, tblKayitlar.KayitNo, "0000" & [KayitId] & "-" & [PozNo] & [KayitNo] AS [KAYIT NUMARASI], tblKayitlar.FirmaUnvan, tblKayitlar.YetkiliKisi, tblKayitlar.Adres, tblKayitlar.Telefon, tblKayitlar.Faks
FROM tblKayitlar
WHERE (((([tblKayitlar].[PozNo]) & "*") Like "*" & [Forms]![frmListe]![txtKayitNoTemp] & "*") AND ((([tblKayitlar].[FirmaUnvan]) & "*") Like "*" & [Forms]![frmListe]![txtFirmaUnvanTemp] & "*") AND ((([tblKayitlar].[YetkiliKisi]) & "*") Like "*" & [Forms]![frmListe]![txtYetkiliKisiTemp] & "*") AND ((([tblKayitlar].[Telefon]) & "*") Like "*" & [Forms]![frmListe]![txtTelefonTemp] & "*"));

gibi yapabilirsiniz.
(17/05/2018, 19:02)A.Kadir. yazdı: [ -> ]merhaba 
otomatik ıd alanı ile oynamanızı hiç tavsiye etmem.
yani illaki 00001görünmesi isteniyor ise
Kod:
SELECT tblKayitlar.KayitId, tblKayitlar.PozNo, tblKayitlar.KayitNo, "0000" & [KayitId] & "-" & [PozNo] & [KayitNo] AS [KAYIT NUMARASI], tblKayitlar.FirmaUnvan, tblKayitlar.YetkiliKisi, tblKayitlar.Adres, tblKayitlar.Telefon, tblKayitlar.Faks
FROM tblKayitlar
WHERE (((([tblKayitlar].[PozNo]) & "*") Like "*" & [Forms]![frmListe]![txtKayitNoTemp] & "*") AND ((([tblKayitlar].[FirmaUnvan]) & "*") Like "*" & [Forms]![frmListe]![txtFirmaUnvanTemp] & "*") AND ((([tblKayitlar].[YetkiliKisi]) & "*") Like "*" & [Forms]![frmListe]![txtYetkiliKisiTemp] & "*") AND ((([tblKayitlar].[Telefon]) & "*") Like "*" & [Forms]![frmListe]![txtTelefonTemp] & "*"));

gibi yapabilirsiniz.

Basa 0000 eklemişsiniz sanırım, basamak olarak degil, o zaman id 125 oldugunda 00125 olarak gözükmeyecek sanki, yanlış mıyım?
Aynen yanilmiyorsunuz
(17/05/2018, 21:15)A.Kadir. yazdı: [ -> ]Aynen yanilmiyorsunuz

Peki nasıl yazabiliriz Kadir Bey? Bir çözüm yolu yok mu?
sn: sidd LST1 sattır kaynağını aşağıdaki sorgu ile değiştiriniz. Değiştirdiğinizde. Kayıt id 00001 olarak devam edecek eklenen her sayıda sadece 5 hane gözükecek.
misal:
00001
00010
00100
01000
01001
         gibi,
SELECT Format([KayitId],"00000") AS [Kayıt ID], tblKayitlar.PozNo, tblKayitlar.KayitNo, tblKayitlar.[KayitId] & "-" & [PozNo] & [KayitNo] AS [KAYIT NUMARASI], tblKayitlar.FirmaUnvan, tblKayitlar.YetkiliKisi, tblKayitlar.Adres, tblKayitlar.Telefon, tblKayitlar.Faks
FROM tblKayitlar
WHERE (((([tblKayitlar].[PozNo]) & "*") Like "*" & [Forms]![frmListe]![txtKayitNoTemp] & "*") AND ((([tblKayitlar].[FirmaUnvan]) & "*") Like "*" & [Forms]![frmListe]![txtFirmaUnvanTemp] & "*") AND ((([tblKayitlar].[YetkiliKisi]) & "*") Like "*" & [Forms]![frmListe]![txtYetkiliKisiTemp] & "*") AND ((([tblKayitlar].[Telefon]) & "*") Like "*" & [Forms]![frmListe]![txtTelefonTemp] & "*"));

bu işlem için format fonksiyonu kullanılır.  format (alanadi; "000000") 
kaç sıfır koyarsanız o kadar sıfır ekler başa rakam büyüdükçe sıfır hane sayısı aynı kalıp sıfırlar azalır, misal de olduğu gibi

bu şekilde yaparsanız, sadece görünürde sıfırları eklemiş olursunuz.
Sayfalar: 1 2