メールにファイルを添付する場合にパスワードで保護するやり方というのは、あるのでしょうか。個人用フォルダでのパスワード設定以外に、送受信する際のパスワード設定の方法があれば教えてください。よろしくお願いします。OSはWin98です。

このQ&Aに関連する最新のQ&A

A 回答 (3件)

ronnieさんこんにちは。


> やはり、素人には難しそうですね
ということですが、もしよろしければ私なりに作ったVBAコードと、それを動かす方法を追記しますので挑戦してみてください。少しややこしいかもしれませんが、がんばってみてください。

1,まずOutlook2000を起動します。
2,メニューバーから、[ツール(T)]>[マクロ(M)]>[VisualBasicEditor(V)]を選択し、VisualBasicEditorを起動させます。
3,VisualBasicEditorが起動したら、メニューバーから、[表示(V)]>[プロジェクトエクスプローラ(P)]と選択します。
4,VisualBasicEditorのどこか(たぶん左側)に「プロジェクト-Project1」の小さなウインドウがあって、その中に"Project1(VbaProject.OTM)"というアイコンがあると思いますが、そのアイコンの横の小さな"+"をクリックして階層を表示させます。
5,MicrosoftOutlookObjectsフォルダを開きます。
6,Outlookのアイコンで、"ThisOutlookSession"なるファイルがあると思いますが、これを右クリックして[コードの表示(O)]を選択します。
7,VisualBasicEditorの中にコードウインドウが開きます(メモ帳みたいなウインドウ)。
8,開いたウインドウ上に左右2つのリスト選択があって、左側の"(General)"をクリックして、その下にある"Application"を選択します。
9,"Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)~(1行空白)~End Sub"と、自動的に記入されます。
10,(1行空白)の所に、以下のコードをコピーして貼り付けてください。
'-----ここからコピー
Dim myPrompt As String, myTitle As String, myBox As String
On Error Resume Next
If Item.Attachments.Count > 0 Then
myPrompt = "添付ファイル付きメールが送信されようとしています。パスワードを入力してください。"
myTitle = "メール送信のパスワード保護"
myBox = InputBox(myPrompt, myTitle)
If myBox <> "xxxx" Then Cancel = True '---xxxxの所にすきなパスワードを入れてください。(何文字でもok)
End If
'-----ここまでコピー
11,"xxxx"の所にすきなパスワードを入れてください。

これで、次回の添付ファイル付きメール送信からパスワードが要求されるはずです。なお、見慣れたパスワード入力時の"***"表示はありません。また、VBAが解る人がこのコードを見ない限り、パスワードがばれることはないでしょう。心配なら、VisualBasicEditorの「プロジェクト-Project1」ウインドウの中の"Project1(VbaProject.OTM)"を右クリックし、"Project1のプロパティ"を選択すると、コード自体にさらにパスワード保護をかけることができます。
また、Outlookを保存後起動するたびに、「マクロが含まれています」という表示が出ますが、「マクロを有効する」を選択しないと、この機能は使えません。
    • good
    • 0
この回答へのお礼

Ttakさん!ありがとうございます!できました~~!
すばらしいです!とても助かりました。ありがとうございます!

お礼日時:2001/04/25 10:32

失礼しました。

前記回答のコードに記入漏れがありました。
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
If Item.Attachments.Count > 0 Then
  '---パスワード要求のルーチンへ
Else Exit Sub
End If'------この部分
End Sub

追加修正致します。

この回答への補足

アドバイスありがとうございました。しかし残念ながら、私の知識ではその、VBAをどのようにどこから設定したらよいのか分かりませんでした。。。。やはり、素人には難しそうですね。。(~_~;)

補足日時:2001/04/24 20:15
    • good
    • 0

ronnieさんこんにちは。


添付ファイル付きのメール送信に対してのみ、パスワードを要求するとういう意味合いでしたら、OutLookVBAのApplication_ItemSendイベントプロシージャで、AttachmentsコレクションオブジェクトのCountプロパティを調べ、値によって条件分岐する方法が考えられます。以下に例を示します。

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
If Item.Attachments.Count > 0 Then
  '---パスワード要求のルーチンへ
Else Exit Sub
End Sub

上記方法は、Win98SE+OutLook2000にて動作確認済みです。
    • good
    • 0
この回答へのお礼

TTakさん。先日はアドバイスありがとうございました。ただ結局色々試してみた結果、使用しないで済むようになりました。そこで、再度質問なのですが、一度アドバイス通りマクロで設定をして、不要になったので、追加した文を消して上書き保存したのですが、Outlook起動時にいつも、マクロが含まれています、無効にする、有効にする、のウィンドウがでてきてしまいます。これをなくすには、どのようにしたらよろしいのでしょうか。お手数おかけしますがよろしくお願いします。

お礼日時:2001/04/29 18:56

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Q送受信で設定しているはずのアカウントとパスワードを入力させられる

現在MicrosoftOutlookを使っているのですが、アカウント設定をしているはずなのに送受信を行う時に再入力をもとめられ、正しいアカウントとパスワードを入れても何回も入力要求のダイアログが出てきます。

以前はこのままの設定で問題なかったのですが、1週間前くらいからこの症状が出て送受信ができない状態になりました。
この症状はメーラーをOutlookexpresに変えても同じでした。

だれか原因がわかる方がいましたらおねがいいたします。

OSはXPでSP2は入れていません。

Aベストアンサー

あ、質問をよく見たら「再入力させられる」だけでなくて
「何回もダイアログが出て送受信が出来ない」
のですね。

先ほどの対策は「単に保存がされなく、毎回入れ直せば受信できる」ケースですので該当しません、申し訳ないです。

そうなると、原因としてぱっと考え付くのは

・何かの拍子に送受信の設定が変わってしまっている
・パスワードが違う
・メールボックスが満杯で受信できない
・プロバイダが「POP before SMTP」や「SMTP-auth」などのセキュリティ対策をした

等でしょうか。


ユーザー名、パスワード、サーバー名をふせてプロバイダ名を明記して設定がどのようになっているかここに書き出してみてはどうでしょうか?

また、送受信に失敗した際に出るダイアログの詳細画面に出る内容も参考になるかもしれませんのでここに貼り付けると原因究明の手がかりになるかもしれません。

Q添付ファイルが開けません。OSはWIN98SEです。

娘から、OUTLOOK EXPRESSに写真ファイルを添付したメールが届きました。
その写真をプリントしたいと思うのですがそのファイルが開けません。その際に、次の添付ファイルは安全でないためにメールからアクセスから削除されました。と注意書きがでます。メール本体にも写真が出るので見ることは、出来ますが、半分程度しかプリントアウト出来ません。私のPCのOSは、98SEです。このメールをXPのパソコンに転送するとファイルを開くことが出来ます。私のPC98SEで開きフルサイズでプリントアウト出来ないものでしょうか?

Aベストアンサー

以下のページの記述がご参考になるのではないかと思います。

http://support.microsoft.com/default.aspx?scid=kb%3bja%3b880551
http://www.atmarkit.co.jp/fwin2k/win2ktips/444oeattach/oeattach.html

Q添付ファイルのパスワード設定について

添付ファイルのパスワード設定について
送られてきたメールに添付ファイルが付いてたんですが、そのファイルを開こうとするとパスワードを入力する画面が出てきました。
パスワードは後で教えてもらってファイルは開くことができたんですが、この、パスワードの設定ってどうやってするのでしょうか。
すいませんが、よろしくお願いします。

Aベストアンサー

こんにちは
フリーのPDF-XChange Viewerを使えば
PDFにパスワードセキュリティをかけたり、はずしたりして保存できますよ。
http://www.forest.impress.co.jp/lib/offc/document/pdf/pdfxchange.html
ファイル/ドキュメントのプロパティ/セキュリティ以下

Qヤフーメールをローカルフォルダとは別のフォルダで送受信して受け取りたい

ヤフーメールの送受信には成功しましたが、
受信したメールがローカルフォルダに入ってしまい、
プロバイダのメールアドレスでのメールと混じってしまいます。
(画面の左側に、ヤフーメールが樹形図のように表示するようにしたいのです)
ホットメールは別のフォルダでなっているのですが、
随分昔に設定してやり方を忘れてしまいました。
どなたか教えてください。

Aベストアンサー

OEならば無理ですね。
適当にフォルダを作って、メッセージルールで受信時に振り分ける以外に方法なし、でしょう。

Qメールを自動送受信に設定する方法

ブロードバンドでout lookを使用してます。out lookを起動したときに自動的に送受信をするように設定するにはどうすればよいか教えて下さい。新しいメールが来ているかいちいち送受信をクリックしないといけないので不便です。(outlook expreseではないので間違えないようにおねがいします)

Aベストアンサー

【ツール】【オプション】【メールセットアップ】【送受信】
⇒『接続したら直ちに送信』にチェックを入れると、
常時接続なら、起動時に送受信されます。


このカテゴリの人気Q&Aランキング

おすすめ情報