ho avuto un problema simile al tuo e ho risolto in questo modo

codice:
<% dim var_testo
var_testo = rs("testo")
		
Dim oFCKeditor
Set oFCKeditor = New FCKeditor
oFCKeditor.BasePath = "/fckeditor/"
oFCKeditor.Value = "" & var_testo & ""
oFCKeditor.Create "FCKeditor1"
%>
luca