Contact: aviboots(AT)netvision.net.il
39,885 questions
51,811 answers
573 users
Imports System.IO Module Module1 Sub Main() Dim s As String = Path.Combine(Path.GetTempPath(), Path.GetRandomFileName()) Console.WriteLine(s) End Sub End Module ' run: ' ' C:\Users\user_name\AppData\Local\Temp\m1t33k12.sbk