新足迹 › 论坛 › 兴趣爱好区 › IT与科技 › IT专业论坛 › VB脚本的问题

精华好帖回顾
· 【鼠年大吉】当中国红遇上澳洲蓝，初二家宴(更做法) (2020-1-26) 铃儿响叮当	· 陈年旧事系列23 -- 思念 (2006-12-3) SuiYi
· 儿子的一些经验教训，给后来人借鉴，少走些弯路，顺便再求分分！最新更新在193#楼，198楼，200楼！ (2013-3-8) juliebie	· 如何种好草莓 (2012-9-11) HALAN

查看: 1309|回复: 3

VB脚本的问题 [复制链接]

Sammy

皮靴族

发表于 2013-2-11 10:58 |显示全部楼层

此文章由 Sammy 原创或转贴，不代表本站立场和观点，版权归 oursteps.com.au 和作者 Sammy 所有！转贴必须注明作者、出处和本声明，并保持内容完整

我不是做编程的，但是最近要用VB脚本实现自动发邮件的功能，请问各位大神有什么办法能让脚本自动添加附件吗？因为附件每次的名字都不同，但是扩展名和目录都是一样的。自动发送邮件在win7的计划任务里可以实现，但是只能是固定文件名才能添加附件。

感谢大家！分分伺候！

bulaohu

钻石靴族

发表于 2013-2-11 11:05 |显示全部楼层

此文章由 bulaohu 原创或转贴，不代表本站立场和观点，版权归 oursteps.com.au 和作者 bulaohu 所有！转贴必须注明作者、出处和本声明，并保持内容完整

自己寫從那個目錄裡讀取文件名的那一段就行了

donent74

铜靴族

发表于 2013-2-11 16:40 |显示全部楼层

此文章由 donent74 原创或转贴，不代表本站立场和观点，版权归 oursteps.com.au 和作者 donent74 所有！转贴必须注明作者、出处和本声明，并保持内容完整

应该遍历目录就可以了，网上随便找了个例子稍微改了一下，sorry没vb所以没运行过。
Set fso = CreateObject("Scripting.FileSystemObject")
Set Folders = fso.GetFolder("你的文件所在目录的绝对路径")
set fFile = Folders.Files
For Each fffile In fFile '遍历文件
文件名是fffile.Name，可据此进行处理
Next