Hello Adam,

 

I have used your example and I have a question:

 

If Not Editor1.ToolControls("insertcustombutonhere") Is Nothing Then
Dim container As System.Web.UI.Control
container = Editor2.ToolControls("insertcustombutonhere").Control

Dim dropdown As CuteEditor.RichDropDownList
dropdown = New CuteEditor.RichDropDownList(Editor2)

dropdown.Attributes("onchange") = "CuteEditor_DropDownCommand(this,'InsertLink')"
dropdown.CssClass = "CuteEditorDropDown"
dropdown.Items.Add("[[Links]]", "")
dropdown.RichHideFirstItem = True

dropdown.Items.Add("ASP", "http://www.asp.net")

container.Controls.Add(dropdown)

End If

What do I have to change in the code when I want that when a user selects NEWS that the text NEWS gets dropped with the link http://www.cnn.com like this:

NEWS

 

 

Regards

J. Bauer