<%
                dim content
                content =  "<FONT size=5 color=#2f4f4f>Type here...<a href='#rere'>Hello</a></FONT> <img src='Uploads/Cindy_Crawford.jpg'/>"                
                
                'Create a new editor class object
                Dim editor
                Set editor = New CuteEditor
                
                'Set the ID of this editor class
                editor.ID = "Editor1"
                
                'Set the initial HTML value of editor control
                editor.Text = content
                dim temp_styledropdownMenuNames,temp_styledropdownMenuList,temp_snippetDropDownMenuNames,temp_snippetDropDownMenuList,temp_imagesDropDownMenuNames,temp_imagesDropDownMenuList
                temp_styledropdownMenuNames        = "Heading,Head,Subhead,NormalRed,Comment"
                temp_styledropdownMenuList        = "Heading,Head,Subhead,NormalRed,Comment"
                temp_snippetDropDownMenuNames    = "Contact Info,Copyright"
                temp_snippetDropDownMenuList    = contactstring&",Copyright 2003 Cutesoft.All right seserved."
                temp_imagesDropDownMenuNames    = "Contact us,Hi Canada,Need a tool,Flower,Business,Beautiful Smile,Content tools,Nice Couple"
                temp_imagesDropDownMenuList        = "/uploads/j0182534.jpg,/uploads/j0182611.jpg,/uploads/j0178413.jpg,/uploads/j0313820.jpg,/uploads/PH01956J.jpg,/uploads/j0262681.jpg,/uploads/j0316779.jpg,/uploads/ph01736j.jpg"
                temp_linksDropDownMenuNames        = "CuteSoft,Mail to us,Yahoo.com,Google.com,ASP.NET"
                temp_linksDropDownMenuList        = "Http://www.CuteSoft.net,mailto:[email protected],Http://www.yahoo.com,Http://www.google.com,Http://www.asp.net"
                
                editor.FilesPath = "CuteEditor_Files"
                editor.ImageGalleryPath = "/Uploads"
                
                editor.Width = "100%"
                editor.Height = "100%"
                'editor.ActiveTab = "Edit"
                editor.AllowPasteHtml = false
                'editor.MaxHTMLLength = 12
                editor.RemoveServerNamesFromUrl = true
                editor.EditCompleteDocument = True
                editor.EditorWysiwygModeCss  = "/asp/sample.css"
                editor.StyleDropDownMenuNames = temp_styledropdownMenuNames    
                editor.StyleDropDownMenuList  = temp_styledropdownMenuList
                                        
                editor.CodeSnippetDropDownMenuNames = temp_snippetDropDownMenuNames                                                    
                editor.CodeSnippetDropDownMenuList  = temp_snippetDropDownMenuList
                editor.ImagesDropDownMenuNames        = temp_imagesDropDownMenuNames                                                    
                editor.ImagesDropDownMenuList        = temp_imagesDropDownMenuList
                editor.LinksDropDownMenuNames        = temp_linksDropDownMenuNames                                                    
                editor.LinksDropDownMenuList        = temp_linksDropDownMenuList                                
                                        
                editor.Draw()
    
                ' Retrieve the data from editor: Request.Form("Editor1_HTMLContent") 
        
        %>