Dim a As String = appPath
System.IO.File.Copy("d:\unrar\unrar.bat", "E:\TextFile\store\" + strToday + "\" + "unrar.bat", True) System.IO
System.IO.File.Copy("d:\unrar\unrar.bat", "E:\TextFile\store\" + strToday + "\" + "unrar.bat", True) System.IO