<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 Recordset1_numRows = Recordset1_numRows + Repeat1__numRows %> <% Dim Repeat2__numRows Dim Repeat2__index Repeat2__numRows = -1 Repeat2__index = 0 Recordset2_numRows = Recordset2_numRows + Repeat2__numRows %> <% Dim MM_paramName %> <% Dim Recordset8 Dim Recordset8_numRows Set Recordset8 = Server.CreateObject("ADODB.Recordset") Recordset8.ActiveConnection = MM_DBConnection_STRING Recordset8.Source = "SELECT IDNotizia, Titolo, ImgNotizia, DataNotizia, SpotLight FROM NotiziaPrinc ORDER BY IDNotizia DESC" Recordset8.CursorType = 0 Recordset8.CursorLocation = 2 Recordset8.LockType = 1 Recordset8.Open() Recordset8_numRows = 0 %> <% Dim AltreNews Dim AltreNews_numRows Set AltreNews = Server.CreateObject("ADODB.Recordset") AltreNews.ActiveConnection = MM_DBConnection_STRING AltreNews.Source = "SELECT IDNotizia, Titolo FROM Giornale ORDER BY IDNotizia DESC" AltreNews.CursorType = 0 AltreNews.CursorLocation = 2 AltreNews.LockType = 1 AltreNews.Open() AltreNews_numRows = 0 %> <% Dim primapagina Dim primapagina_numRows Set primapagina = Server.CreateObject("ADODB.Recordset") primapagina.ActiveConnection = MM_DBConnection_STRING primapagina.Source = "SELECT * FROM Sport ORDER BY IDNotizia DESC" primapagina.CursorType = 0 primapagina.CursorLocation = 2 primapagina.LockType = 1 primapagina.Open() primapagina_numRows = 0 %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters Dim MM_keepNone Dim MM_keepURL Dim MM_keepForm Dim MM_keepBoth Dim MM_removeList Dim MM_item Dim MM_nextItem ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" End If MM_keepURL="" MM_keepForm="" MM_keepBoth="" MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each MM_item In Request.QueryString MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item)) End If Next ' add the Form variables to the MM_keepForm string For Each MM_item In Request.Form MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm If (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) End If If (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) End If If (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) End If ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> SuperJuniorWeb.com - Il Portale su Musica, Cinema, Eventi, Locali e Notizie di Milano
 

:: AREA RISERVATA ::


{menu}



 

 



Alcatraz Milano 7 Febbraio 2006
LIGABUE Live 2006
lA GALLERIA FOTOGRAFICA ...
NOTA IMPORTANTE: il bello è vedere le fotografie al naturale, senza scritte, e lasciarle a disposizione dei Fans, ma siccome in passato riviste e quotidiani hanno prelevato delle nostre fotografie senza chiedere l'autorizzazione e senza citare la fonte, siamo costretti a griffare le singole fotografie scattate dalla nostra Redazione.
NOTA IMPORTANTE 2: Se nelle foto ti abbiamo inquadrato e vuoi averla senza la griffe Superjuniorweb, scrivicelo per mail che provvederemo ad inviartela in privato nella versione originale
CLICCA SULL' IMMAGINE PER INGRANDIRLA
LIGABUE ALL'ARRIVO SUL PALCO
LIGA VISTO DAL PALCO LIGA VISTO DAL PALCO 2 LIGA VISTO DAL PALCO 3
LIGA VISTO DAL PUBBLICO LIGA VISTO DAL PUBBLICO 2 LIGA VISTO DAL PUBBLICO 3
EFFETTI SUL PALCO
IL PUBBLICO
CIAO CIAO LIGA AL PROSSIMO CONCERTO
   
VI E' PIACIUTA LA NOSTRA FOTOGALLERY?? AVETE ALTRE FOTO

Inviatecele!!! redazione@superjuniorweb.com
Fonte: SUPERJUNIORWEB.COM Tutti i diritti sono riservati






Sei il Visitatore N°
 
<% Recordset8.Close() Set Recordset8 = Nothing %> <% AltreNews.Close() Set AltreNews = Nothing %> <% primapagina.Close() Set primapagina = Nothing %>