Socket.TCP

<%
On Error Resume Next
Set objSocket = server.CreateObject(\"Socket.TCP\")
objSocket.Host = \"zequenze.dns2go.com\"
objSocket.TimeOut = 5
objSocket.Open
If Not err.number = -404 Then
Response.write \"<a href=\"\"http://zequenze.dns2go.com\"\"><font color=\"\"#00000\"\">Webcam</font></a>\"
end if
objSocket.Close
Set objSocket = Nothing
%>

Dette script er brugt her : http://www.zequenze.dk/bag/default.asp

Men det ser ikke ud til at virke.
Hvorfor, er det fordi de ikke har komponenten, hvis det er burde den så ikke melde fejl `?

Hosten er : wannafind.dk og jeg har et luksus hotel.