そうだＶＢＡでメールしよう

今日もカリカリと・・

最近は、ＶＢＡでいろいろと悪さをしています。

今日はＣＤＯを使ってメールを送る方法を・・・
本当は、ＭＡＰＩで送りたいのですが、今使っているメーラがＭＡＰI対応といいつつうごきません　ｏｒｚ

やり方は簡単
ＸＰならどこでも動くみたいです。
ただし、（なんでもやってくれる）ＳＭＴＰサーバを見つけてくること

ＸＸＸ＝CreateObject("CDO.Message")
でメール送るよっていうのをクライアントに教える

あとは。
Fromに自分のメアドを
Toに相手のメアドを
Subjectは件名
TextBody が本文(改行とかもできる）
Configuration.Fields.Itemは("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
外部ＳＭＴＰをつかうよ

Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") =
メールサーバ書いてね

oMsg.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
ここはＳＭＴＰのポート　だいたいは２５


Configuration.Fields.Update
でおくるよーって宣言して

oMsg.Send
メールすればいい


ただ、連続で遅れなかったりといろいろ課題はありますが・・・
それはのんびり考えます。

参考：http://www.atmarkit.co.jp/fwin2k/win2ktips/428wshmail/wshmail.html

ゲームで運営からサギにあいました

うーん
３月３０日に４月１日の規約改定をメールでおくってくるってどうなんだろう
しかも、お金がかかる部分の改定を・・・
その前に、課金キャンペーンとかやっていましたが・・・

ＶＥＣＴ○Ｒさんはサギ会社かなー
それともよっぽど厳しい運営なのか

判断に悩みます

さてと

これよりがんばります

また２日サボっていましたが

ゲームのほうが中身はかきやすいんだけどねー

うーん

さっそくＢＬＯＧの更新を忘れました。

３日坊主ですね・・・

というか、今日はプログラムをしなかったのが原因です。
またゲームのネタにもどろうかなー

ＶＢＡも捨てたもんだ

ＶＢＡでＩＥの制御をかりかり

昨日のＢＡＳＩＣ認証はなんとかなりそうです。

次はフレームか？