ciao
poco tempo fa ho creato un sito web in php......
questo sito aveva un menu dinamico che a seconda della pagina in cui mi trovavo mi dava un menu con formatazione diversa.....
cioè se ero sulla pagina contatti solo quel bottone diventava rosso mentre gli altri restavano normali.
Ecco il codice:
codice:$array_menu = array( "chi-siamo.php" => "CHI SIAMO", "galleria.php" => "GALLERIA", "ultime-novita.php" => "NOVITA'", "new-antiques.php" => "TRENDY", "ordina.php" => "ORDINA", "contatti.php" => "CONTATTI", "blog.php" => "BLOG", "faq.php" => "F.A.Q.", "http://stores.ebay.it/ARTISTIC-antiques-art-collectibles" => "SU EBAY", ); $pagina_visualizzata = basename($_SERVER['PHP_SELF']); echo "<ul id=\"navlist\">"; while(list($url, $label) = each($array_menu)) { if ($url == $pagina_visualizzata){ $stile = "part"; } else { $stile = "attivo"; } echo " <li class=\"$stile\"> <a href=\"$url\">$label</a> "; } echo "[/list]";
adesso mi trovo a dover ricompilare il progetto con visual studio.
Vorrei sapere se qualcuno mi può aiutare nella compilazione di questo menù......perche non riesco a venirne fuori....
I dati del menu sono presi da database, dove ho indicato in una tabella......numero di visualizzazione, nome visualizzato, collegamento html
lo richiamo tramite store procedure che mi riporta l'ordine con cui deve essere visulizato.
fino ad ora i testi li ho stampati a video cosi:codice:Private Function RicTesti(ByVal RiferimentoPagina As String, ByVal RiferimentoLingua As String) As DataTableCollection Dim da As New OleDb.OleDbDataAdapter Dim ds As New DataSet Try Dim testCMD As OleDb.OleDbCommand = New OleDb.OleDbCommand("RicercaTesti", objdb) testCMD.CommandType = CommandType.StoredProcedure Dim param1 As OleDb.OleDbParameter = testCMD.Parameters.Add("001", OleDb.OleDbType.Char, 3) param1.Direction = ParameterDirection.Input Dim param2 As OleDb.OleDbParameter = testCMD.Parameters.Add("001", OleDb.OleDbType.Char, 3) param1.Direction = ParameterDirection.Input param1.Value = RiferimentoPagina param2.Value = RiferimentoLingua da.SelectCommand = testCMD da.Fill(ds, "Articoli") Catch ex As Exception End Try Return ds.Tables End Function
codice:Private Sub Bind(ByVal dtArticoli As DataTable) For Each row As DataRow In dtArticoli.Rows Dim lt As Literal = CType(Panel1.FindControl(Trim(row("CodiceCampo").ToString())), Literal) If Not (lt Is Nothing) Then lt.Text = row("Prompt").ToString() End If Next End Sub Private Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If Not IsPostBack Then Dim dt As DataTableCollection dt = RicTesti("001", "001") Bind(dt(0)) End If End Sub
Adesso non penso vada più bene per il menu perche devo diversificare a seconda dello stile css contenuto nella pagina dei fogli di stile .css
![]()
Adesso come faccio a diversificarlo a seconda della pagina in cui mi trovo?????
Posso inserire il menù nella master page???? Ed in questo caso come faccio ad eseguire il controllo??
Lo devo inserire in ogni pagina indicando in qualche modo in che pagina mi trovo???
AIUTO..................
![]()
![]()
![]()
Sono bloccata, confusa, e non so come scrivere quella funzione.

Rispondi quotando