Webmaster - PROBLEMAS EJECUTANDO VBSCRIPT DESDE HTML

Saludo Sres, alguien sabria decirme porque este codigo me da error cuando lo ejecuto desde una pagina HTML

<script language="vbscript" type="text/vbscript">

function instalprint(VarPrinters)

on error resume next
Dim net
Dim WshNetwork

Set net = CreateObject("WScript.Network")
Set WshNetwork = WScript.CreateObject("WScript.Network")
PrinterPath = "\\nombre_del_servidor\nombre_impresora"
WshNetwork.AddWindowsPrinterConnection PrinterPath
net.SetDefaultPrinter "\\nombre_del_servidor\nombre_impresora"
if err.number=0 then
MsgBOX "CONECTADA"
Else
MsgBOX "No tiene permiso para imprimir en la Impresora"
end if
on error goto 0

end function
</script>

el error comienza desde la linea de CreateObject, ya desde alli me deja de funcionar el codigo, da error numero 424 y 429, no se que pueda estar mal.