vbsファイルでのワイルドカード

質問

Win-XPです。
初歩的な質問で申し訳ありませんが、よろしくお願いいたします。

vbsファイルで、メール送信処理をしています。
ファイルを添付する際、ファイル名にワイルドカードを使いたいのですが
そういったことは可能でしょうか。

コードは以下のように書きました。下から２行目でエラーが発生します。
------------------------------------------------------------
Set myOLApp = WScript.CreateObject("Outlook.Application")
Set myOLItem = myOLApp.CreateItem(olMailItem)

With myOLItem
.To = "test@***.co.jp"
.Subject = "（周知）朝礼場所変更のお知らせ"
.Body = "テスト本文１" & vbCRLF & "テスト本文２"
End With
Set myAttachments = myOLItem.Attachments
myAttachments.Add "C:\テストフォルダ\map_office_" & * & ".jpg"
myOLItem.Send
------------------------------------------------------------

vbsファイル内でのワイルドカードの使い方を教えてください。
よろしくお願いいたします。
（説明不足でしたら申し訳ありません。）

回答No.1

BLUEPIXY · ベストアンサー

多分ムリかと思います。
面倒でも、他でファイルのリストを作って
ひとつずつ.Addしないとだめじゃないかと思います。

お礼

お礼が遅くなってしまい、申し訳ありません。
やっぱり、リスト作ってファイル名取得しないとダメみたいですね。
ありがとうございました。

回答No.2

oldroot2005

エラーそのものは * を "" で括っていないからだと思います。あとは Outlook がワイルドカードに対応しているかどうかですね。

お礼

お礼が遅くなってしまい、申し訳ありません。
ご回答ありがとうございました。