J
J P Singh
We have a department who scans a lot of pictures for each project they work
on and then emails them out to about 100 odd users within the company. This
causes lots of problems hence we decided to map thier folder to a webserver
so instead of them emailing out everything they can send out a link to allow
users to view the pictures in thier browsers.
What they effectively do is every time they start work on a new project they
create a sub folder with that particular project number and save the
pictures in there.
the users can see the pictures by using the url like
http://ourserver/xxxxxx
where xxxxxx is the project number.
We have used the file system object to generate a list of files like the one
below. The question is we want to give our users and option of using the
First , Previous, Next and Last links when viewing the files in any folder
so they don't have to keep clicking every single file to view it.
One solution that I could think of was to have a java script pop with the
links but don't know how to code it. Does anyone have any idea how I can
accomplish this. Also thing to keep in mind is that new subfolders are being
created every week.
<%
'Create our filesystem object
Set objFS = Server.CreateObject("Scripting.FileSystemObject")
'Get this folder
FolderPath=Request.ServerVariables("APPL_PHYSICAL_PATH") & "files"
Set objFolder = objFS.GetFolder(FolderPath)
Set objFiles = objFolder.Files
For Each objFile In objFiles %>
<TR>
<TD><font size="2" face="Verdana"><%=objFile.ParentFolder%></font></TD>
<TD><font size="2" face="Verdana"><% Response.Write("<a href='files\"
+ objFile.Name + "' target = " & "_blank" & ">" + objFile.Name +
"<br>")%></font></TD>
</TR>
<% Next %>
on and then emails them out to about 100 odd users within the company. This
causes lots of problems hence we decided to map thier folder to a webserver
so instead of them emailing out everything they can send out a link to allow
users to view the pictures in thier browsers.
What they effectively do is every time they start work on a new project they
create a sub folder with that particular project number and save the
pictures in there.
the users can see the pictures by using the url like
http://ourserver/xxxxxx
where xxxxxx is the project number.
We have used the file system object to generate a list of files like the one
below. The question is we want to give our users and option of using the
First , Previous, Next and Last links when viewing the files in any folder
so they don't have to keep clicking every single file to view it.
One solution that I could think of was to have a java script pop with the
links but don't know how to code it. Does anyone have any idea how I can
accomplish this. Also thing to keep in mind is that new subfolders are being
created every week.
<%
'Create our filesystem object
Set objFS = Server.CreateObject("Scripting.FileSystemObject")
'Get this folder
FolderPath=Request.ServerVariables("APPL_PHYSICAL_PATH") & "files"
Set objFolder = objFS.GetFolder(FolderPath)
Set objFiles = objFolder.Files
For Each objFile In objFiles %>
<TR>
<TD><font size="2" face="Verdana"><%=objFile.ParentFolder%></font></TD>
<TD><font size="2" face="Verdana"><% Response.Write("<a href='files\"
+ objFile.Name + "' target = " & "_blank" & ">" + objFile.Name +
"<br>")%></font></TD>
</TR>
<% Next %>