- PR -

Windows2003Server BASP21→BASP21proへの書き換えについて

参照元記事 | 同じ記事を参照しているスレッド一覧
1
投稿者投稿内容
retasu00
会議室デビュー日: 2008/10/04
投稿数: 2
投稿日時: 2008-10-04 03:07
はじめまして。こんにちは。

「Windows2000 IIS5.0」から「windows2003 iis6.0」へ
サーバーを移設するにあたり、
現在動作しているBASP21のプログラムを
BASP21proへ書き換えたいのですが、その書き換え方がわかりません。

大変ぶしつけなお願いなのですが以下のBASP21用のプログラムを
BASP21pro版に変更していただけないでしょうか。
BASPに関して詳しい方、宜しくお願い致します。

参考にしたURL
http://www.b21soft.co.jp/basp21/basp21pfaq.html#gokan


＝＝＝以下BASP21で記述したプログラムです＝＝＝＝＝＝＝＝＝＝＝＝＝

<%@ LANGUAGE="VBScript" %>
<% Option Explicit %>

<%

Dim strServer 'SMTPサーバ
Dim strTo '宛先
Dim mailfrom '送信元
Dim strSub 'メール標題
Dim strBody 'メール本文
Dim bobj
Dim result '戻り値
Dim strFile
Dim mtext '本文

'↓サーバーのアドレス
strServer = "xxxx.xx.xxxx.net"
'↓送信先のメールアドレス
strTo = Request("mail1") & vbtab & "bcc" & vbtab & "aaa@bbb.co.jp"
'↓送信元メールの設定（パスワードなど）
mailfrom = "<aaa@bbb.co.jp>" & vbTab & "xxxxxxxxxx.net:xxxxxx" ' AUTH LOGIN
'↓件名
strSub = "ご注文受付完了自動返信メール"
'↓本文
mtext="本文が入ります。"

strbody = mtext
Set bobj = Server.CreateObject("basp21")
result = bobj.SendMail(strServer,strTo,mailfrom, strSub,strBody,strFile)

If result <> "" Then
Response.Write("お客様のメールアドレスが間違っております。")
Response.End
End If

%>

＝＝＝以上になります。宜しくお願い致します。＝＝＝＝＝＝＝＝＝＝＝＝＝＝


retasu00
会議室デビュー日: 2008/10/04
投稿数: 2
投稿日時: 2008-10-05 02:36
自レスです。
解決しました。お騒がせしました。
1

スキルアップ／キャリアアップ（JOB@IT）