Photo Gallery
Member List
Search
Calendars
FAQ
Ticket List
Log Out
Forums
Register
Login
My Profile
Inbox
Address Book
My Subscription
My Forums
Display all images in a given directory.
Logged in as: Guest
arrSession:exec spGetSession 2,16,62626
Active Users: There are
0
members and
0
guests.
Users viewing this topic: none
Printable Version
All Forums
>>
[Scripting]
>>
Post a VBScript
>> Display all images in a given directory.
Do you like VisualBasicScript.com? Link to us and help spread the word about our forum. Thanks!
Page:
[1]
Login
Message
<< Older Topic
Newer Topic >>
Display all images in a given directory. -
7/23/2008 3:15:43 AM
TKS
Posts: 153
Score: 0
Joined: 5/16/2008
Status:
offline
<html> <head> </head> <body> <script type="text/vbscript"> Dim FileSys: Set FileSys = CreateObject("Scripting.FileSystemObject") Dim DemoFolder: Set DemoFolder = FileSys.GetFolder("Smilies/") Dim FolColl: Set FolColl = DemoFolder.Files For Each Subfol In FolColl Document.Write("<img src=Smilies/") & (Subfol.Name) & ("><br />") Next </script> </body> </html>
^^^ This is a much easier way of displaying all images in a given directory, as apposed to writting them out individually, i.e. :
<html> <head> </head> <body> <img src=Smilies/IMG1.gif> <img src=Smilies/IMG2.gif> <img src=Smilies/IMG3.gif> <img src=Smilies/IMG4.gif> <img src=Smilies/IMG5.gif> <img src=Smilies/IMG6.gif> <img src=Smilies/IMG7.gif> <img src=Smilies/IMG8.gif> <img src=Smilies/IMG9.gif> <img src=Smilies/IMG10.gif> <img src=Smilies/IMG11.gif> <img src=Smilies/IMG12.gif> <img src=Smilies/IMG13.gif> <img src=Smilies/IMG14.gif> <img src=Smilies/IMG15.gif> <img src=Smilies/IMG16.gif> <img src=Smilies/IMG17.gif> <img src=Smilies/IMG18.gif> <img src=Smilies/IMG19.gif> <img src=Smilies/IMG20.gif> <img src=Smilies/IMG21.gif> <img src=Smilies/IMG22.gif> <img src=Smilies/IMG23.gif> <img src=Smilies/IMG24.gif> <img src=Smilies/IMG25.gif> <img src=Smilies/IMG26.gif> <img src=Smilies/IMG27.gif> </body> </html>
Post #: 1
RE: Display all images in a given directory. -
7/24/2008 1:26:48 AM
p0ng
Posts: 25
Score: 0
Joined: 6/18/2008
Status:
offline
thanks, very nice.
(in reply to
TKS
)
Post #: 2
If you found our site useful please link to us
<a href="http://www.visualbasicscript.com">VisualBasicScript.com</a>
.
All Forums
>>
[Scripting]
>>
Post a VBScript
>> Display all images in a given directory.
Page:
[1]
Jump to:
Select a Forum
All Forums
----------------------
[Welcome]
- - Forum Rules
- - Test Posting Messages
- - New Member Area/Introduction
[Scripting]
- - WSH & Client Side VBScript
- - WSH & Client Side VBScript Tutorial
- - Post a VBScript
- - Windows PowerShell
- - ASP
- - ASP.NET
- - Windows Script Components
[General Forum]
- - Other Programming/Scripting Languages
- - Suggestions & Feedback
- - Off-Topic Lounge
New Messages
No New Messages
Hot Topic w/ New Messages
Hot Topic w/o New Messages
Locked w/ New Messages
Locked w/o New Messages
Post New Thread
Reply to Message
Post New Poll
Submit Vote
Delete My Own Post
Delete My Own Thread
Rate Posts
Forum Software ©
ASPPlayground.NET
Advanced Edition
2.5.5 ANSI
All Forums >> [Scripting] >> Post a VBScript >> Display all images in a given directory. 
Printable Version
Display all images in a given directory. - 
New Messages
No New Messages
Hot Topic w/ New Messages
Hot Topic w/o New Messages
Locked w/ New Messages
Locked w/o New Messages
Post New Thread