PHP qdmail を使った、メールの受信方法

Question

###前提・実現したいこと
私は、PHP初心者で、勉強を独学で始めたばかりで
右往左往しながらプログラムを書いています。

実現したい事は、
①PHPの、qdmailを使う
http://hal456.net/qdmail_rec/
②1件づつメールを受信して、受信後に、そのメールをメールサーバーから削除する

です。

全件取得するプログラムは出来たのですが、
上記の①②が実現出来ず、困っています。

よろしくお願いします。

###発生している問題・エラーメッセージ
1件取得するプログラムは出来たのですが、
上記の①②が実現出来ず、困っています。

###該当のソースコード

 <?php
 include_once('qdmail_receiver.php');

 $server = array(
   'protocol'=>'pop3',
   'host'=>'pop.mail.yahoo.co.jp',
   'user'=>'kabuinfojp',
   'pass'=>'1206',
   'port'=> 110,
 );

$receiver = QdmailReceiver::start( 'pop' , $server);
print $receiver->text();

?>

###試したこと
色々なサイトを拝見し、試しましたが、上手く行きませんでした。

###補足情報(言語/FW/ツール等のバージョンなど)
PHP Version 5.6.24

Comments

[tsuemura]

コードを見る限り、①は実現出来ているように見えるのですが、違うのでしょうか？

[smileheart]

ご指摘の通りです。出来ています。②が出来ていない状態です。ご指摘ありがとうございます。

Answer 1

「色々なサイトを見た」のであれば、恐らくご覧になられているかとは思いますが。

1件ずつメールを取得する

POP特有の処理(OOPタイプ)

受信後に、そのメールをメールサーバーから削除する

qdmail_receiverでエラーメールを取得、削除

foreach( $target as $del_id ){  
    $receiver->delete($del_id);  
}  
$receiver->done();  

qdmail_receiverは便利なのでよく使いますが、
公式ドキュメントがいまいち情報不足だったり、開発終了していたりと保守上問題も多いです。
可能なら他のライブラリを利用することをおすすめします。
（と言いつつ、私自身勉強不足で、未だにqdmail使っていたりしますので、他のライブラリの紹介は控えさせて下さい）

----追記

$receiver = QdmailReceiver::start( 'pop' , $server); 

$max = $receiver->count();  // メールの件数を取得

for ($i; $i<$max; $i++) {
    print $receiver->text();
    $pointer =  $receiver->pointer(); // 現在のメールIDを取得
    $receiver->delete($pointer); // 現在のメールを削除
    $receiver->next(); // 次のメールへ
}
$receiver->done(); // メールの削除を確定

Comments

[smileheart]

ありがとうございます。

$target 　は、どこにも使っていないのに、効果があるのでしょうか？

include_once('qdmail_receiver.php');

$server = array(
'protocol'=>'pop3',
'host'=>'pop.mail.yahoo.co.jp',
'user'=>'kabuinfojp',
'pass'=>'パスワード',
'port'=> 110,
);

$receiver = QdmailReceiver::start( 'pop' , $server);
print $receiver->text();

foreach( $target as $del_id ){
$receiver->delete($del_id);
}
$receiver->done();

この様にしましたが、消えませんでした。

[smileheart]

$receiver = QdmailReceiver::start( 'pop' , $server);
print $receiver->text();

$target = $receiver->pointer();
foreach( $target as $del_id ){
$receiver->delete($del_id);
}
$receiver->done();

最初の1件は、消えましたが、再実行すると、次のメールが消えません。
どうしてでしょうか？

[smileheart]

このサイトの使い方が不明で間違った操作をしてしまいました。
再質問をさせて頂きましたので、よろしくお願いします。

[tsuemura]

間違えて解決済みにしてしまった件でしたら、多分このままで問題ないでしょう。
再質問の方に低評価付いてしまっていますし、一度削除された方が良いかと。。
ベストアンサー頂いた以上は責任持ってフォローします。

が、まず回答のリンクはお読みになられました？
私が引用した箇所はごくごく一部ですので、きちんとリンク先をお読みになってください。
その上で上手く行かないのであればお手伝いします。

[smileheart]

ありがとうございます。

再質問は、削除出来ない模様です。。。

リンクも拝見しましたが、まだ、PHP初心者のせいか
よく理解出来ません。

どの様にコードを書けばいいのか、教えて頂ければ助かります。

よろしくお願いします。

[tsuemura]

回答にサンプルを追記しました。

なお、確かに「お読みになりましたか？」とは書きましたが、読むだけで分かるものではありません。手を動かして下さい。
リンク先のコードを、コピペでも良いので試してみましたか？
自分のコードと同じところ、違うところを見比べてみましたか？

厳しい言い方になりますが、脊髄反射的に「初心者だから分かりません」では上達しませんよ。
もう少し頑張って見て下さい。

[smileheart]

ありがとうございます。

試して見ます。

[smileheart]

<?php
include_once('qdmail_receiver.php');

$server = array(
'protocol'=>'pop3',
'host'=>'pop.mail.yahoo.co.jp',
'user'=>'kabuinfojp',
'pass'=>'パスワード',
'port'=> 110,
);

$receiver = QdmailReceiver::start( 'pop' , $server);
print $receiver->text();

?>

これで、取得出来ていたはずなのですが、エラーもでず、画面が真っしろなままです。
どうしてでしょうか？

[tsuemura]

メールが無いんじゃないですか？

[smileheart]

メールはたくさん、存在しています。

どうも、初めの削除コマンドで削除してから、表示できなくなりました。

[tsuemura]

print $receiver->count();
とするとどうなりますか？

[tsuemura]

HTMLメールの場合は
$receiver->text();
では取得できないようですので
$receiver->bodyAutoSelect();
を使ってみて下さい。

[smileheart]

お返事ありがとうございます。

昨日、あれから外出してしまい、お返事できませんでした。

早速、試します。

[smileheart]

$receiver = QdmailReceiver::start( 'pop' , $server);
$receiver->bodyAutoSelect();
print $receiver->count();

これで、

128　　と表示されました。

$receiver = QdmailReceiver::start( 'pop' , $server);
$receiver->bodyAutoSelect();
print $receiver->text();

とすると、空白のままです。

[tsuemura]

$receiver->bodyAutoSelect();
print $receiver->text();
ではなく
print $receiver->bodyAutoSelect();
です。

[smileheart]

ありがとうございます。

HTMLメールがそのまま取得できました！

[smileheart]

$receiver = QdmailReceiver::start( 'pop' , $server);
print $receiver->bodyAutoSelect();
$receiver->delete($pointer);

これで、
メール取得し、当該メール削除までできました(^∇^)

ありがとうございます。

あと、送信者や、題名の取得なども必要だったんですが、
挑戦して見ます(^∇^)

ありがとうございました(^∇^)

[tsuemura]

良かったです。送信者や題名の取得については公式ドキュメントに記載があるので、ぜひ挑戦してみてください。

[smileheart]

$receiver = QdmailReceiver::start( 'pop' , $server);

echo htmlspecialchars(
print_r(
$receiver->header( array('subject','name') , 'none' ) //①件名取得
,true)
,ENT_NOQUOTES);

echo "\r\n";

echo htmlspecialchars(
print_r(
$receiver->header( array('from',0,'name') , 'none' )　//②送信元のメールアドレス
,true)
,ENT_NOQUOTES);

echo "\r\n";

echo htmlspecialchars(
print_r(
$receiver->header( 'from' , 'none' )　//③送信者
,true)
,ENT_NOQUOTES);

echo "\r\n";

print $receiver->bodyAutoSelect();
$receiver->delete($pointer); // 現在のメールを削除

上記の様に書いたのですが、
同じコマンドなどを書いていて、正しくないと思います。

また、送信者のメールアドレスなどが上手く取得できません。

今回の質問外のことで恐れ入りますが、
ご指導をいただけると嬉しい
です。

よろしくお願いします。

[tsuemura]

$receiver->header( array('from',0,'mail') , 'none' )　//②送信元のメールアドレス
$receiver->header( array('from',0,'name') , 'none' )　//③送信者
です。

> 同じコマンドなどを書いていて、正しくないと思います。
とは、具体的にどの点でしょうか？
目的が達せられているのであれば良いのではないかと思いますが。

[smileheart]

お返事ありがとうございます。

$receiver = QdmailReceiver::start( 'pop' , $server);
echo htmlspecialchars(
print_r(
$receiver->header( array('subject','name') , 'none' )//①件名取得
,true)
,ENT_NOQUOTES);
echo "\r\n";

echo htmlspecialchars(
print_r(
$receiver->header( array('from',0,'name') , 'none' )//③送信者
,true)
,ENT_NOQUOTES);

echo "\r\n";

/* ここを有効にすると、HTTP ERROR 500が出てしまいます。　←　A
echo htmlspecialchars(
print_r(
$receiver->header( array('from',0,'mail') , 'none' )　//②送信元のメールアドレス
,true)
,ENT_NOQUOTES);

echo "\r\n";
*/

print $receiver->bodyAutoSelect();
$receiver->delete($pointer); // 現在のメールを削除

上記の様に、Aの箇所を有効にすると、
HTTP ERROR 500が出てしまいます。どうしてでしょうか？

また、書き方なのですが、
以下の様に、①②③とまとめて書く方法はないのかなと思って
質問させて頂きました。

$receiver = QdmailReceiver::start( 'pop' , $server);
echo htmlspecialchars(
print_r(
$receiver->header( array('subject','name') , 'none' )//①件名取得
$receiver->header( array('from',0,'name') , 'none' )//③送信者
$receiver->header( array('from',0,'mail') , 'none' )　//②送信元のメールアドレス
,true)
,ENT_NOQUOTES);
echo "\r\n";

print $receiver->bodyAutoSelect();
receiver->delete($pointer); // 現在のメールを削除

よろしくお願いします。

[tsuemura]

//②送信元のメールアドレス
の直前に全角スペースがあるためです。半角に直してください。

また、HTTP ERROR 500と出て、何のエラーかが表示されない場合は、ソースの最初の方に
ini_set( 'display_errors', 1 );
と書き加えましょう。

まとめて書くには、共通の処理部分を関数にまとめるのが一般的です。
下記URLなどを参考に、ご自身で挑戦してみてください。
https://techacademy.jp/magazine/4925

[smileheart]

ありがとうございます。

挑戦してみます。