Try this.
It works for me.
Dim editor
Set editor = New CuteEditor
editor.ID = "Editor1"
editor.FilesPath = "CuteEditor_Files"
editor.EditorBodyStyle = "font:normal 12px arial;"
editor.EditorWysiwygModeCss = "asp.css"
editor.SecurityPolicyFile = "Admin.config"
editor.ThemeType = "Office2003_BlueTheme"
editor.Height = 800
editor.Width = 1280
editor.Draw()
/S