2011年6月30日木曜日
2011年6月22日水曜日
2011年5月31日火曜日
OUTLOOKで送信するとき自動的にBCCをつける方法 - エンタメLIFEHACKERS::mikye’s daily report
OUTLOOKで送信するとき自動的にBCCをつける方法 - エンタメLIFEHACKERS::mikye’s daily report
1.OUTLOOKを開いてAlt+F11を押す
2.VBAエディタが開く。左上のツリーを開いて(なにもいじったことなければProject1という名だと思う)、ツリーに出てきたOUTLOOKのアイコンを右クリック→コードの表示
3.以下のコードを張って閉じる。以上。
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim objMe As Recipient
Set objMe = Item.Recipients.Add("myaddress@mydomain.dom")
objMe.Type = olBCC
objMe.Resolve
Set objMe = Nothing
End Sub
※ myaddress@mydomain.domはBCCで送りたいメアドに変えてください。
1.OUTLOOKを開いてAlt+F11を押す
2.VBAエディタが開く。左上のツリーを開いて(なにもいじったことなければProject1という名だと思う)、ツリーに出てきたOUTLOOKのアイコンを右クリック→コードの表示
3.以下のコードを張って閉じる。以上。
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim objMe As Recipient
Set objMe = Item.Recipients.Add("myaddress@mydomain.dom")
objMe.Type = olBCC
objMe.Resolve
Set objMe = Nothing
End Sub
※ myaddress@mydomain.domはBCCで送りたいメアドに変えてください。
2011年5月30日月曜日
2011年3月14日月曜日
2011年3月2日水曜日
batを実行したときのウィンドウが出ないようにする
batを実行したときのウィンドウが出ないようにする: "batを実行したときのウィンドウが出ないようにする"
バックグラウンドでバッチを実行する。
BScriptを使いましょう。
以下の部分をrun.vbsとか名前を付けて保存して下さい。
以下の部分をrun.vbsとか名前を付けて保存して下さい。
Dim WShell
Set WShell = WSCript.CreateObject("WScript.Shell")
WShell.Run "test.bat test para",0 '非表示で実行
Set WShell = WSCript.CreateObject("WScript.Shell")
WShell.Run "test.bat test para",0 '非表示で実行
登録:
投稿 (Atom)