' Open Folder Path containing New Shadow Copy of Save File and Highlight File in Windows Explorer GUI
' by SemlerPDX Mar2020
' VETERANS-GAMING.COM
Imports Microsoft.VisualBasic
Imports System
Imports System.Collections
Imports System.Collections.Generic
Imports System.Data
Imports System.Drawing
Imports System.Diagnostics
Imports System.Windows.Forms
Imports System.Linq
Imports System.Xml.Linq
Imports System.Threading.Tasks
Imports System.Diagnostics.Process.Start
Public Class VAInline
dim avcsShadowCopyPath as string
dim avcsTimestamp as string
dim avcsProfile as string = "core"
Public Sub Main()
if ((VA.GetText("AVCS_ACTIVE_PROFILE")) IsNot nothing)
avcsProfile = VA.GetText("AVCS_ACTIVE_PROFILE")
end if
if ((VA.GetText("~avcs_shadow_copy_path")) IsNot nothing)
avcsShadowCopyPath = VA.GetText("~avcs_shadow_copy_path")
if ((VA.GetText("AVCS_TIMESTAMP")) IsNot nothing)
avcsTimestamp = VA.GetText("AVCS_TIMESTAMP")
VA.SetText("AVCS_TIMESTAMP", nothing)
avcsShadowCopyPath = avcsShadowCopyPath.ToString() + "\avcs_" + avcsProfile.ToLower() + "_save_ShadowCopy_" + avcsTimestamp.ToString() + ".txt"
Process.Start("explorer.exe", "/select," & avcsShadowCopyPath)
end if
end if
End Sub
End Class
Comments
0 B
|0 👍
/0 👎
0 B
|👍
/👎