How Do I Fix These VB Scripts That Have Just Stopped Working?

RadioGeorge
RadioGeorge used Ask the Experts™
on
I have a couple of VBScripts that were generated a couple of years ago as one of the options in CuteFTP Pro. The scripts connect by FTP, go to my website, then upload or delete certain files. They've worked fine with no problems every month until recently.   Now, I'm getting this error message:

Error Message That Appears When Trying to Run the Program
With a little help from an expert here on EE, I think I've narrowed down what the problem really is. I don't think the problem is with CuteFTP.  I think it is connected with some type of Microsoft system operations, and I have a feeling that an expert versed in Visual Basic can help me get the scripts running again. It looks like the problem is connected with the "Library Not Registered" notation, but that's as far as I can go on my own technically.

Here's part of one of the scripts in question:
--------------------------------------------
' VBS Script Generated by CuteFTP (TM) macro recorder.
' Generated at: 4/8/2015 4:51:49 PM.
' Revised 9/1/2015
' MASTER Upload Spots Script - Oldies - Six Spots

' Create TEConnection object
Set MySite = CreateObject("CuteFTPPro.TEConnection")

' Initialize remote server host name, protocol, port, etc.
MySite.Host = "ftp.[mywebiste].com"
MySite.Protocol = "FTP"
MySite.Port = 21
MySite.Retries = 30
MySite.Delay = 30
MySite.MaxConnections = 4
MySite.TransferType = "AUTO"
MySite.DataChannel = "DEFAULT"
MySite.AutoRename = "OFF"
' WARNING!!! SENSITIVE DATA: user name and password.
MySite.Login = "mylogin(not real)"
MySite.Password = "mylogin(not real)"
MySite.SocksInfo = ""
MySite.ProxyInfo = ""
' Connect to remote server
MySite.Connect
' 1
MySite.Upload "C:\Radio George\Marketing Architects\RFA Oldies Spots\Spot1_spot.mp3", "/oldies/oldies1/Spot1_spot.mp3"
MySite.Upload "C:\Radio George\Marketing Architects\RFA Oldies Spots\Spot2_spot.mp3", "/oldies/oldies1/Spot2_spot.mp3"
' 2
MySite.Upload "C:\Radio George\Marketing Architects\RFA Oldies Spots\Spot3_spot.mp3", "/oldies/oldies2/Spot3_spot.mp3"
MySite.Upload "C:\Radio George\Marketing Architects\RFA Oldies Spots\Spot4_spot.mp3", "/oldies/oldies2/Spot4_spot.mp3"
' 3
--------------------------------------------
...and so on.

If you or any of your fellow experts can nail this one, I would really appreciate it. These scripts save me a LOT of work on a regular basis and have them stop working all at once is a big hassle.

Thanks for your time and attention.
Comment
Watch Question

Do more with

Expert Office
EXPERT OFFICE® is a registered trademark of EXPERTS EXCHANGE®
John TsioumprisSoftware & Systems Engineer

Commented:
I reckon that VBS uses a dll that for some reason got unregistered....if you show the complete script maybe we can help better
RadioGeorgeOwner/Programmer

Author

Commented:
John.

As you requested, here's the whole script:
------------------------------------------------------------
' VBS Script Generated by CuteFTP (TM) macro recorder.
' Generated at: 4/20/2015 8:24:15 PM.
' REVISED 9/1/2015
' MASTER Delete Spots Script - Oldies - Six Spots
' Create TEConnection object
Set MySite = CreateObject("CuteFTPPro.TEConnection")

' Initialize remote server host name, protocol, port, etc.
MySite.Host = "ftp.radiogeorge.com"
MySite.Protocol = "FTP"
MySite.Port = 21
MySite.Retries = 30
MySite.Delay = 30
MySite.MaxConnections = 2
MySite.TransferType = "AUTO"
MySite.DataChannel = "DEFAULT"
MySite.AutoRename = "OFF"
' WARNING!!! SENSITIVE DATA: user name and password.
MySite.Login = "removed for safety"
MySite.Password = "removed for safety"
MySite.SocksInfo = ""
MySite.ProxyInfo = ""
' Connect to remote server
MySite.Connect
MySite.RemoteRemove "/oldies/oldies1/Spot1_spot.mp3"
MySite.RemoteRemove "/oldies/oldies1/Spot2_spot.mp3"
'2
MySite.RemoteRemove "/oldies/oldies2/Spot3_spot.mp3"
MySite.RemoteRemove "/oldies/oldies2/Spot4_spot.mp3"
'3
MySite.RemoteRemove "/oldies/oldies3/Spot5_spot.mp3"
MySite.RemoteRemove "/oldies/oldies3/Spot6_spot.mp3"
'4
MySite.RemoteRemove "/oldies/oldies4/Spot1_spot.mp3"
MySite.RemoteRemove "/oldies/oldies4/Spot2_spot.mp3"
'5
MySite.RemoteRemove "/oldies/oldies5/Spot3_spot.mp3"
MySite.RemoteRemove "/oldies/oldies5/Spot4_spot.mp3"
'6
MySite.RemoteRemove "/oldies/oldies6/Spot5_spot.mp3"
MySite.RemoteRemove "/oldies/oldies6/Spot6_spot.mp3"
'7
MySite.RemoteRemove "/oldies/oldies7/Spot1_spot.mp3"
MySite.RemoteRemove "/oldies/oldies7/Spot2_spot.mp3"
'8
MySite.RemoteRemove "/oldies/oldies8/Spot3_spot.mp3"
MySite.RemoteRemove "/oldies/oldies8/Spot4_spot.mp3"
'9
MySite.RemoteRemove "/oldies/oldies9/Spot5_spot.mp3"
MySite.RemoteRemove "/oldies/oldies9/Spot6_spot.mp3"
'10
MySite.RemoteRemove "/oldies/oldies10/Spot1_spot.mp3"
MySite.RemoteRemove "/oldies/oldies10/Spot2_spot.mp3"
'11
MySite.RemoteRemove "/oldies/oldies11/Spot3_spot.mp3"
MySite.RemoteRemove "/oldies/oldies11/Spot4_spot.mp3"
'12
MySite.RemoteRemove "/oldies/oldies12/Spot5_spot.mp3"
MySite.RemoteRemove "/oldies/oldies12/Spot6_spot.mp3"
'13
MySite.RemoteRemove "/oldies/oldies13/Spot1_spot.mp3"
MySite.RemoteRemove "/oldies/oldies13/Spot2_spot.mp3"
'14
MySite.RemoteRemove "/oldies/oldies14/Spot3_spot.mp3"
MySite.RemoteRemove "/oldies/oldies14/Spot4_spot.mp3"
'15
MySite.RemoteRemove "/oldies/oldies15/Spot5_spot.mp3"
MySite.RemoteRemove "/oldies/oldies15/Spot6_spot.mp3"
'16
MySite.RemoteRemove "/oldies/oldies16/Spot1_spot.mp3"
MySite.RemoteRemove "/oldies/oldies16/Spot2_spot.mp3"
'17
MySite.RemoteRemove "/oldies/oldies17/Spot3_spot.mp3"
MySite.RemoteRemove "/oldies/oldies17/Spot4_spot.mp3"
'18
MySite.RemoteRemove "/oldies/oldies18/Spot5_spot.mp3"
MySite.RemoteRemove "/oldies/oldies18/Spot6_spot.mp3"
'19
MySite.RemoteRemove "/oldies/oldies19/Spot1_spot.mp3"
MySite.RemoteRemove "/oldies/oldies19/Spot2_spot.mp3"
'20
MySite.RemoteRemove "/oldies/oldies20/Spot3_spot.mp3"
MySite.RemoteRemove "/oldies/oldies20/Spot4_spot.mp3"
'21
MySite.RemoteRemove "/oldies/oldies21/Spot5_spot.mp3"
MySite.RemoteRemove "/oldies/oldies21/Spot6_spot.mp3"
'22
MySite.RemoteRemove "/oldies/oldies22/Spot1_spot.mp3"
MySite.RemoteRemove "/oldies/oldies22/Spot2_spot.mp3"
'23
MySite.RemoteRemove "/oldies/oldies23/Spot3_spot.mp3"
MySite.RemoteRemove "/oldies/oldies23/Spot4_spot.mp3"
'24
MySite.RemoteRemove "/oldies/oldies24/Spot5_spot.mp3"
MySite.RemoteRemove "/oldies/oldies24/Spot6_spot.mp3"
'25
MySite.RemoteRemove "/oldies/oldies25/Spot1_spot.mp3"
MySite.RemoteRemove "/oldies/oldies25/Spot2_spot.mp3"
'26
MySite.RemoteRemove "/oldies/oldies26/Spot3_spot.mp3"
MySite.RemoteRemove "/oldies/oldies26/Spot4_spot.mp3"
'27
MySite.RemoteRemove "/oldies/oldies27/Spot5_spot.mp3"
MySite.RemoteRemove "/oldies/oldies27/Spot6_spot.mp3"
'28
MySite.RemoteRemove "/oldies/oldies28/Spot1_spot.mp3"
MySite.RemoteRemove "/oldies/oldies28/Spot2_spot.mp3"
'29
MySite.RemoteRemove "/oldies/oldies29/Spot3_spot.mp3"
MySite.RemoteRemove "/oldies/oldies29/Spot4_spot.mp3"
'30
MySite.RemoteRemove "/oldies/oldies30/Spot5_spot.mp3"
MySite.RemoteRemove "/oldies/oldies30/Spot6_spot.mp3"
'31
MySite.RemoteRemove "/oldies/oldies31/Spot1_spot.mp3"
MySite.RemoteRemove "/oldies/oldies31/Spot2_spot.mp3"
'32
MySite.RemoteRemove "/oldies/oldies32/Spot3_spot.mp3"
MySite.RemoteRemove "/oldies/oldies32/Spot4_spot.mp3"
'33
MySite.RemoteRemove "/oldies/oldies33/Spot5_spot.mp3"
MySite.RemoteRemove "/oldies/oldies33/Spot6_spot.mp3"
'34
MySite.RemoteRemove "/oldies/oldies34/Spot1_spot.mp3"
MySite.RemoteRemove "/oldies/oldies34/Spot2_spot.mp3"
'35
MySite.RemoteRemove "/oldies/oldies35/Spot3_spot.mp3"
MySite.RemoteRemove "/oldies/oldies35/Spot4_spot.mp3"
'36
MySite.RemoteRemove "/oldies/oldies36/Spot5_spot.mp3"
MySite.RemoteRemove "/oldies/oldies36/Spot6_spot.mp3"
'37
MySite.RemoteRemove "/oldies/oldies37/Spot1_spot.mp3"
MySite.RemoteRemove "/oldies/oldies37/Spot2_spot.mp3"
MySite.Disconnect
------------------------------------------------------
Owner/Programmer
Commented:
This question is closed (Experts Exchange will make it official after I email them). I found the solution myself purely by accident. It was simply a matter of misdirection to the wrong file location repeated in all of the VBScripts as they were moved from one location to another.
RadioGeorgeOwner/Programmer

Author

Commented:
A simple solution but a toughie unless you knew a LOT of situation-specific details, which unfortunately, cannot be completely spelled out in this type of forum/exchange.

Do more with

Expert Office
Submit tech questions to Ask the Experts™ at any time to receive solutions, advice, and new ideas from leading industry professionals.

Start 7-Day Free Trial