作者rita167 (振作)
看板Web_Design
標題請問線上填表單後自動寄信....
時間Tue Jul 4 11:08:52 2006
請問各位
有些公司網頁會有那種讓顧客填客服意見的頁面
不需要開outlook就可以填完直接傳送資料出去
我想要在我做的網站上增加一個類似的頁面
不過我自己當然是不會寫啦...^^b
我現在買的一本asp教學的書裡面有做好的範例
但是書上的例子是讓我們在本機上測試而已
請問
我要改下面程式碼的哪裡才能在我們學校的空間上執行呢?
謝謝
<%
myMailServer = "127.0.0.1"
sch = "
http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig = Server.CreateObject("CDO.Configuration")
cdoConfig.Fields.Item(sch & "sendusing") = 2
cdoConfig.Fields.Item(sch & "smtpserver") = myMailServer
cdoConfig.fields.update
Set cdoMessage = Server.CreateObject("CDO.Message")
Set cdoMessage.Configuration = cdoConfig
cdoMessage.From = request("s_name") & "<" & request("s_email") & ">"
cdoMessage.To = "
[email protected]" <---這邊我看得出來要改成我的信箱
cdoMessage.Subject = request("s_subject")
cdoMessage.HTMLBody = request("s_content")
cdoMessage.Send
Set cdoMessage = Nothing
Set cdoConfig = Nothing
%>
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 128.192.177.126
1F:推 pm2001:學校有給你執行asp的能力? 07/04 11:15
2F:推 rita167:有的 可以執行 asp vbscript 只是我不太會用 07/04 11:20
3F:→ rita167:所以不知道要改哪邊 07/04 11:21
4F:→ pcgrace:你們學校是2003server嗎??這個語法只能在2003跑哦 07/04 22:09