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

精华好帖回顾
· 回首六年间（二）—— 现职工作篇 (2008-7-13) simonwang	· 新足迹厨艺大展示：今天晚餐-小盘鸡,野山椒炒牛柳,韭菜炒蛋 (2008-12-1) bluesummer
· 再来参加活动！---【狸出品】之无敌御寒绝品【笋干老鸭煲】坑毕！！！ (2013-6-17) 黑芝麻狐儿	· 我的找工经历：PROJECT ACCOUNTANT (2012-8-28) 神行太保

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