Skip to main content

AccessTr.neT


formdan text yapılan dosyanın değiştirilmesi

formdan text yapılan dosyanın değiştirilmesi

Çözüldü #1
arkadaşlar formdan text dosyası oluştıran bir kodu düğmenin tıklandığında olayı ile çalıştırıyorum text oluşuyor fakat düğmeye her bastığımda formdaki verileri textin içine tekrar tekrar ekliyor. ben ise düğmeye bastığımda text dosyasının içindeki veriler formdaki verilerle güncellensin istiyorum yardımlarınızı bekliyorum iyi çalışmalar.



On Error Resume Next


Dim db As Database
Dim rs As Recordset
Dim tbl As String

Set db = CurrentDb
    
    Dim yol As String
    yol = CurrentProject.Path
    
tbl = "dene"

DoCmd.Hourglass True
Open yol & "/" & Format(Date, "ddmmyyyy") & ".txt" For Append As #1
  Set rs = db.OpenRecordset("tbl_personelsorgu", dbOpenDynaset)
Do Until rs.EOF
Print #1, Nz(rs!tc, 0) & "," & Nz(rs!ad, ""); "," & Nz(rs!soyad, ""); "," & Nz(rs!gorevi, "")

  rs.MoveNext
  Loop
Close #1
DoCmd.Hourglass False
.rar TEXT 111.rar (Dosya Boyutu: 40,23 KB | İndirme Sayısı: 1)
edacan19, 17-04-2010 tarihinden beri AccessTr.neT
Son Düzenleme: 17/03/2015, 10:48, Düzenleyen: edacan19.
Cevapla
#2
sayın edacan19,

EK'te;
bahsettiğiniz talebinize yönelik olarak,alternatif pratik bir çözüm olması adına hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.bilginize.

iyi çalışmalar,
saygılar.
.rar TEXT 11-ATOZ.rar (Dosya Boyutu: 19,44 KB | İndirme Sayısı: 3)
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#3
Sayı atoz112 örneğiniz tam istediğim gibi çok teşekkür ediyorum.
iyi çalışmalar.
edacan19, 17-04-2010 tarihinden beri AccessTr.neT
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task