Dyn. tilføje UserControl uden brug af PlaceHolder

Hvorfor vil du ikke have at din bruger skal bruge alm. asp tags? Og når vi snakker cms er det da oplagt at du laver nogle custom controls til dine brugere.

så skriver din bruger fx:

<cms:ShopBasketPlaceholder id="ShopBasketPlaceholder1" runat="server" />

eller hvis templated (som nok er lidt federe for dine brugere)

<cms:TemplatedShopBasketPlaceholder id="TemplatedShopBasketPlaceholder" runat="server" UseHeader="true">
  <HeaderTemplate>
    <h1>bla</h1>
  </HeaderTemplate>
  <ItemTemplate>
    Pris: <%# Container.ItemPrice %>
  </ItemTemplate>
</TemplatedShopBasketPlaceholder>

og lige et korrekt lukke tag </cms:TemplatedShopBasketPlaceholder> ;o)

powernodes >>
Jo, jeg overvejer at lave syntaksen ala dit forslag. Det kommer i næste version, men i princippet er det jo egentligt ligemeget. Mit eksempel på "tag's" er i virkeligheden også lavet en delt mere komplekst, men er her blevet forsimplet.

Men din kommentar har egentligt ikke noget med mit problem at gøre.
Hvordan indsætter jeg dynamisk UserControl'en ud fra hvad brugeren/webmasteren har indtastet (informationerne ligger selvfølgelig i en database)?

Husk på at "tag"'sene ikke står skrevet direkte i en .aspx-fil eller lignende, men kommer som data nede fra CMS'ets database.

Prøv om du kan bruge flg. (hurtige) eksempel til noget, lidt udpenslet for overskuelighedens skyld.

Dim sCommandList As String
Dim sCommandArray() As String
Dim sControlName As String

Dim i As Integer

sCommandList = "<b>Tekst 1</b><br>[UserControl1]<br><font size=3 color=red>Tekst 2</font>[UserControl2]<br>Tekst3"

sCommandList = sCommandList.Replace("[", "#[")
sCommandList = sCommandList.Replace("]", "]#")

sCommandArray = Split(sCommandList, "#")

For i = 0 To sCommandArray.Length - 1
  If sCommandArray(i).IndexOf("[") <> -1 Then
    sControlName = sCommandArray(i)
    sControlName = sControlName.Replace("[", "")
    sControlName = sControlName.Replace("]", "")

    Select Case sControlName
      Case "UserControl1"
        Me.Controls.Add(New UserControl().LoadControl(sControlName & ".ascx"))
      Case "UserControl2"
        Me.Controls.Add(New UserControl().LoadControl(sControlName & ".ascx"))
    End Select
  Else
    Me.Controls.Add(New LiteralControl(sCommandArray(i)))
  End If
Next

Genialt, lige det jeg er ude efter!

Post et svar, og der er point til dig!

værsgo