1
2
3
4
5
6
7
8
9
10
11
12
|
Imports System.IO
Public Class Toolbox
Public Shared Sub WriteAndOpenInNotepad(ByVal pContent As String)
Dim filename As String = Path.GetTempFileName & ".txt"
File.WriteAllText(filename, pContent, Text.Encoding.Default)
Process.Start("notepad.exe", filename)
End Sub
End Class
|