Utilizzo non valido di Null: 'replace'

[jjjjack]

Salve.
Potete spiegarmi perché così funziona

  
<%
function cambia(strRep)
cambia = replace(strRep, vbCrLf, "
")
end function
%>
<%=cambia(rs_calendario.Fields.Item("small").Value)%>

mentre se inserisco il comportamento Area ripetuta con DREAMWEAVER...

<%
Dim Repeat1__numRows
Dim Repeat1__index

Repeat1__numRows = -1
Repeat1__index = 0
rs_calendario_numRows = rs_calendario_numRows + Repeat1__numRows
%>
<%
function cambia(strRep)
cambia = replace(strRep, vbCrLf, "
")
end function
%>
<% 
While ((Repeat1__numRows <> 0) AND (NOT rs_calendario.EOF)) 
%>

<%=cambia(rs_calendario.Fields.Item("small").Value)%>


<% 
  Repeat1__index=Repeat1__index+1
  Repeat1__numRows=Repeat1__numRows-1
  rs_calendario.MoveNext()
Wend
%>

... mi da questo errore ???????????

Tipo di errore:
Errore di run-time di Microsoft VBScript (0x800A005E)
Utilizzo non valido di Null: 'replace'

Il campo non è vuoto.

grazie

[optime]

eppure se ne e' parlato solo qualche thread fa... http://forum.html.it/forum/showthrea...hreadid=758859

[jjjjack]

Non ho capito.
Se intendevi un controllo per recordset vuoto, avevo già provato

        <% If Not rs_calendario.EOF Or Not rs_calendario.BOF Then %>
<%=cambia(rs_calendario.Fields.Item("small").Value)%>

<% End If ' end Not rs_calendario.EOF Or NOT rs_calendario.BOF %>

con lo stesso errore.

[optime]

intendevo l'aggiunta di ""...

[jjjjack]

non ho capito!

[jjjjack]

ok risolto grazie!!!!!!!!!!!!!!!!