Inkompatibla typer

Tjena,
Är det någon som vet vad detta felmeddelande beror på? Om jag skickar upp sidan till mitt webhotell funkar det utmärkt, men om jag kör den lokalt får jag detta felmeddlende:

Körningsfel i Microsoft VBScript (0x800A000D)
Inkompatibla typer: 'UBOUND'
/RICKI.NU/stat/loginfo.asp, line 24

Kan någon hjälpa mig, snälla??

------------------
Hälsningar Ricki
revolution | mail

du måste visa oss koden också, ju!

är du säker på att det är samma versioner av koden lokalt och på hotellet?

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
all your base are belong to us!</A>

Ja, jag är kelt säker på att det är exakt samma!!

Här är koden i alla fall:

<%
'	#################################################
'	#												#
'	#	LiveStats v 1.0								#
'	#	Copyright (c) 2001. Tilja, tilja.net		#
'	#												#
'	#	This application is freeware for			#
'	#	non commecial sites as long as				#
'	#	this copyright notice remains				#
'	#	intact.										#
'	#												#
'	#	For more information please visit			#
'	# [url="http://www.tilja.net"]www.tilja.net[/url]  or contact me on				#
'	#	info@tilja.net								#
'	#												#
'	#################################################

Dim foundUser
foundUser = FALSE
Application.Lock
Dim statistik
statistik = Application( "Stats" )
Dim k
FOR k = 0 TO UBOUND( statistik, 2 )
' ### OM ANVÄNDAREN FINNS ###
  IF statistik( 0, k ) = Session.SessionID THEN
    
    IF TITLE <> "" THEN
    	statistik( 1, k ) = TITLE
    ELSE
    	statistik( 1, k ) = Request.ServerVariables( "SCRIPT_NAME" )
    END IF
    
    statistik( 4, k ) = Request.ServerVariables( "HTTP_USER_AGENT" )
    foundUser = TRUE
    EXIT FOR
  END IF
NEXT

IF foundUser = FALSE THEN
Rad 24: FOR k = 0 TO UBOUND( statistik, 2 )
' ### OM ANVÄNDAREN EJ FINNS ###
  IF statistik( 0, k ) = "" THEN
    statistik( 0, k ) = Session.SessionID
    
    IF TITLE <> "" THEN
    	statistik( 1, k ) = TITLE
    ELSE
    	statistik( 1, k ) = Request.ServerVariables( "SCRIPT_NAME" )
    END IF
        
    statistik( 2, k ) = Request.ServerVariables( "REMOTE_ADDR" )
    statistik( 3, k ) = TIME()
    statistik( 4, k ) = Request.ServerVariables( "HTTP_USER_AGENT" )
    EXIT FOR
  END IF
NEXT
END IF
Application("Stats") = statistik
Application.UnLock
%>

------------------
Hälsningar Ricki
revolution | mail