Zapsání dočasného souboru ve VB.NET
Sekce: Programování / VB.Net Datum: 25.11.2015, Autor: MrK, ID: 4, přečteno 2185x
Potřebujete funkci která zapíše text do dočasného souboru a vrátí jeho název? Tady je:
Public Function Write2TempFile( _
ByVal sText as String) As String
'Ziskej jmeno temp souboru
Dim sFilename As String = _
System.IO.Path.GetTempFileName()
Dim oFS As New System.IO.FileStream( _
sFilename, _
System.IO.FileMode.Append, _
System.IO.FileAccess.Write)
Dim oWrite As New System.IO.StreamWriter(oFS)
oWrite.BaseStream.Seek(0, System.IO.SeekOrigin.End)
'Zapis text
oWrite.WriteLine(sText)
oWrite.Flush()
'Zavri soubor
oWrite.Close()
'vrat nazev temp souboru
Return sFilename
End Function
Použití je potom velice jednoduché
Dim sFilename As String = _
Write2TempFile("Toto je můj dočasný text.")
MessageBox.Show(sFilename)