Ven error en este script?

[rashid]

En una formula lleno los campos a buscar en la BD y el action va a esta pagina que me da problemas, la parte que me da problema es esta
gsSQL = ""
gsSQL = gsSQL & "SELECT * FROM Auctions WHERE CategoryID = " & SQLVal(iCatID) & " "
gsSQL = gsSQL & " AND AvailDate <= " & SQLDate(NOW)
gsSQL = gsSQL & " AND ItemOwner = " & SQLstr(sOwner) ' campo numerico
gsSQL = gsSQL & " AND Province = " & SQLstr(sProvince)
gsSQL = gsSQL & " AND PropertyType = " & SQLstr(sPropertyType)
gsSQL = gsSQL & " AND City = " & SQLstr(sCity)
gsSQL = gsSQL & " AND PropertyType = " & SQLstr(sPropertyType)
If sSSizeI= "Meters2" Then
gsSQL = gsSQL & " AND SizeI => " & SQLstr(sSizeI)
'campo numerico
else
gsSQL = gsSQL & " AND SizeI => " & SQLstr(sSizeI*0.0929)
End If
If sSSizeE= "Meters2" Then
gsSQL = gsSQL & " AND SizeE => " & SQLstr(sSSizeE)
'campo numerico
else
gsSQL = gsSQL & " AND SizeE => " & SQLstr(sSSizeE*0.0929)
End if
gsSQL = gsSQL & " AND Bedrooms => " & SQLstr(sBedrooms)
gsSQL = gsSQL & " AND Baths => " & SQLstr(sBaths)
Select case sSSize
case "Meters2"
gsSQL = gsSQL & " AND Size => " & SQLstr(sSize/10000)
case "Acres"
gsSQL = gsSQL & " AND Size => " & SQLstr(sSize*0.4047)
case "Hectareas"
gsSQL = gsSQL & " AND Size => " & SQLstr(sSize)
case "Manzanas"
gsSQL = gsSQL & " AND Size => " & SQLstr(sSize*0.7050)
End select
If sSStartBid="Dollars" then
gsSQL = gsSQL & " AND StartingBid <= " & SQLValue(iStartBid)
Else
gsSQL = gsSQL & " AND StartingBid <= " & SQLValue(iStartBid/Money)
End if
gsSQL = gsSQL & " And Ended = false"
gsSQL = gsSQL & " ORDER BY pay= true"

Me da este error

Microsoft VBScript runtime error '800a000d'

Type mismatch: 'SQLValue'


Alguna Sugerencia? :( :(