Errore: Invalid class string

[Grinder]

In locale il codice funziona benissimo, in remoto no:

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/ghost/ASPUpload/upload.asp, line 491

Invalid class string

facente riferimento alla riga

Private Sub Class_Initialize()
			Dim tMp
				InitTime = Timer()
				'*** Creazione Oggetti ****
				Set Stream 	= 	Server.CreateObject("ADODB.Stream")
				Set Rs		=	Server.CreateObject("ADODB.Recordset")
				Set Fso 	= 	Server.CreateObject("Scripting.FileSystemObject")
				Set Form	=	Server.CreateObject("Scripting.Dictionary")
				Form.CompareMode = 1
				Rs.Fields.Append "sBinary"			, 201, -1
				Rs.Fields.Append "bBinary"			, 205,-1
				Rs.Open
	
				'*** Impostazione Variabili ****
				Server.ScriptTimeout = 500
				Version 	= 	"3.1.1"
				Autore 		= 	"Lorenzo Abbati - lorenzomail@tiscalinet.it"
				WebServerFP	= 	Request.ServerVariables("APPL_PHYSICAL_PATH")
				iTotalBytes  =	Request.TotalBytes
				LogDelimiter = "|"
				iPath		 =	""
				CurrentPath = 	GetCurrentPath()
				iLogFolder	 = CurrentPath & "Logs\"
				iTempFolder	 = CurrentPath & "UploadTempFolder\"
				PathInclude  = CurrentPath & "include\"
				iAddInformationToLog = ""
				LogName		 = Replace(Date(),"/","-") & ".log"
				IsDataLoad = False
				'*** Impostazioni Default Parametri Utente ****
				OverWrite	=	False
				AutoRename	=	True
				EnabledLog	=	False
				IsMultipart =	False
				EnabledImageSize = True
				EnabledAspUpload = False
				LoadFilesInForm = True
				FormValuesDelimiter = ", "
		end sub

P.S.: sto lavorando sul ASPUpload di Baol74, in locale mi funziona benissimo.

[Grinder]