Dim rp As RuntimePermissions
Dim folder1 As String = rp.GetSafeDirDefaultExternal("test1")
Dim folder2 As String = rp.GetSafeDirDefaultExternal("test2")
File.WriteString(folder1, "1.txt", "test")
RenameTo(folder1, "", folder2, "")
Log(File.ReadString(folder2, "1.txt"))