02/02/2012, 22:34
textboxa girilen son karakteri alma
1 2
02/02/2012, 22:36
goodfalles
right hata veriyor sebebini bilmioyrum ama altını çiziyor
mcmaho verdiği kodla çözdüm sorunu bi son daha sorun var kopyalam olayı textboxa yazılan veriyi worde kaydetmesini istiyorum programın ama bu zor sanırım
edit: hocam şimdi gördüm yazdığınızı evet o şekilde çalıştı teşekkürler iki türlüde çalışıyor
mcmaho verdiği kodla çözdüm sorunu bi son daha sorun var kopyalam olayı textboxa yazılan veriyi worde kaydetmesini istiyorum programın ama bu zor sanırım
edit: hocam şimdi gördüm yazdığınızı evet o şekilde çalıştı teşekkürler iki türlüde çalışıyor
02/02/2012, 22:36
mcmaho
Sagolun hocam. tşk
08/02/2012, 21:31
mcmaho
kusura bakma, textbox taki veriyi worde kaydetme sorusunu yeni gördüm. "c:\test.doc" şeklinde word dosyası oluştur.veya dosya yolunu degiştirerek de kullanabilirsin. kolay gelsin.
Try
Dim fs As System.IO.FileStream = New System.IO.FileStream("c:\test.doc", IO.FileMode.Append, IO.FileAccess.Write)
Dim yazdırma As System.IO.StreamWriter = New System.IO.StreamWriter(fs)
yazdırma.Write(Chr(13) + TextBox1.Text)) 'chr(13) komutu bir alt satıra geciriyor.
yazdırma.Close()
fs.Close()
Catch
End Try
Try
Dim fs As System.IO.FileStream = New System.IO.FileStream("c:\test.doc", IO.FileMode.Append, IO.FileAccess.Write)
Dim yazdırma As System.IO.StreamWriter = New System.IO.StreamWriter(fs)
yazdırma.Write(Chr(13) + TextBox1.Text)) 'chr(13) komutu bir alt satıra geciriyor.
yazdırma.Close()
fs.Close()
Catch
End Try
09/02/2012, 00:18
goodfalles
çalıştıramadım olmadı
Try
Dim fs As System.IO.FileStream = New System.IO.FileStream("c:\test.doc", IO.FileMode.Append, IO.FileAccess.Write)
Dim yazdırma As System.IO.StreamWriter = New System.IO.StreamWriter(fs)
yazdırma.Write(Chr(13) + TextBox1.Text)
''chr(13) komutu bir alt satıra geciriyor.
yazdırma.Close()
fs.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
yazdım bu şekilde C içine test adında word dosyasıda açtım
Try
Dim fs As System.IO.FileStream = New System.IO.FileStream("c:\test.doc", IO.FileMode.Append, IO.FileAccess.Write)
Dim yazdırma As System.IO.StreamWriter = New System.IO.StreamWriter(fs)
yazdırma.Write(Chr(13) + TextBox1.Text)
''chr(13) komutu bir alt satıra geciriyor.
yazdırma.Close()
fs.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
yazdım bu şekilde C içine test adında word dosyasıda açtım
09/02/2012, 22:36
goodfalles
sorunu hallettim çok teşekkürler hocam : ) ) ) )
test dosyasını kendim oluşturmadan denedim hata verecekmi diye bakarken bi baktım test dosyası oluşmuş yazıyıda içine eklemiş süper oldu bu kod teşekkürler : )
test dosyasını kendim oluşturmadan denedim hata verecekmi diye bakarken bi baktım test dosyası oluşmuş yazıyıda içine eklemiş süper oldu bu kod teşekkürler : )
1 2