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

精华好帖回顾
· 悉尼短登记实 (2005-6-22) 上山下乡	· 秀秀我的旅游纪念品---追寻久远的记忆—英国篇 (2011-8-13) hr6970
· 长篇连载--忽尔十年（#223精彩更新，#102有pp的封面） (2009-2-15) 哈他真的生气了	· 悉尼买房记 (2007-2-15) 财神爷

查看: 1209|回复: 3

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

Sammy

皮靴族

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

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

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

感谢大家！分分伺候！

bulaohu

钻石靴族

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

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

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

donent74

铜靴族

发表于 2013-2-11 15: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