Minoruさん、こんばんは。

＞BSMTP.DLLのRcvMail関数を使用してメール受信をしたいのですがうまく行きません。
＞//関数宣言
＞FUNCTION Any RcvMail(REF UnsignedLong szServer,REF UnsignedLong szUser, &
＞                     REF UnsignedLong szPass,REF UnsignedLong szCommand, &
＞                     REF UnsignedLong szDir) LIBRARY \"BSMTP.DLL\"
＞//スクリプト
＞String  ls_Server, ls_User, ls_Pass, ls_Command, ls_Dir
＞UnsignedLong  lul_Server, lul_User, lul_Pass, lul_Command, lul_Dir
＞Any  la_MailFiles
＞//String変数にすべての値を代入
＞ls_Server = \"XXXX.co.jp\"
＞....
＞//すべての引数をポインタに変換
＞lul_Server = lstrcpyn(ls_Server,ls_Server,0)
＞....
＞la_MailFiles = RcvMail(lul_Server,lul_User,lul_Pass,lul_Command,lul_Dir)
＞....
＞上記スクリプトは、にしやんさんのSENDMAIL関数の使い方(発言NO:6562)を参考にしました。
＞Variant型をAny型で代用するのがいけないのでしょうか？
＞知っている方がいらっしゃいましたら教えてください。よろしくお願いします。

私もPBでBSMTP.DLLを使って受信ができないかとトライしましたが、結果はNGでした。
BSMTP.DLLで受信リストをPBが受け取る箇所で、どうしてもエラーになってしまうのです。
Any型の変数を作成したりいろいろ試しましたがあきらめました。

対策としては、CでBSMTP.DLLを呼び出すDLLを作成し、そのCのDLLをPBの外部関数で呼び出す
方法しか思い付きません。

で、私は結局どうしたかというと、PBDSから「父メール」をダウンロードして問題を解決しました。
「父メール」にはSMTP/POP3のプロトコルでメールの送信／受信ができるユーザオブジェクトが
ありますのでこれを活用させていただき、無事メールの受信処理をPBで記述できました。