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

精华好帖回顾
· 有猫元年记事——121楼更新：那些勾引过我的猫咪们…… (2020-5-31) 虞宅与美丽	· 买入OZ土炮，Falcon XR6 FG MK2 （272楼更新土炮方向盘对比，男人的手感问题） (2014-4-17) civet
· 参加活动事故之后-車報廢的經過#29更新 (2011-9-8) guguji	· <原创>色诱之丁丁炒饭-外加凉皮！ (2008-1-27) bluesummer

查看: 1247|回复: 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