URGENT open file

[lyealain]

<%
 
Dim objFolder   
 
 Set fso=Server.CreateObject("Scripting.FileSystemObject")
Set objFolder = fso.GetFolder("C:\Inetpub\wwwroot\CLS1\FA\Uploads")
 
For Each objFile in objFolder.Files 
     Response.Write("<u>" &objFile.Name &"<u><br>")    
Next
 
For Each objFile in objFolder.subfolders
     Response.Write("<u>" &objFile.Name &"<u><br>")    
Next
 
%>

how do i open the file above?? i wan to click on the file ..<u> &objFile.Name &"<u>.. then will prompt me whether wan to save or open..

[jhardman]

Unfortunately, you write the link the same way you would write any hyperlink in HTML, and then prompting you to open or save is a browser-dependent behavior. Try writing:

response.Write("<a href=" & chr(34) & objFile.Name & chr(34) &">" & objFile.Name & "</a>")

and if the browser interprets it correctly, then you know you did it right.

Jared

[lyealain]

<%

Dim objFolder

Set fso=Server.CreateObject("Scripting.FileSystemObjec t")
Set objFolder = fso.GetFolder("C:\Inetpub\wwwroot\CLS1\FA\Uploads" )

For Each objFile in objFolder.Files
response.Write("<a href=" & chr(34) & objFile.Name & chr(34) &">" & objFile.Name & "</a>")

Next

%>
i put like this??

[jhardman]

that looks right to me