" & vbcrlf
he = ImageHeight(StrPathShort & objfile.name)
wi = ImageWidth(StrPathShort & objfile.name)
resized = ImageResize(StrPathShort & objfile.name, 150, 150, "center")
Response.Write "" & vbcrlf & " " & vbcrlf & " | " & vbcrlf
If col = 5 Then
Response.Write "
" & vbcrlf
col = 0
End If
End If
imagecounter = imagecounter + 1
Next
If col > 0 AND col < 5 Then
For colonne = col+1 To 5
Response.Write "