ASPでメール送信時エラーが出る
こんにちは ASPでbasp21を使ってメールを送るように作っているのですが
<%@ LANGUAGE = VBScript%>
<%
Dim strServer 'SMTPサーバ
Dim strTo '宛先
Dim strFrom '送信元
Dim strSub 'メール標題
Dim strBody 'メール本文
Dim strFile '添付ファイル
Dim result '戻り値
strServer = "abc.com"
strTo = "efg@abc.com"
strFrom = "mail@abc.com" & vbTab & "abc:hogehoge"
strSub = "件名"
strBody = "本文"
strFile = ""
set obj=server.createobject("basp21")
result = obj.SendMail(strServer,strTo,strFrom, strSub,strBody,strFile)
If result <> "" Then
Response.Write("メール送信エラー :" & result)
Response.End
End If
と言う感じで 何の変哲もない内容なんですが
実行すると
Active Server Pages, ASP 0115 (0x80004005)
外部オブジェクトでトラップできるエラー (C06D007E) が発生しました。スクリプトの実行を続行できません。
とでます
色々調べて 権限がないのかとも思い再セットして
DLLの確認もしましたが同じです
サーバーアドレスも:25を付けたりしましたが
同じです。
ただ、
strServer = "abc.com"
を 空白("")にすると
ちゃんとエラーで
メール送信エラー :Server name invalid
と出るのです
と言う事は オブジェクトの作成はできているの?
と言う感じで、どうもよく分かりません。
ちなみに 他のページで画像のアップロードに
FormSaveAs を使っていますが いたって快適に動きます
サーバーはIISで win2000でテストしています
wwwサーバーはONにしていますが
mailサーバーはOFFにしています
これは関係あるのでしょうか?
自分のマシンのmailサーバーは使わないからOFFで良いかなと
思ってそうしています。
どういうポイントが悪いのかよく分からないので
どなたか教えて頂けたらと思います
よろしくお願いします。
お礼
ありがとうございます!! その後、該当ASPを実行させるdllファイルが無かったためと判明しました! このエラーっていろいろなパターンで出てくるんですね。。。 ご回答いただきまして、ありがとうございました。