Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 393
  • Last Modified:

Dynamic page title and sql datasource

Is it possible to change the title of page based on the query results while using a sql datasource?

0
JRockFL
Asked:
JRockFL
  • 2
1 Solution
 
Dustin HopkinsManaging MemberCommented:
Sure just use the  Page.Title property to change the title to whatever you want.
i.e.

if results=1 then
Page.Title="results"
else
Page.Title = "Title2
end if

Open in new window

0
 
JRockFLAuthor Commented:
I don't think that is going to do it.
Here is some code.

I want to display companyname in the title
                    <asp:SqlDataSource ID="sdsCompanyDetails" runat="server" ConnectionString="<%$ ConnectionStrings:ConnectDbMilitary %>"
                        SelectCommand="SELECT [CageCode], [CompanyName], [DBA], [DivisionName], [State], [City], [AddressLine3], [AddressLine2], [AddressLine1], [SicCode], [Fax], [Phone], [Country], [ZipCode] FROM [vwCageCodes] WHERE ([CageCode] = @CageCode)">
                        <SelectParameters>
                            <asp:QueryStringParameter Name="CageCode" QueryStringField="cage" Type="String" />
                        </SelectParameters>

Open in new window

0
 
Dustin HopkinsManaging MemberCommented:
Sure just do something like this with your pageload and another sub.

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not Request.QueryString("cage") Is Nothing Then
            Dim cagecode As String = Request.QueryString("cage").ToString
            Loadtitle(cagecode)
        End If
    End Sub
 
    Sub Loadtitle(ByVal _cagecode As String)
        Dim data
        Dim strSQL = "SELECT top(1) [CompanyName] FROM [vwCageCodes] WHERE ([CageCode] = " & _cagecode & ")"
        Dim sSqlConnectionString As String = ConfigurationManager.ConnectionStrings("ConnectDbMilitary").ToString
        Dim SqlConn As Data.SqlClient.SqlConnection = New Data.SqlClient.SqlConnection(sSqlConnectionString)
        Try
            SqlConn.Open()
            'Specify the SQL string
            Dim SqlCmd As Data.SqlClient.SqlCommand = New Data.SqlClient.SqlCommand(strSQL, SqlConn)
            data = SqlCmd.ExecuteScalar
            Page.Title = data.ToString.Trim
        Catch ex As Exception
        Finally
            SqlConn.Close()
            SqlConn.Dispose()
        End Try
    End Sub

Open in new window

0

Featured Post

Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

  • 2
Tackle projects and never again get stuck behind a technical roadblock.
Join Now