Barkodlu Terazi İçin Txt Hazırlamak

1 2
15/09/2020, 21:09

berduş

şimdi anladığım kadarıyla
1 - 1. alan 7 karakter olacak ne az ne çok
2 - 2. alan için 25 olmak zorunda eğer az ise başına boşluk eklenmeli fazlaysa 25'e düşecek
3 - 3. alan 33.ten başlayacak
doğru mu?
15/09/2020, 21:23

zetyu

(15/09/2020, 21:09)berduş yazdı: şimdi anladığım kadarıyla
1 - 1. alan 7 karakter olacak ne az ne çok
2 - 2. alan için  25 olmak zorunda eğer az ise başına boşluk eklenmeli fazlaysa 25'e düşecek
3 - 3. alan 33.ten başlayacak
doğru mu?
evet hocam

hepsi dogru
ama 2.alanda eger az ise başına değil sonuna boşluk olması gerekiyor
15/09/2020, 21:38

berduş

text oluştur butonunda yer

dosyam_AccessTR.writeline (rs_kural.Fields("m1") & rs_kural.Fields("m2") & rs_kural.Fields("m3"))
yukardaki kod yerine aşağıdaki kodu dener misiniz?
 Aln2 = Left(Trim(rs_kural.Fields("m2")), 25)
Aln2 = IIf(Len(Aln2) < 25, Aln2 & Space(25 - Len(Aln2)), Aln2)
dosyam_AccessTR.writeline (rs_kural.Fields("m1") & Aln2 & rs_kural.Fields("m3"))
15/09/2020, 22:15

zetyu

(15/09/2020, 21:38)berduş yazdı: text oluştur butonunda yer

dosyam_AccessTR.writeline (rs_kural.Fields("m1") & rs_kural.Fields("m2") & rs_kural.Fields("m3"))
yukardaki kod yerine aşağıdaki kodu dener misiniz?
 Aln2 = Left(Trim(rs_kural.Fields("m2")), 25)
Aln2 = IIf(Len(Aln2) < 25, Aln2 & Space(25 - Len(Aln2)), Aln2)
dosyam_AccessTR.writeline (rs_kural.Fields("m1") & Aln2 & rs_kural.Fields("m3"))
 hocam ellerinize sağlık 
konuyu cevaplanmışlara taşıyabiliriz.


txt dosyasında veriler karekter sayı ve sırasına göre oluşuyor.
ilginize teşekkür ederim.elinize sağlık

ilginiz ve hızlı cevabınız için teşekkür ederim.
15/09/2020, 22:17

berduş

Rica ederim.
iyi çalışmalar)
1 2