Imports DotNetNuke

Imports System.Collections.Generic

Partial Class DesktopModules_MultiViewSample_DynamicControls_Control1

    Inherits Entities.Modules.PortalModuleBase

    Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init

        Dim mySqlString As New StringBuilder()

        mySqlString.Append("SELECT FriendlyName ")

        mySqlString.Append("FROM {databaseOwner}{objectQualifier}DesktopModules ")

        mySqlString.Append("ORDER BY FriendlyName")

        Me.Module_field.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), Nothing), IDataReader)

        Me.Module_field.DataBind()

    End Sub

End Class