Contact: aviboots(AT)netvision.net.il
41,215 questions
53,717 answers
573 users
Imports System Imports System.IO ' random name with an extension Module RandomFileName Sub Main() Dim filename As String = Path.GetRandomFileName() Console.WriteLine(filename) End Sub End Module ' run: ' ' mgvaqfc5.uls '
Imports System Imports System.IO ' random name without an extension Module RandomFileName Sub Main() Dim filename As String = Path.GetRandomFileName().Replace(".", "") Console.WriteLine(filename) End Sub End Module ' run: ' ' p34kuv2jhxe '
Imports System ' unique filename with a specific extension Module RandomFileName Sub Main() Dim filename As String = $"{Guid.NewGuid()}.txt" Console.WriteLine(filename) End Sub End Module ' run: ' ' b64f9750-9955-465c-bf0c-03e1248c4082.txt '