+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Accesste Txt Den Veri Alma (/konu-accesste-txt-den-veri-alma.html)
Accesste Txt Den Veri Alma - interstellar - 20/06/2023
Merhaba ,
bir klasöre txt dosyası oluşturmak istiyorum ve düzenli aralıklarla içerisine yeni verileri eklemek istiyorum.
Akabinde accesste bu txt den veri çekmek istiyorum ama txt ye eklediğim yeni verileri de görebilsin yani senkronize olsun istiyorum.
Bunu nasıl yapabilirim.
Tek seferlik txt dosyasında ki veriyi accese yükleyebiliyorum ama senkronize hale getiremiyorum
Konu hakkında yardımcı olabilirseniz çok mutlu olacağım.
Şimdiden teşekkür ederim.
İyi günler
RE: Accesste Txt Den Veri Alma - atoykan - 20/06/2023
Merhaba Sayın @interstellar
Kod:
Dim i As Long
Dim rowcount As Integer
Dim buffer As String
Dim strSQL As String
Open "C:\......................\DoyanızınAdı.txt" For Input As #1
rowcount = DCount("[tabloid]", "tablonuzunadı")
Line Input #1, buffer
i = 1
While Not EOF(1)
If i > rowcount Then
DoCmd.SetWarnings False
strSQL = "INSERT INTO [tablo adı] ([alan adı]) VALUES ('" & buffer & "')"
DoCmd.RunSQL strSQL
DoCmd.SetWarnings True
End If
Line Input #1, buffer
i = i + 1
Wend
Close #1kodu ile tablonuzdaki kayıt sayısını belirleyerek text dosyanızdaki bir sonraki satırdan itibaren veriyi tablonuza ekleyebilirsiniz.
RE: Accesste Txt Den Veri Alma - berduş - 21/06/2023
temmuz başına kadar pek zamanım olmayacak ama eğer dosyanızı eklerseniz (hem Access hem de txt) uygun bir zamanda yardımcı olmaya çalışırız.