~greenlau: 既然你能夠安裝JMail, 為何不能註冊登錄CDONTS寄信元件呢?

跟adam大大報告
CDONTS也是可以被使用的(起碼在後台管理它有被動網給偵測到可以支援)
但是就是串不起來況且我覺得上面的錯誤訊息不像是單純mail的問題
感覺像是寫入資料到access中出了問題的樣子說

~greenlau: 論壇是個非常複雜的東東....
如果你有時間, 也可以試著放其它單純的留言板ASP程式或者寄信程式,
這樣應該就可以知道問題可能是在論壇程式本身了!!


<%
' 這是 CDONTS 寄信元件的使用範例
' 由於本公司伺服器會查驗發信來源及主機郵件帳號, 若非本公司實際租用之客戶, 將無法使用以下方式發信!!
' 本程式僅供證明網站伺服器絕對能夠執行 CDONTS 的寄信方式, 至於線上表單之設計, 需要客戶自行處理, 非本公司職責範圍.

Set Mailer = Server.CreateObject( "Cdonts.NewMail" )
Mailer.BodyFormat=0
Mailer.From = "此處請填寫付費租用本公司虛擬主機所配發的電子郵件帳號, 例如 service@my-name.com.tw"
Mailer.To = "此處請填寫收件人的電子郵件信箱地址"
Mailer.Subject = "這是 CDONTS 範例信件的標題"
Mailer.Body = "這是 CDONTS 範例信件的實際內文"
Mailer.Send
Set Mailer = Nothing
%>


<%
' 這是 JMail 寄信元件的使用範例
' 由於本公司伺服器會查驗發信來源及主機郵件帳號, 若非本公司實際租用之客戶, 將無法使用以下方式發信!!
' 本程式僅供證明網站伺服器絕對能夠執行 JMail 的寄信方式, 至於線上表單之設計, 需要客戶自行處理, 非本公司職責範圍.

Set JMail= Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress="此處請填寫您的付費租用本公司虛擬主機的網址, 例如 my-name.com.tw"
JMail.AddRecipient "此處請填寫收件人的電子郵件信箱地址"
JMail.Sender = "此處請填寫付費租用本公司虛擬主機所配發的電子郵件帳號, 例如 service@my-name.com.tw"
JMail.ContentType = "text/html"
JMail.Charset = "Big5"
JMail.Logging = true
JMail.Priority = 3
JMail.Subject = "這是 JMail 範例信件的標題"
JMail.Body = "這是 JMail 範例信件的實際內文"
JMail.Execute
JMail.close
set JMail=nothing
%>

看來不是JMAIL的問題, 而是access的欄位寫入的問題

Mambo其實可以搭配很多款論壇啦，只要bridge弄好就可以。
好比phpbb/simpleboard等。

Ipb2.0好像要開始收費了？！

最近在玩MD-Pro，感覺也頗有意思。
也是nuke系列的後代……

應該是在將程式繁化時.動到了Dv_ClsMain.asp檔案使他出錯
你是去下載的或是自己繁化的?
因為一般來說即使沒辦法寄也不會出現這種錯誤
你要改用jmail寄信.需要改一些東西

先打開inc/email.asp
找到
sub Jmail(email,topic,mailbody)
....
end sub
改成

sub Jmail(email,topic,mailbody)
on error resume next
dim msg
Set msg = Server.CreateObject("JMail.Message")
msg.silent = true
msg.Logging = true
msg.Charset = "BIG5"
msg.ContentType = "text/html"
msg.MailServerUserName = Forum_info(5) '輸入smtp伺服器登入名
msg.MailServerPassword = "登入密碼" '輸入smtp伺服器登入密碼 msg.From = Forum_info(5) '發信人Email (在後台設定)
msg.FromName = "NAME"
msg.AddRecipient email
msg.Subject = topic
msg.Body = mailbody
msg.Send (Forum_info(4)) 'smtp伺服器 (在後台設定)
set msg = nothing
Set msg=nothing
if err then
SendMail=err.description
err.clear
else
SendMail="OK"
end if
end sub

試試看吧

vista大大
「最近在玩MD-Pro」…請問是幹譙用的論壇程式?!很像媽的pro...呵呵，玩笑話別在意。

報告青狼大大
這一支是我下載來的是別人正體化好的(馬英九去微軟說不要再用繁體化)!!
不過我會找一天再試試的…您真好心^^

你太客氣了喇.祇是剛好我有在玩這程式而已 :that is :

~youarebe: 青狼應該對這套論壇程式碼研究很久了吧^^