件名も内容も無いメールを自動削除する方法

差出人・件名・内容が何も無いメールを 「豆腐メール」 と言うらしいけど、Microsoft Office Outlook 2003 で自動的に削除する方法がネットに載っていたので転記しておきます。

件名と内容が何も無いメールを自動的に迷惑メールのフォルダへ振り分ける方法

ツール⇒マクロ⇒Visual Basic Editorを開く
ThisOutlookSession に下記のコードを貼り付ける

Dim WithEvents objInboxItems As Outlook.Items 'イベント駆動のためのオブジェクト
Dim objDestinationFolder As Outlook.MAPIFolder '移動先フォルダ
'　OutLook起動時に、このルールを有効にします。
Private Sub Application_Startup()
StartRule
End Sub
'　ルールの有効化
Sub StartRule()
Dim objNameSpace As Outlook.NameSpace
Dim objInboxFolder As Outlook.MAPIFolder

Set objNameSpace = Application.Session
Set objInboxFolder = objNameSpace.GetDefaultFolder(olFolderInbox) '受信トレイのフォルダ
Set objInboxItems = objInboxFolder.Items '受信トレイのアイテムを関連付け
Set objDestinationFolder = objNameSpace.GetDefaultFolder(olFolderJunk) '迷惑メールのフォルダ
End Sub
'　ルールの無効化
Sub StopRule()
Set objInboxItems = Nothing
End Sub
'　イベント駆動型の処理ルーチンです
Private Sub objInboxItems_ItemAdd(ByVal Item As Object)
'件名・内容がブランクを指定フォルダに移動
If Item.Body = "" And Item.Subject = "" Then
Item.Move objDestinationFolder
End If
End Sub

動かすためには、デジタル署名をするか、あるいは
ツール⇒マクロ⇒セキュリティーでセキュリティーレベルを「中」または「低」にする

デジタル署名の方法
すべてプログラム⇒Microsoft Office⇒Microsoft Office ツール⇒VBA プロジェクトのデジタル署名をクリックしてインストール
署名してOKをクリック
先ほどの Visual Basic Editor を開き、
ツール⇒デジタル署名⇒選択をクリツク⇒証明書のプロパティーを表示しますをクリック⇒証明書のインストール⇒次へ、次へとクリックして行き、完了、OKをクリック

Microsoft Outlook の仕訳ルールの移し方

Microsoft Office Outlook 2003を未だに使っていますが、迷惑メール対策のために設定した仕訳ルールをエクスポートして他のパソコンへ移す方法

1.移設元のPC
ツール ⇒ 仕訳ルールと通知 ⇒ オプション ⇒ 仕訳ルールをエキスポート

2.移設先のPC
ツール ⇒ 仕訳ルールと通知 ⇒ オプション ⇒ 仕訳ルールをインポート

なお、Outlook Express の場合はフリーソフトが必要
http://gan3.seesaa.net/article/118072978.html

全てのgmailが迷惑メールフォルダに入る

outlook2003を使用していますが、全てのgmailが迷惑メールトレイに入って困っていました
迷惑メールのオプション⇒受信拒否リストに @gmail.com は入っていません
差出人セーフリストに @gmail.com を入れてもダメでした
自動処理しないにチェックを入れても入ってしまいます
何か変だなと思い、ウイルスセキュリティZEROの機能を停止させて送受信すると受信トレイに入ります

あぁ〜勘違いでした

ウイルスセキュリティZERO⇒迷惑メール対策 設定⇒ブロックの中に @gmail.com が入っていたので、これを削除したら直りました
入れた覚えは無いのに!

スパムメール対策

迷惑メールが毎日洪水の様に入って来て仕事にならないので、迷惑メール駆除ソフト (フリーソフト) を導入したが問題が多々あり、OutLookExpress のメッセージルールを使って日本語以外のメールを自動的に削除することにした

最初は、英文メール駆逐艦 「雪風」を入れたのだが、稀に必要なメールまで削除してくれるので仕方なくアンインストール

次に入れた Outlook Express専用の英文メール削除ソフト1.1aは、途中から何故かエラーが出て機能しなくなる

そこで、OutLookExpressのメッセージルールのみ使用し、迷惑メール
によく書かれている卑猥な単語やメールアドレス及びURLの一部が含まれてるメールを自動的にゴミ箱へ入れるよう小まめにセッティング

同様の手法で、日本語が含まれないメール (ひらがなやカタカナが入ってないメール) を自動削除

OutLookExpressで英文メールを自動削除する方法

「ツール」-「メッセージルール」-「メール」-「新規作成」を選択
「1.ルールの条件」の中から「メッセージ本文に指定した文字が含まれる場合」にチェックを入れる
「2.ルールのアクション」の中から「削除する」にチェックを入れる
「3.ルールの説明」のメッセージ本文に「指定した言葉が含まれる」場合をクリック

単語または文字列を入力する欄に、「あ」を入れて「追加」をクリック
「オプション」をクリックして、「メッセージが次の言葉を含まない場合」にチェックを入れるて「OK」をクリック (※ここが重要)
同様に「い」を入力して「追加」をクリック (2回目からはオプションはクリックする必要はない)
以下、同様にひらがな、カタカナ48文字を入力して行く

これだと、アドレスを間違って入力してメールを送信した際、サーバーからのターンメールが自動的にゴミ箱に入ってしまうので、送信者の所へサーバーから送られてくるリターンメールのアドレスを入れる

最後に「4.ルール名」のを新規のメールルールを「迷惑メール」に変更して「OK」をクリックして終了

念のため、この方法で、本文にひらがなやカタカナが入ってなくても「件名」に入っていれば削除しないように設定しておく
(件名に用件だけ書いて画像だけ添付して来る人がいるため)

これまで沢山の迷惑メールが来ていてのに、急に来なくなると、案外寂しいものです

Outlook メッセージルール バックアップ

アウトルックのメッセージルールを活用すれば迷惑メールが削減できるけど、そのルールを他のパソコンへ移せませんでした
でも、「Outlook Express 6」の「メッセージルール」を、簡単にバックアップ(エクスポート・インポート)できるフリーソフトがありました

http://www.gigafree.net/internet/mailsoft/oe6mb.html

ついでに古いパソコンから新しいパソコンへ outlookフォルダ、メールの内容を移動させる方法

古いパソコン「フォルダ名.dbx」を新しいパソコンへコピー (そのときにはoutlookを起動させない)

dbxファイルがある場所
C:\Documents and Settings\ユーザー名\Local Settings\Application Data\Identities\{番号の羅列}\Microsoft\Outlook Express\

新しいパソコンのdbxファイルがあるフォルダ内のFolders.dbxをFolders.oldにリネイム

outlookを起動
フォルダの階層とか無くなっているので修正