La copie de code est la suivante:
<%
'+ ----------------------------------- +
'| Paramètres variables
'+ ----------------------------------- +
cTitle = "Toutes les images téléchargées (Remarque: Les éléments suivants sont toutes des images sous le dossier d'images, tous ne sont pas des images valides!)" 'Nom
CPICTYPE = "JPEG, JPG, GIF, PNG, BMP" 'Type d'image (en utilisant "," sépare les formats d'image)
Cheight = 120'S Thumbnail hauteur
cwidth = 120'tHumbout Largeur
ceachlinemax = 5'mbumber d'images affichées par ligne
ceachpagemax = 20'mbumber d'images affichées par page
pic_path = "/ uploadpic /" 'définir le chemin où se trouve l'image
'+ ----------------------------------- +
'| Définir la fonction
'+ ----------------------------------- +
FunctionGetExt (nom)
getExt = droite (nom, 3)
Finition de fin
Fonctionpic (nom de fichier, picType)
ext = GetExt (nom de fichier)
ispic = faux
TypeList = Split (picType, ",")
Forii = lbound (typelist) toubound (typelist)
Ifucase (ext) = ucase (typelist (ii)) puis
ispic = true
Sortie
Endire
Suivant
Finition de fin
FunctionPageBar (Page, Pagetotal)
réponse.write "[<ahref =" & request.servervariables ("script_name") & "? page =" & (page-1) & "title = page précédente> page précédente </a>]"
réponse.write "<ahref =" & request.servervariables ("script_name") & "? page = 1Title = home> <<< / a>"
i = pagestart
Dowhilei <page
réponse.write "<ahref =" & request.servervariables ("script_name") & "? page =" & i & "title =" "page" & i & ""> ["& i &"] </a> "
i = i + 1