sto realizzando un applicazione che per l'invio di sms

ho sottoscritto un abbonamento con mobyt per i pacchetti sms.

Ho ricevuto dei file che utilizzano il componente asptear per l'invio al gateway del sms.

lo script è questo:
codice:
<% 	
	'Esempio di script asp per inviare messaggi sms tramite il gateway di Widestore
	'Creazione del componente ASPtear
	Const Request_POST = 1
	Const Request_GET = 2
	Dim xobj, strPostData, strRetVal
	Set xobj = CreateObject("SOFTWING.ASPtear")
	
	
	Dim rcpt, from, testo
	Dim usr, pass, sDigest, ticket

	'Si catturano i valori postati dal form
	rcpt = Request.Form("NumTel")
	from = Request.Form("Mitt")
	testo = Request.Form("Data")
	usr = Request.Form("UserName")
	
	'Si setta la password e si prepara il ticket da presentare al server
	'PASSWORD va sostituita con la password relativa all'utente
	pass = "7excabct"

	ticket = usr & "TEXT" & rcpt & from & testo & pass
	sDigest = md5(ticket)
	
	'Si preparano i dati e viene eseguita la post al server
	'La funzione Server.URLEncode serve a passare i parametri in modo corretto
	'Le coppie parametro/valore  sono inoltre separati da una '&'
	strPostData = "ticket=" & Server.URLEncode(sDigest) & "&operation=" & Server.URLEncode("TEXT") & "&rcpt=" & Server.URLEncode(rcpt) & "&password=" & Server.URLEncode(pass) & "&data=" & Server.URLEncode(testo) & "&id=" & Server.URLEncode(usr) & "&from=" & Server.URLEncode(from)
	strRetVal= xobj.Retrieve("http://smsweb.widhost.net/sms-gw/sendsmart",1,strPostData, "","")
	
	'Stampa in rosso il risultato, se tutto è andato bene ritornerà una pagina con 'OK',
	'in caso di errore 'KO'
	Response.Write "<font color=""red"">" & strRetVal & "</font>" & "
"

%>
</BODY>
</HTML>
ma alla prova ottengo in locale impossibile creare aspteam
su server aruba 2000 e 2003 errore del server

non conosco questo componente è di uso comune?o c'è qualcosa che non va nello script?