急！难！关于预览图片的问题

[mybread]

我想做一个管理图片的资源系统。图片放在文件夹里，当用网页浏览该文件夹时，用表格显示该文件夹里的所有图片，格式是每行6列，根据文件夹里的图片可以任意多行，当点击浏览的图片时，又可以在另外一个窗口同样大小地显示该图片。应该说跟ACDSEE差不多吧！

[mingyuexingguang]

FSO组件
for each循环+for行数循环

[笨笨兔兔兔兔兔]

楼上的方法你有哪不明白的？？

[mybread]

有没有什么例子给我参考呢？

[笨笨兔兔兔兔兔]

Function ShowFolderList(folderspec)
Dim fso, f, f1, fc, s
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(folderspec)
Set fc = f.Files
For Each f1 in fc
s = s & f1.name
s = s & "<BR>"
Next
ShowFolderList = s
End Function

[FBugFramework]

http://www.86579.cn/

注册一个用户后。在会员图库管理里面。。 功能都有。

不过它那个的布局格式为
---------------------------------------------
| | |
| 图片 | 图片 |
| 列表 | 浏览 |
| 区域 | 区域 |
| | |
| | |
| | |
| |---------------------------------|
|---------| 图片操作区域 |
| 分页 | |
| - - | |
| 搜索 | |
---------------------------------------------

[mybread]

能不能只获取图片的名称呢？还要获取图片的大小，格式

[mybread]

还有就是原来图片的页面大小

[FBugFramework]

<img src='12.jpg' id="MyIMG">
<script language='JavaScript'>
var oIMG = document.all.MyIMG;
document.write(oIMG.width + "<BR>");
document.write(oIMG.height + "<BR>");
document.write(oIMG.fileSize + "<BR>");
document.write(oIMG.nameProp + "<BR>");
</script>

[FBugFramework]

你可以测试一下我给你的那个网站。
对图片的大小操作也有的啊。

注意IMG里面是没有width 和 height 的。