Imports DotNetNuke
Imports System.Collections.Generic
Partial Class DesktopModules_MultiViewSample_DynamicControls_Control2
    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