+- AccessTr.neT (https://accesstr.net)
+-- Forum: Visual Basic .NET (https://accesstr.net/forum-visual-basic-net.html)
+--- Forum: Visual Basic .NET Cevaplanmış Soruları (https://accesstr.net/forum-visual-basic-net-cevaplanmis-sorulari.html)
+--- Konu Başlığı: vb den word e yazdırma (/konu-vb-den-word-e-yazdirma.html)
Sayfalar:
1
2
Cvp: vb den word e yazdırma - mcmaho - 07/02/2012
arkadasım şunu belirteyim konuyu yanlış yere açmışsın. vb.net bölümüne açman gerekiyordu. ben vb 6 kullanıyorum. vb.net yüklü degil bende şu an. zaten vb.net konusunda fazla bilgim yok.
Dsy.WriteLine("Deneme yazısı")-->> buradaki deneme yazısı yerine text kutusunun adını yazacaksın. ben sadece örnek olsun diye verdim o kodları sana.
her departman farklı word dosyalarına mı kaydedilecek.
Cvp: vb den word e yazdırma - poozo - 08/02/2012
acemilik işte hacım çok teşekkürler zahmet edip uğraştın saol dediğini hemen uygulacağım.evet her departman ayrı bi word dosyası olarak kaydolacakCvp: vb den word e yazdırma - mcmaho - 08/02/2012
Comboboxtan seçilen departmanı if komutuyla kontrol ettirerek yapabilirsin.
If ComboBox1.Text = "Makina Bakım Raporu" Then
Try
Dim fs As System.IO.FileStream = New System.IO.FileStream("c:\raporlar\makinabakimraporu.doc", IO.FileMode.Append, IO.FileAccess.Write)
Dim yazdırma As System.IO.StreamWriter = New System.IO.StreamWriter(fs)
MonthCalendar1.MaxSelectionCount = 1
yazdırma.Write(Chr(13) + (MonthCalendar1.SelectionRange.Start + " " + RichTextBox1.Text)) 'chr(13) komutu bir alt satıra geciriyor.
yazdırma.Close()
fs.Close()
Catch
End Try
End If