出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
メールを複数送信 　 とどろきさん [2001/08/01 11:10:29] [466]
　 Re:メールを複数送信 　 YasNet（管理人）さん [2001/08/01 13:47:37] [467]
　 　 Re:メールを複数送信 　 とどろきさん [2001/08/01 14:53:25] [468]
[466] メールを複数送信
投稿者：とどろきさん 2001/08/01 11:10:29
メールを複数のメンバーへ送信する際に、BASP21コンポーネントを使用し、
Do〜Loopで処理をしています。ソースは以下のとおりです。
Loopされる処理は、全部で200件ほどです。

'###ここから
Do While not RS.EOF

m_to = RS("mail") '送信先
m_from = "xxxx@xxxxxxx.com>" '送信者
m_srv = "mail.xxxxxxx.com" 'メールサーバー
m_subj = "こんにちは" 'subject
m_file = ""
m_log = ""
m_body = "送信メッセージ" '本文

rc = bobj.SendMailEx(m_log,m_srv,m_to,m_from,m_subj,m_body,m_file)

If rc <> "" Then
senderr = senderr + 1　'エラーカウント
End If

busu = busu + 1 '送信数カウント

RS.MoveNext

Loop
'### ここまで

このソースを使い、RS("mail")を自分のメールアドレスに置換え、
試したところ、100通は受信できましたが、残り100通は受信できませんでした。
その時の変数senderrは0で、busuは200でした。
BASP21でメールを複数送信するというのは無理なのでしょうか？
よろしくお願いします。

レンタルサーバー仕様
Windows2000 + IIS5.0
BASP21利用可
[467] Re:メールを複数送信
投稿者：YasNet（管理人）さん 2001/08/01 13:47:37
こんにちは　YasNetです
　
> メールを複数のメンバーへ送信する際に、BASP21コンポーネントを使用し、
> BASP21でメールを複数送信するというのは無理なのでしょうか？
> よろしくお願いします。
>
> レンタルサーバー仕様
> Windows2000 + IIS5.0
> BASP21利用可
えっと、まず、問題はレンタルサーバって所が問題ですね。
1台丸ごとのレンタルサーバなのでしょうか？
多分共有のレンタルサーバだと思いますので、大量のメール送信は止めましょう。
他のユーザにも迷惑がかかりますので・・・
　　
本来ならCCやCCBを使って送信すれば良いと思います。

どうしても、1件づつ大量に送信したいのであれば、専用のサーバを1台借りた方が良いですよ。

ソース的には問題は、なさそうなので、POPまたはSMTPサーバの件数？（容量）制限がかけられていると思います。
　
くれぐれも、スパムメール等に使用しないで下さいね。きっと違うでしょうが（笑）
　　
では　では
[468] Re:メールを複数送信
投稿者：とどろきさん 2001/08/01 14:53:25
早速のレスありがとうございます。

> ソース的には問題は、なさそうなので、POPまたはSMTPサーバの件数？（容量）制限がかけられていると思います。
>
だから100通丁度しか、送信ならなかったのかな？

> くれぐれも、スパムメール等に使用しないで下さいね。きっと違うでしょうが（笑）
>
大丈夫っす。会員向けのメール送信に利用したかっただけです。

考えてみればサーバを共有してるわけだし、無茶は出来ませんよね。
とりあえず、Web上のデータをCSVかなんかでダウンロードするようにして、
一斉配信用のソフトを利用して送信することにします。

ありがとうございました。

TreeBBS For ASP V.0.1.3
Program By ＹａｓＮｅｔ