Syntax Error

I get the following error in 6.1 when attempting to load login page.

This error comes from the displaymenu.asp page
Microsoft VBScript compilation error '800a03ea'
Syntax error
/project_folder1/include/displaymenu.asp, line 133
Function adddelnbsp(ByVal col)
The following is the code generated from the project in the displaymenu.asp page
Line 133 is :

Function adddelnbsp(ByVal col)

Dim nbsps,i

nbsps = ""

i = 0

do while i<col

nbsps = CSmartStr(nbsps) & "&nbsp;&nbsp;"

i = i + 1

loop

doAssignment adddelnbsp,nbsps

Exit Function

End Function
This does not happen with 6.0 .