This is visual basic.
Private Function TempPath() As String
Const MaxPathLen = 256 ‘Max length of the path, just as big as possible
Dim FolderName As String ‘Name of the folder
Dim ReturnVar As Long ‘Return Value
To do so, you need to wrap the code between
[sourcecode language="vb"] and
[/sourcecode]. It supports the following languages.