ช่วยเพิ่มโค้ดสำหรับ download ไฟล์ให้หน่อยคับ การเรียกดูไฟล์ในโฟลเดอร์ แสดงชื่อไฟล์ในโฟลเดอร์

<%
<%
Set MyDirectory=Server.CreateObject("Scripting.FileSystemObject")
Set MyFiles=MyDirectory.GetFolder(Server.MapPath("/shopping")) 'แสดงชื่อไฟล์ในโฟลเดอร์ shopping
For each filefound in MyFiles.files
%>
<a href="<% =filefound.Name %>">Download <% =filefound.Name %></a>
<br>
<%
Next
%>
%>