mirror of
https://github.com/Ardour/ardour.git
synced 2026-01-04 04:39:33 +01:00
[Summary]: delete some Preferences in the process of Tracks Live uninstall on windows
This commit is contained in:
parent
2b9434b6af
commit
b4fe7e9026
2 changed files with 27 additions and 4 deletions
|
|
@ -0,0 +1,20 @@
|
|||
' deletes Tracks Live Preferences
|
||||
' except recent and config
|
||||
Sub DeleteFile(filespec)
|
||||
Dim fso
|
||||
Set fso = CreateObject("Scripting.FileSystemObject")
|
||||
If (fso.FileExists(filespec)) Then
|
||||
fso.DeleteFile(filespec)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Dim objNetwork
|
||||
Set objNetwork = CreateObject("WScript.Network")
|
||||
strUserName = objNetwork.UserName
|
||||
path_to_preferences="c:\Users\"+strUserName+"\AppData\Local\Tracks Live\.config\"
|
||||
|
||||
Call DeleteFile (path_to_preferences+"instant.xml")
|
||||
Call DeleteFile (path_to_preferences+"sfdb")
|
||||
Call DeleteFile (path_to_preferences+"ui_config")
|
||||
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue