
Moderator: Gurus

' Returns the path to MediaMonkey's configuration (ini) file or "" if it doesn't exist
Function GetINIPath()
GetINIPath = ""
Dim INIPath_MyMusic, INIPath_Program, FSO
INIPath_MyMusic = SDB.MyMusicPath & "MediaMonkey\MediaMonkey.ini"
INIPath_Program = SDB.ApplicationPath & "MediaMonkey.ini"
Set FSO = CreateObject("Scripting.FileSystemObject")
If FSO.FileExists(INIPath_MyMusic) Then
GetINIPath = INIPath_MyMusic
Else
If FSO.FileExists(INIPath_Program) Then
GetINIPath = INIPath_Program
End If
End If
End Functiontrixmoto wrote: I thinik most script users (who are not script writers) prefer to have a single script file as it is easier for them to install.
Users browsing this forum: No registered users and 0 guests