Backup 6.0 - Updated 01/07/2014

[Erwin Hanzl]

Hello Dypsis,

actually only functioning scripts should be available for selection in the MM add-ons.
I solved the problem - I deleted it from the extensions and won't be using it.

Best regards

[owned13199]

Hi guys, I keep on getting this error when I try to backup, manually or at shutdown. I'm not using a portable version and I'm on windows10. Any clue of what I should do? Many thanks in advance!

[compupix]

At launch, I get the following error:
Error #76 - Microsoft VBScript runtime error
Path not found
File: "C:\Users\{me}\AppData\Roaming\MediaMonkey\Auto\Backup.vbs", Line: 1730, Column 2
https://drive.google.com/file/d/1JZTbQF ... sp=sharing

What path is it looking for?
Thanks!

[martialartsguy]

At launch, I get the following error:
Error #76 - Microsoft VBScript runtime error
Path not found
File: "C:\Users\{me}\AppData\Roaming\MediaMonkey\Auto\Backup.vbs", Line: 1730, Column 2
https://drive.google.com/file/d/1JZTbQF ... sp=sharing

What path is it looking for?
Thanks!

Getting the same error after a reformat of my drive and reinstallation of MM4.

[Peke]

Hi,
Have you opened "C:\Users\{me}\AppData\Roaming\MediaMonkey\Auto\Backup.vbs" in notepad and check what path plugin searches.

Also check plugin options for invalid paths.

[martialartsguy]

Hi,
Have you opened "C:\Users\{me}\AppData\Roaming\MediaMonkey\Auto\Backup.vbs" in notepad and check what path plugin searches.

Also check plugin options for invalid paths.

Just installing it after deleting all Backup files, it appears that the error exists in this part:

Code: Select all

Sub CleanUp(par,del) '0=ask 1=yes 2=all
  Dim fol,fil
  If del < 2 Then
    Dim res : res = SDB.MessageBox("Backup - delete folder '"&par.Path&"\'?",3,Array(0,1,3))
    Select Case res
      Case 6 'mrYes
        del = 1
      Case 10 'mrYesToAll
        del = 2
      Case Else
        Exit Sub
    End Select
  End If
  For Each fol In par.SubFolders
    Call CleanUp(fol,del)
  Next   
  For Each fil In par.Files
    Call fil.Delete(True)
  Next
  Call par.Delete(True)  
End Sub

Namely this line:

Code: Select all

For Each fol In par.SubFolders
    Call CleanUp(fol,del)

Then I get an error that the extension was not installed.

EDIT: Welp, I couldn't get it to work, so I'm installing MM5.