Pantelleria - Hotel, Case Vacanza, Dammusi, Ville e Villette, Residence

Pantelleria, Hotel, Case Vacanza, Dammusi, Ville, Villette, Residence

Mediterraneo
Hotel

Blue Moon
Hotel

Jàmal

Perla Rosa

Dammusi

Noleggio

AGA s.r.l.

Home Il Gruppo Contatti

<% ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '' Galleria Dinamica in ASP @creato da Ferreri Giacomo '' ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' dim foto dim i dim y dim x dim galleryName galleryName = "Atmosfera" Dim myArray(23,23) 'myArray(col,row) 'myArray(0,1) = "nome file" 'myArray(1,1) = "sottotitolo" myArray(0,0) = "scauri" myArray(1,0) = "Una veduta di Scauri." myArray(0,1) = "arcoelefante" myArray(1,1) = "Il simbolo di Pantelleria, l’Arco dell’Elefante." myArray(0,2) = "balataturchi" myArray(1,2) = "La Balata dei Turchi." myArray(0,3) = "balataturchi2" myArray(1,3) = "Un’altra immagine della Balata dei Turchi." myArray(0,4) = "balataturchi3" myArray(1,4) = "Un’altra immagine della Balata dei Turchi." myArray(0,5) = "calalevante" myArray(1,5) = "Cala Levante" myArray(0,6) = "facciapietra" myArray(1,6) = "Punta Formaggio" myArray(0,7) = "faraglione" myArray(1,7) = "Il faraglione di Pantelleria." myArray(0,8) = "gibele" myArray(1,8) = "La vallata del monte Gibele." myArray(0,9) = "kattibuale" myArray(1,9) = "La zona di Kattibuale." myArray(0,10) = "lagodivenere" myArray(1,10) = "Il Lago di Venere" myArray(0,11) = "martingana" myArray(1,11) = "Un dammuso della zona della Martingana." myArray(0,12) = "monastero" myArray(1,12) = "Un’immagine della valle di Monastero." myArray(0,13) = "nebbiasanvincenzo" myArray(1,13) = "La nebbia di San Vincenzo" myArray(0,14) = "nika" myArray(1,14) = "La spettacolare zona di Nikà" myArray(0,15) = "nika2" myArray(1,15) = "Un’immagine piu’ da lontano della Baia di Nikà" myArray(0,16) = "primavera" myArray(1,16) = "La Primavera" myArray(0,17) = "primavera2" myArray(1,17) = "Un&altra immagine della Primavera" myArray(0,18) = "puntakarucia" myArray(1,18) = "Punta Karucia" myArray(0,19) = "puntatracino" myArray(1,19) = "Punta Tracino" myArray(0,20) = "vallefavare" myArray(1,20) = "La valle delle Favare" myArray(0,21) = "vallemonastero" myArray(1,21) = "La valle Monastero" myArray(0,22) = "vedutadazinedi" myArray(1,22) = "Veduta da Zinedi" myArray(0,23) = "vistamartingana" myArray(1,23) = "Vista dal mare della Martingana." Dim num_corrente for i = 0 to UBound(myArray,1) num_corrente = i foto = foto & "" 'begin row 'foto = foto & "numIN: " & num_corrente ' test number OUT for x = num_corrente to num_corrente + 3 'for x = 1 to 4 'begin cell 'if x=0 then dim ciao else num_corrente = num_corrente + 1 end if num_corrente = num_corrente + 1 if x" foto = foto & "" foto = foto & "

" & x + 1 & "." & myArray(0,x) & "

" else foto = foto & " " end if 'condizione ferma 'exit for next 'end cell i = num_corrente - 1 'com: iteration loop -1 for integration 'foto = foto & "numOUT: " & num_corrente 'test number OUT foto = foto & "" 'end row next %>

<%= galleryName %>

Inglese