存档
通过WorkEasy之上传图片预览工具， 大大的提高了工作效率~
但是新的问题又出现，因为图片信息不全，我们网络部（OnlyMe）和编辑(OnlyOne)部的员工对客户的产品信息不是很了解~，这样就出现了一个新的问题，编号网网需要是某公司的编号，但是我们这边没有相关信息，客户天天到公司也不现实，怎么办呢？如果把所有图片打印出来，给客户看不久解决了吗？本来想用WorkEasy之上传图片预览工具，这样太费纸张了，于是在WorkEasy之上传图片预览工具的基础上修给，于是出现了本篇文章：Workeasy之图片文件统计打印
打印120多张图片只需要，在下面预留了名称，分类供客户填写，代码如下：
<html><head><title>点石传媒传图预览工具 – Design By MiaoQiyuan.cn cnly888.com</title></head><body style="font-size:14px;"><table><tr><td colspan=8 style="text-align:center;background:#CCC;border:solid 2px #666;padding:5px;font-family:黑体;font-size:28px;font-weight:800">点石传媒 客户产品 统计表</td></tr><tr>
<script type="text/vbscript">
j=10000 //产品编号设置，需要1开头
co="" //公司名称
eco="" //编号开头
fi=0 //产品名称,0:空；1:目录名；2:文件名
set fso=createobject("scripting.filesystemobject"):fpa=fso.getabsolutepathname("./"):set fpo=fso.getfolder(fpa):for each xx in fpo.files
if Lcase(fso.GetExtensionName(xx))="jpg" then
if i mod 8=0 then document.write "</script></tr><tr>"
if fi=1 then
fpn=fpo.name
elseif fi=2 then
fpn=replace(xx.name,"."&fso.GetExtensionName(xx),"")+" "
else
fpn=""
end if
i=i+1:document.write "<td><table height=140 width=110 bgcolor=#666666 onclick=""javascript:this.style.background=’#000′;"" ondblclick=""javascript:this.style.background=’#666′;""><tr><td bgcolor=#FFFFFF><img src="&xx.name&" width=100 height=100/></td></tr><tr><td bgcolor=#CCCCCC>名称:</td></tr><tr><td bgcolor=#CCCCCC>分类:</td></tr></table></td>"
end if:next
</tr><tr><td colspan=8 [...]
最近比较忙，没有更新博客。
因为现在公司网站程序已经完成，所以我更多的时间是上传图片，因为本人实在太懒了，天天传图，而且容易重复上传，郁闷。。。忽然想起了HTA文件~嘎嘎，于是出现了WorkEasy系列文章。。
这是第一篇文章，可以设置文件名的前缀，自动为产品编号，可以选择按文件夹名或按文件名显示产品名称，通过这个工具就可以直接复制粘贴。工作好不快乐。。。。。。。。