[Moved] Alpabetical sitemap module - ASP.Net 2.0

New Community Website

Ordinarily, you'd be at the right spot, but we've recently launched a brand new community website... For the community, by the community.

Yay... Take Me to the Community!

Welcome to the DNN Community Forums, your preferred source of online community support for all things related to DNN.
In order to participate you must be a registered DNNizen

Home All Forums

Home

Archived Discus...

Developing Under Previous Versions of .NET

ASP.Net 2.0

[Moved] Alpabetical sitemap module

9/4/2008 8:51 AM

Tak Shimamura

Joined: 1/4/2006

Posts: 211

[Moved] Alpabetical sitemap module

I moved this topic from that thread as that thread's topic isn't appropriate anymore for my new goal.

Anyway, my final goal for this project is to create the simple sitemap module, which displays all pages alphabetically. I got this so far.

and here are the codes. I basically stole..."cough" borrowed Michael's "SuperSimple" module. His code is calling a module table and load them all on the page. Instead, my code calls "Tabs" table.

SiteMapPlus.ascx

<%@ Control Language="VB" AutoEventWireup="false" CodeFile="SiteMapPlus.ascx.vb" Inherits="DesktopModules_SiteMapPlus" %>

<a>A</a>
<asp:DataList ID="DataList1" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
<a>B</a>
<asp:DataList ID="DataList2" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
<a>C</a>
<asp:DataList ID="DataList3" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
<a>D</a>
<asp:DataList ID="DataList4" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
<a>E</a>
<asp:DataList ID="DataList5" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>

SiteMapPlus.ascx.vb

Imports DotNetNuke
Imports System.Web.UI
Imports System.Collections.Generic
Imports System.Reflection
Imports DotNetNuke.Security.PortalSecurity

Partial Class DesktopModules_SiteMapPlus
    Inherits Entities.Modules.PortalModuleBase

    Protected Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If Not Page.IsPostBack Then
            ShowDataPlus()
        End If

End Sub

    Private Sub ShowDataPlus()
        Dim mySqlString As New StringBuilder()
        Dim SearchString As String = "a"
        mySqlString.Append("SELECT TabID,TabName ")
        mySqlString.Append("FROM {databaseOwner}{objectQualifier}Tabs ")
        mySqlString.Append("WHERE PortalID = '")
        mySqlString.Append(PortalSettings.ActiveTab.PortalID)
        mySqlString.Append("' AND ")
        mySqlString.Append("TabName like @SearchString + '%' ")
        mySqlString.Append("ORDER BY TabName ASC")

Dim myParam As SqlParameter = New SqlParameter("@SearchString", SqlDbType.VarChar, 150)
myParam.Value = SearchString

Me.DataList1.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
Me.DataList1.DataBind()

        SearchString = "b"
        myParam.Value = SearchString
        Me.DataList2.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        Me.DataList2.DataBind()

        SearchString = "c"
        myParam.Value = SearchString
        Me.DataList3.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        Me.DataList3.DataBind()

        SearchString = "d"
        myParam.Value = SearchString
        Me.DataList4.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        Me.DataList4.DataBind()

        SearchString = "e"
        myParam.Value = SearchString
        Me.DataList5.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        Me.DataList5.DataBind()

End Sub

    Public Function formatURL(ByVal strTabID As String) As String
        Return NavigateURL(Int32.Parse(strTabID))
    End Function

End Class

This works. I just have to add F-Z and done! However, I don't like how it looks in the code. My dream would be loading all tabs to multidimensional array and dump it into the template file.

UltimateTabArray[A]{"Action List", "A Page", "Ant page"}
UltimateTabArray[B]{"Boston Redsox","Bite me", "Bow"}
UltimateTabArray[C]{"Costume", "Cost", "Come to Vermont","contact Us"}
.... to be continue until Z and the rest (numbers, etc)

Then dump this array to the SiteMapPlus.ascx. I need to find out how I can dynamically generate <asp:DataList> tag Datalist1 through 27 or 28 so the template file is more simplier than my version above.

QUESTIONS:

1. How do I hide admin, host, and other unwanted tab hid from public? Does this have to access to tab permission table?
2. Can template file contain "If" statement? So I can display "Oops... no page under character Z" instead of a blank space.

Forgive me my rough coding... I have no ASP.Net coding background at all.

I'll keep trying by myself but any tips & comments will be great!

9/4/2008 2:36 PM

Tak Shimamura

Joined: 1/4/2006

Posts: 211

Re: [Moved] Alpabetical sitemap module Modified By Tak Shimamura on 9/4/2008 2:50:42 PM

I found that it's not easy(slow) to change the number of array in asp.net So I am trying to do something else here..(not using array)

This is the 2nd Version for the code. I tried to generate the "Datalist" in the loop. Also I tried to cut unnessesary part. However, nothing is showing on the page.

    Private Sub ShowDataPlus()

        Dim mySqlString As New StringBuilder()

        mySqlString.Append("SELECT TabID,TabName ")
        mySqlString.Append("FROM {databaseOwner}{objectQualifier}Tabs ")
        mySqlString.Append("WHERE PortalID = '")
        mySqlString.Append(PortalSettings.ActiveTab.PortalID)
        mySqlString.Append("' AND ")
        mySqlString.Append("TabName like @SearchString + '%' ")
        mySqlString.Append("ORDER BY TabName ASC")

Dim myParam As SqlParameter = New SqlParameter("@SearchString", SqlDbType.VarChar, 150)

Dim i As Integer

        For i = 1 To 26
            Dim DataListName As New DataList
            DataListName.ID = "DataList" & i.ToString()
            myParam.Value = Chr(96 + i)
            DataListName.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
            DataListName.DataBind()
        Next

End Sub

I haven't changed anything on .ascx template file. The result is this:

Hm.... not good. I was expecting to display all pages.

I inserted the code "response.write(DataList.id)" in the for loop and it did display "DataList1 DataList2 DataList3.....DataList27"

Am I missing anything?

9/5/2008 11:35 AM

Tak Shimamura

Joined: 1/4/2006

Posts: 211

Re: [Moved] Alpabetical sitemap module

Now I am talking myself... hoping somebody helps me lol

I understand that, in the VB code, datalist1 is co-responsed to datalist1 in .ascx template file. However, nothing shows up on the page.

I inserted "response.write(DataListName.GetType().ToString)" within that loop and DataListName IS the Datalist. So I was expecting that Datalist1 to 26 are filled by information based on the SQL statement. If i use real datalist ID like "Datalist1 (which is on the template file)", it does work. It does bind the data and display it. I would like to generate datalist1-26 dynamically,,, rather than creating datalist1.datasource = blah blah, datalist2.datasource = blah blah blah.... (to be continued to datalist26). I've been googling all day long and night... i can't seem to find the answer.

Do we have to use real datalist IDs in the template file for binding a data? Am I totally doing wrong way from the beginning? Am I even in a wrong thread? lol

9/11/2008 12:48 PM

Tak Shimamura

Joined: 1/4/2006

Posts: 211

Re: [Moved] Alpabetical sitemap module Modified By Tak Shimamura on 9/11/2008 12:49:44 PM

I ended up doing like this below. It works but I don't like how it looks in the code.

Could anyone tell me if there is anything I could done better?

SiteMapPlus.ascx

<%@ Control Language="VB" AutoEventWireup="false" CodeFile="SiteMapPlus.ascx.vb" Inherits="DesktopModules_SiteMapPlus" %>

<a class="head">A</a>
<asp:DataList ID="DataList1" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">B</a>
<asp:DataList ID="DataList2" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">C</a>
<asp:DataList ID="DataList3" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">D</a>
<asp:DataList ID="DataList4" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">E</a>
<asp:DataList ID="DataList5" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">F</a>
<asp:DataList ID="DataList6" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">G</a>
<asp:DataList ID="DataList7" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">H</a>
<asp:DataList ID="DataList8" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">I</a>
<asp:DataList ID="DataList9" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">J</a>
<asp:DataList ID="DataList10" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">K</a>
<asp:DataList ID="DataList11" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">L</a>
<asp:DataList ID="DataList12" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">M</a>
<asp:DataList ID="DataList13" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">N</a>
<asp:DataList ID="DataList14" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">O</a>
<asp:DataList ID="DataList15" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">P</a>
<asp:DataList ID="DataList16" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">Q</a>
<asp:DataList ID="DataList17" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">R</a>
<asp:DataList ID="DataList18" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">S</a>
<asp:DataList ID="DataList19" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">T</a>
<asp:DataList ID="DataList20" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">U</a>
<asp:DataList ID="DataList21" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">V</a>
<asp:DataList ID="DataList22" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">W</a>
<asp:DataList ID="DataList23" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">X</a>
<asp:DataList ID="DataList24" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">Y</a>
<asp:DataList ID="DataList25" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>
 
 
<a class="Head">Z</a>
<asp:DataList ID="DataList26" runat="server" DataKeyField="TabID">
 <ItemTemplate>
 <asp:HyperLink CssClass="Normal" ID="TabNameLabel" runat="server" Text='<%# Eval("TabName") %>' NavigateUrl='<%# formatURL(Eval("TabID")) %>'></asp:HyperLink>
 
 </ItemTemplate>
</asp:DataList>

SiteMapPlus.ascx.vb

Imports DotNetNuke
Imports System.Web.UI
Imports System.Collections.Generic
Imports System.Reflection
Imports DotNetNuke.Security.PortalSecurity
Imports System.Web.UI.WebControls.WebParts
Imports System.Web.UI.HtmlControls

Partial Class DesktopModules_SiteMapPlus
Inherits Entities.Modules.PortalModuleBase

    Protected Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If Not Page.IsPostBack Then
            ShowDataPlus()
        End If

End Sub

Private Sub ShowDataPlus()

Dim mySqlString As New StringBuilder()

mySqlString.Append("SELECT TabID,TabName ")
mySqlString.Append("FROM {databaseOwner}{objectQualifier}Tabs ")

mySqlString.Append("WHERE PortalID = ")
mySqlString.Append(PortalSettings.ActiveTab.PortalID)

mySqlString.Append(" AND (")
 mySqlString.Append("ParentId <> ")
 mySqlString.Append(PortalSettings.AdminTabId)
 mySqlString.Append(" OR ")
 mySqlString.Append("ParentId IS NULL )")

mySqlString.Append(" AND ")
 mySqlString.Append("TabID <> ")
 mySqlString.Append(PortalSettings.AdminTabId)

        mySqlString.Append(" AND ")
        mySqlString.Append("TabName like @SearchString + '%' ")
        mySqlString.Append("ORDER BY TabName ASC")

Response.Write(mySqlString)

Dim myParam As SqlParameter = New SqlParameter("@SearchString", SqlDbType.VarChar, 150)

        myParam.Value = "a"
        DataList1.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList1.DataBind()

        myParam.Value = "b"
        DataList2.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList2.DataBind()

        myParam.Value = "c"
        DataList3.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList3.DataBind()

        myParam.Value = "d"
        DataList4.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList4.DataBind()

        myParam.Value = "e"
        DataList5.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList5.DataBind()

        myParam.Value = "f"
        DataList6.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList6.DataBind()

        myParam.Value = "g"
        DataList7.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList7.DataBind()

        myParam.Value = "h"
        DataList8.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList8.DataBind()

        myParam.Value = "i"
        DataList9.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList9.DataBind()

        myParam.Value = "j"
        DataList10.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList10.DataBind()

        myParam.Value = "k"
        DataList11.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList11.DataBind()

        myParam.Value = "l"
        DataList12.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList12.DataBind()

        myParam.Value = "m"
        DataList13.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList13.DataBind()

        myParam.Value = "n"
        DataList14.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList14.DataBind()

        myParam.Value = "o"
        DataList15.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList15.DataBind()

        myParam.Value = "p"
        DataList16.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList16.DataBind()

        myParam.Value = "q"
        DataList17.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList17.DataBind()

        myParam.Value = "r"
        DataList18.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList18.DataBind()

        myParam.Value = "s"
        DataList19.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList19.DataBind()

        myParam.Value = "t"
        DataList20.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList20.DataBind()

        myParam.Value = "u"
        DataList21.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList21.DataBind()

        myParam.Value = "v"
        DataList22.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList22.DataBind()

        myParam.Value = "w"
        DataList23.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList23.DataBind()

        myParam.Value = "x"
        DataList24.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList24.DataBind()

        myParam.Value = "y"
        DataList25.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList25.DataBind()

        myParam.Value = "z"
        DataList26.DataSource = CType(DataProvider.Instance().ExecuteSQL(mySqlString.ToString(), myParam), IDataReader)
        DataList26.DataBind()

End Sub

    Public Function formatURL(ByVal strTabID As String) As String
        Return NavigateURL(Int32.Parse(strTabID))
    End Function

End Class

Page 1 of 1

Home

Archived Discus...

Developing Under Previous Versions of .NET

ASP.Net 2.0

[Moved] Alpabetical sitemap module

These Forums are dedicated to discussion of DNN Platform and Evoq Solutions.

For the benefit of the community and to protect the integrity of the ecosystem, please observe the following posting guidelines:

No Advertising. This includes promotion of commercial and non-commercial products or services which are not directly related to DNN.
No vendor trolling / poaching. If someone posts about a vendor issue, allow the vendor or other customers to respond. Any post that looks like trolling / poaching will be removed.
Discussion or promotion of DNN Platform product releases under a different brand name are strictly prohibited.
No Flaming or Trolling.
No Profanity, Racism, or Prejudice.
Site Moderators have the final word on approving / removing a thread or post or comment.
English language posting only, please.

Products

Solutions

Resources

Partners

Community

Blog

About

QA

Ideas Test

New Community Website

DNN Corp. (DotNetNuke)