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

精华好帖回顾
· 牙齿问题Q&A（7月6日更新答复） (2008-2-27) 微蓝的简单	· I can't see myself... (2007-1-17) Kingfisher
· 2025 美味台北好吃不贵 (2025-4-16) 胡须康	· 情人的眼泪 - 林忆莲和Dick Lee（Patrick Zhu Vs SteveKing之五）2013年6月重建版本 (2008-6-15) patrickzhu

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