WebMail是指在網(wǎng)頁中實現(xiàn)郵件的發(fā)送。使用Delphi開發(fā)Web Server程序是非常簡單的,Delphi中提供了大量的元件和對象。下面通過一個例子來介紹如何利用Delphi開發(fā)一個響應(yīng)用戶輸入的ISAPI的WebMail程序。為了簡單,程序沒有對傳送的數(shù)據(jù)提供保密。
首先,在Web服務(wù)器端安裝數(shù)據(jù)庫引擎dbe,并設(shè)置好數(shù)據(jù)庫別名:yh,指向一個包含用戶名和用戶密碼的數(shù)據(jù)庫文件user.db。接著建立兩個HTML文件,名字分別為:dl.html,qd.html,放在Web服務(wù)器的缺省目錄下(如:c:\inetpub\wwwroot)。
dl.html的內(nèi)容如下:
發(fā)送郵件系統(tǒng)
發(fā)送郵件系統(tǒng)
請輸入您的用戶名及密碼
qd.html文件內(nèi)容如下:
填表
在Delphi中新建一個基于ISAPI的Web Server Application,手動增加nmsmtp1,query1,pageproducer1。其中:pageproducer1的htmlfile屬性為c:\inetpub\www.root\qd.html。nmsmtp1的host(發(fā)送郵件服務(wù)器的地址)在這里為smtp.netease.com.,port:25。全局變量為:sername:string;flag:boolean。
首先,在Web服務(wù)器端安裝數(shù)據(jù)庫引擎dbe,并設(shè)置好數(shù)據(jù)庫別名:yh,指向一個包含用戶名和用戶密碼的數(shù)據(jù)庫文件user.db。接著建立兩個HTML文件,名字分別為:dl.html,qd.html,放在Web服務(wù)器的缺省目錄下(如:c:\inetpub\wwwroot)。
dl.html的內(nèi)容如下:
發(fā)送郵件系統(tǒng)
請輸入您的用戶名及密碼
qd.html文件內(nèi)容如下:
在Delphi中新建一個基于ISAPI的Web Server Application,手動增加nmsmtp1,query1,pageproducer1。其中:pageproducer1的htmlfile屬性為c:\inetpub\www.root\qd.html。nmsmtp1的host(發(fā)送郵件服務(wù)器的地址)在這里為smtp.netease.com.,port:25。全局變量為:sername:string;flag:boolean。