AccessTr.neT
form üzernden txt formatlı kaydetme(vbs uzantılı) - Baskı Önizleme

+- 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ığı: form üzernden txt formatlı kaydetme(vbs uzantılı) (/konu-form-uzernden-txt-formatli-kaydetme-vbs-uzantili.html)



form üzernden txt formatlı kaydetme(vbs uzantılı) - karabattak - 12/02/2013

Merhaba
ekteki örnek dosyamda tablo1 alanında tek satır bilgi içeren bir yazı alanları bulunmakta.
form1de bu alanlardaki bazı alanları düzenlemek için oluşturulmuş durumda.
yapmak istediğim form1 alanından bazı metinleri değiştirdiğimde "vbs oluştur" butonuna bastığımda tablo1 de bulunan tek satırdaki tüm sütün içindeki metinlerin yanyana olacak şekilde txt dosyasına deneme.vbs adı ile kaydedilmesini sağlamak.
bir nevi vbs mesaj oluşturucu gibi birşey yapmak istiyorum.
şimdiden cevap yazacak ve yardımcı olacak arkadaşlarıma teşekkür ederim.

saygılarımla.


Cvp: form üzernden txt formatlı kaydetme(vbs uzantılı) - Yandemir - 12/02/2013

tablodan değilde ekrandakileri yazdırdığınızı düşünürsek.

Dim Yazdir as string    
Open Application.CurrentProject.Path & "\Deneme.VBS" For Output As #1
Yazdir=me.mesaj1 & me.mesaj2 & me.mesaj3 & me.mesaj4 & ........
Print #1, Yazdir
Close #1



Cvp: form üzernden txt formatlı kaydetme(vbs uzantılı) - karabattak - 12/02/2013

sayın Yandemir
cevabınız için çok teşekkür ederim.
kod çalışıyor. sağolun.