Ребят, кто в asp понимает, подсобите.
Вот код который будет показывать ОДНУ картинку по маске, если она существует.
Код:
<%
Dim FileName
FileName = server.htmlencode(sItemCode) & "_ACCESSORIES.jpg"
FileName = Server.MapPath("mmHM/images/" & FileName)
If IsFileExists(FileName) = True Then
Response.Write "<a target=_blank href=mmHM/images/" & server.htmlencode(sItemCode) & "_ACCESSORIES.jpg><img border=0 width=50 height=50 src=mmHM/images/" & server.htmlencode(sItemCode) & "_ACCESSORIES.jpg> "
Else
Response.Write ""
End If
Function IsFileExists(byVal FileName)
If FileName = "" Then
IsFileExists = False
Exit Function
End If
Dim objFSO
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
If (objFSO.FileExists( FileName ) = True) Then
IsFileExists = True
Else
IsFileExists = False
End If
Set objFSO = Nothing
End Function
%>
Вот перечень окончаний названий файлов которые могут быть.
Код:
_ACCESSORIES
_ACCESSORIES1
_ACCESSORIES2
_BACK VIEW
_BOTTOMVIEW
_BOX
_BOX_OPENED
_BOXLABEL
_FRONT_VIEW
_LABEL
_LABEL1
_PACKAGING
_PACKAGING1
_PN
_REARVIEW
_TOP VIEW
Как преобразовать вышепреведенный код в array всех имен файлов, заместо проверки только одного файла?