(24/07/2022, 22:28)hakkih yazdı: Kare 1 tablosunda veriler yatay tek satır çok sütün

bunun anlamı tablonuzdaki sütun sayısının değişebileceği mi yoksa
tekst verisinde her zaman eşit sayıda veri olacağı mı?

tekst veri olacak karakter sayısı iki sağ slaç arasında sayı olacak.
kare 1 tekst dosyasından aktardığımda örnekleme öyle oldu
kare 1 sütün sayısı değişebilir saydırmak lazım
10 - 25 sütün arasında değişebilir
bazı durumda 10 aktarma bazı 20 aktarma bazen 25 lik olabilir
------------

tekrar merhaba
şekillenmiş olan çalışma kod 2 Access uygulaması ektedir.
Kısacası;

KODE_TOP_Form1
kod top alanında yer alan bilgiler
koli No= KL-010275
Açıklama = Smps beslemeli Str2
Tarih :04.25.2022
ve
kod:100204865
ve ek olarak personel
bu bilgiler
KARE_2 tablosunun içine kayıt
KARE_2 tablonun içinde kayıt var olması gereken şekilde

çalışma kod 2 örnek ektedir

Teşekkürler

çalışma kod 2 için formdak aktarma kodu

• KL-010275
  
• /Smps beslemeli Str20
  
• /04.25.2022
  
• /100204865
  
• /100204848
  
• ...
  
• ...
  

veri sıralamasının sabit olduğu varsayılmıştır
ilk / işaretinden önceki alan KOLI_DATA = KL-010275
ikinci / işaretinden önceki alan Açıklma = /Smps beslemeli Str20
üçüncü / işaretinden önceki alan KL_TARİH = /04.25.2022
geriye kalanlar ise eğer 100 ile başlıyorsa  KOD_K1 = /100204865

Private Sub Komut1_Click()

DzTmp = Split(Me.KODE_TOP, "/")

xKoliData = DzTmp(0)

xAciklama = DzTmp(1)

xKlTarih = CLng(CDate(DzTmp(2)))

xPersonel = Me.PERSONEL



For x = 3 To UBound(DzTmp)

xKodK1 = DzTmp(x)

    If Left(xKodK1, 3) = 100 Then

        xSQL = "INSERT INTO KARE_2 ( KOLI_DATA, Açıklma, KOD_K1, PERSONEL,KL_TARİH) VALUES ('" & _

                                    xKoliData & "','" & xAciklama & "','" & xKodK1 & "','" & xPersonel & "'," & xKlTarih & ");"

        

        CurrentDb.Execute (xSQL)

    End If

Next x



End Sub

açıkçası yaptığınız her açıklama, eklenen her örnek kafamı daha çok karıştırıyor ve tam olarak ne yapılmasını istediğinizi henüz anlayabilmiş değilim.
mesela neden 2 farklı dosya eklediniz?
1. dosyada ne yapmaya çalışıyorsunuz, 2. dosyada ne?
eğer amacınız txt dosyasını seçip içindeki verilerin KARE_2 tablosuna aktarılmasıysa KODE_TOP tablosunun amacı ne?
derli toplu şekilde amacınızı ve izleyeceğiniz süreci anlatabilirseniz daha çok yardımcı olabiliriz.

evet biraz karışık oldu
bu işe başlamadan önce kafamda tam olarak oturmuş bir şey yoktu / nasıl olacak ne olacak net değildi
aynı durum bende de vardı
göndermiş olduğunuz kodlar için teşekkür ederim
------------------

son halini ek dosya olarak ilave etim

KARE_QR formda takıldı
kodları daha önce çalışmış olduğum bir projeden aldım ama bir yerde yanlış yaptım galiba
QR CODE Üret ve Tüm Kayıtlar düğümeler istediğim gibi çalışmadı.
kodlarla ilgili bu kısımda yardım alabilir miyim

son halini bitirdiğimde sizinle paylaşırım
çok değişik bir proje ama işe yarayacak diğer üyelerimiz de kullanabilir