<%
Set Editor = New CuteEditor
Dim temp_styledropdownMenuNames, temp_styledropdownMenuList, temp_snippetDropDownMenuNames, temp_snippetDropDownMenuList, temp_imagesDropDownMenuNames, temp_imagesDropDownMenuList
temp_styledropdownMenuNames = "redcolor,boldgreen,highlight"
temp_styledropdownMenuList = "redcolor,boldgreen,highlight"
temp_snippetDropDownMenuNames = "Contact Info,Copyright"
temp_snippetDropDownMenuList = contactstring&", Copyright 2003 CuteSoft.Net.All right seserved."
temp_imagesDropDownMenuNames = "Contact us,Hi Canada,Need a tool,Flower,Business,Beautiful Smile,Content tools,Nice Couple"
temp_imagesDropDownMenuList = ""
temp_linksDropDownMenuNames = "CuteEditor,Mail to us,Yahoo.com,Google.com,ASP.NET"
temp_linksDropDownMenuList = "
Http://www.CuteSoft.Net,mailto:support@CuteSoft.Net,Http://www.yahoo.com,Http://www.google.com,Http://www.asp.net"
Editor.ID = "contents"
Editor.Text = contents
Editor.FilesPath = "/CuteEditor"
Editor.ImageGalleryPath = "/ContentUploads"
Editor.DocumentPath = "/ContentUploads1"
Editor.MaxImageSize = 300
Editor.AutoConfigure = "EnableAll"
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.Width = 560
Editor.Height = 450
Editor.EditorBodyStyle = "table { font:normal 12px arial; }"
Editor.EditorWysiwygModeCss = "asp.css"
Editor.Draw()
%>