2009-12-04 3 views
0

Кто-нибудь может помочь мне понять следующее кодирование asp.net 2.0? Предполагается показать мне пару последних фотографий, которые я загрузил в определенную папку в фотоальбоме. однако, когда я загружаю новый файл в папку, у которой уже есть изображения ... изображения, которые появляются при использовании кода, - это первые изображения в этой папке ... , и иногда ничего не появляется ...Последние загруженные проблемы с кодировкой

<% 
latestfolder = "na" 
latestdate = cdate("01/01/09") 

set fs=Server.CreateObject("Scripting.FileSystemObject") 
set fo=fs.GetFolder(Server.MapPath("images/gallery")) 

for each folder in fo.subfolders 
    if cdate(folder.DateLastModified) > latestdate then 
     latestdate = cdate(folder.DateLastModified) 
     latestfolder = folder.name 
    end if 
next 

if latestfolder <> "na" then 
    set fi=fs.GetFolder(Server.MapPath("images/gallery/" & latestfolder)) 
    looptimes = 0 

    for each file in fi.files 
     if month(file.DateLastModified) = month(latestdate) then 
      if right(lcase(file.Name),3) = "jpg" then %> 
       <a href="thumbnail.aspx?picture=<%=server.URLEncode("images/gallery/" & latestfolder & "/" & file.Name)%>&maxWidth=640&maxHeight=480" target="_blank" style="text-decoration:none; cursor:pointer;"> 
        <img src="thumbnail.aspx?picture=<%=server.URLEncode("images/gallery/" & latestfolder & "/" & file.Name)%>&maxWidth=100&maxHeight=60" style="border:1px solid #ffffff; margin:5px; margin-top:14px;"> 
       </a>   
      <% end if 
     end if 

     looptimes = looptimes + 1 
     if looptimes = 6 then exit for end if 

    next 

end if 
%> 

надеюсь, некоторые из них могут помочь мне :)

ответ

1

Похоже, следующий код выбирает все файлы в формате JPEG за текущий месяц:

if month(file.DateLastModified) = month(latestdate) then 
    if right(lcase(file.Name),3) = "jpg" then%> 
     ... 
    <% end if 
end if 
0

, когда он перебирает файлы, он проверяет, является ли последнего изменения дата изображения матче s с последней измененной датой папки. это оригинальное определение кодеров «пару последних фотографий» для этого альбома. он также гарантирует, что не будет больше 6.

Если вы не загружаете фотографии слишком часто, вы можете легко получить только одну фотографию каждый раз. Если вы вообще не получите никаких фотографий, вы, вероятно, сделали что-то еще в этой папке, что изменило бы его последнюю измененную дату, не добавляя никаких фотографий.

Я бы рассмотреть избавление от критериев месяца, и просто придерживаться с лимитом 6 фото, т.е. заменить

if month(file.DateLastModified) = month(latestdate) then 
     if right(lcase(file.Name),3) = "jpg" then %> 
      <a href="thumbnail.aspx?picture=<%=server.URLEncode("images/gallery/" & latestfolder & "/" & file.Name)%>&maxWidth=640&maxHeight=480" target="_blank" style="text-decoration:none; cursor:pointer;"> 
       <img src="thumbnail.aspx?picture=<%=server.URLEncode("images/gallery/" & latestfolder & "/" & file.Name)%>&maxWidth=100&maxHeight=60" style="border:1px solid #ffffff; margin:5px; margin-top:14px;"> 
      </a>   
     <% end if 
    end if 

с

if right(lcase(file.Name),3) = "jpg" then %> 
     <a href="thumbnail.aspx?picture=<%=server.URLEncode("images/gallery/" & latestfolder & "/" & file.Name)%>&maxWidth=640&maxHeight=480" target="_blank" style="text-decoration:none; cursor:pointer;"> 
      <img src="thumbnail.aspx?picture=<%=server.URLEncode("images/gallery/" & latestfolder & "/" & file.Name)%>&maxWidth=100&maxHeight=60" style="border:1px solid #ffffff; margin:5px; margin-top:14px;"> 
     </a>   
    <% end if 
+0

Дэвид, спасибо за ваши ответы ... могу вы, пожалуйста, скажите мне, что, по вашему мнению, я должен удалить, как сказать мне точное кодирование ... как им не так хорошо в кодировании ... мой друг закодировал это для меня ... и я не могу его полностью понять. –

+0

не беспокоится, см. Мое редактирование –

+0

hey david, теперь изображения появились, НО, но все же появляются изображения, которые впервые появляются в фотоальбоме. Не последние фотографии, которые я загрузил. вы можете увидеть, где выше сценарий http://xaghrascouts.com/default.asp и эти последние фотографии я прислал (которые в нижней части) http://xaghrascouts.com/album. asp? cat = JAkKGFdIQjIcABADC0VWQ0RW спасибо, если вы можете мне помочь :) –

Смежные вопросы