Skip to main content

AccessTr.neT


Barkodlu Terazi İçin Txt Hazırlamak

Barkodlu Terazi İçin Txt Hazırlamak

#7
ş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?
Cevapla
#8
(15/09/2020 21:09)berduş Adlı Kullanıcıdan Alıntı: ş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
zetyu, 11-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
#9
text oluştur butonunda yer

Visual Basic Code
dosyam_AccessTR.writeline (rs_kural.Fields("m1") & rs_kural.Fields("m2") & rs_kural.Fields("m3"))

yukardaki kod yerine aşağıdaki kodu dener misiniz?

Visual Basic Code
 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"))

Cevapla
#10
(15/09/2020 21:38)berduş Adlı Kullanıcıdan Alıntı: text oluştur butonunda yer

Visual Basic Code
dosyam_AccessTR.writeline (rs_kural.Fields("m1") & rs_kural.Fields("m2") & rs_kural.Fields("m3"))

yukardaki kod yerine aşağıdaki kodu dener misiniz?

Visual Basic Code
 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.
zetyu, 11-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
#11
Rica ederim.
iyi çalışmalar)
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da