Thanks Adam,
I have tried it and am now encountering a javascript error "obj_editor1" is undefined
The code is below:
========================================
<script language="JavaScript" type="text/javascript" >
function insertReviloDownload(editor)
{
//show the dialog page , and pass the editor as newwin.dialogArguments
var newwin=showModalDialog("/commom/cuteeditor5/cuteeditor_files/insert_Revilo_download.asp?_rand="+new Date().getTime()
,editor,"dialogWidth:400px;dialogHeight:240px");
}
</script>
sub makeRTEce(inputFieldName, defaultContent, imageDirectory)
Dim editor
Set editor = New CuteEditor
editor.ID = inputFieldName
editor.Text = defaultContent
editor.FilesPath = "/common/cuteeditor5/CuteEditor_Files"
editor.ImageGalleryPath = imageDirectory
editor.CustomAddons = "<img title=""Underline"" class=""CuteEditorButton"" onclick=""insertReviloDownload(obj_Editor1)"" type=""btn"" src='/common/cuteeditor5/CuteEditor_Files/Themes/office2003/Images/document.gif' hspace=2 border=0 />"
editor.Width = 640
editor.Height = 480
editor.EditorBodyStyle = "none"
editor.EditorWysiwygModeCss = "/main_style.css"
editor.Draw()
end sub