Dim fileData As Byte() fileData = Encoding.ASCII.GetBytes(strstream) Dim sTempFileName As String = Application.StartupPath & "\" & sfilename If Not fileData Is Nothing Then End If 'Read image data into a file stream Using fs As New FileStream(sfilename, FileMode.OpenOrCreate, FileAccess.Write) fs.Write(fileData, 0, fileData.Length) 'Set image variable value using memory stream. fs.Flush() fs.Close() End Using 'Open File Process.Start(sfilename)
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)