六月婷婷综合激情-六月婷婷综合-六月婷婷在线观看-六月婷婷在线-亚洲黄色在线网站-亚洲黄色在线观看网站

明輝手游網中心:是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺!

ASP實用大全-ASP服務器組件(7)

[摘要]ASP服務器組件編程心得  使用ASP編程的一大優點是可以使用眾多的服務器組件(ActiveX Server Components)。這些組件提供諸如廣告輪顯(Ad Rotator)、瀏覽器兼容(Browser Capabilities)、數據庫存�。―atabase Access)、文件超...

ASP服務器組件編程心得

     使用ASP編程的一大優點是可以使用眾多的服務器組件(ActiveX Server Components)。這些組件提供諸如廣告輪顯(Ad Rotator)、瀏覽器兼容(Browser Capabilities)、數據庫存取(Database Access)、文件超鏈接(Content Linking)、文件存�。‵ile Access)等等功能。使用服務器組件,可以通過非常簡單的方式高效率地完成各種復雜的工作。
 一般,ASP的各個組件通常使用 Server.CreateObject 方法來創建。例如,創建一個AD Rotator 組件可用:

<%

set ad = Server.CreateObjet (“MSWC.AdRotator”)

%>

 在ASP的各個組件中,ActiveX Data Object(ADO)組件有著極為重要的作用。它是一種可以提供Web頁面設計開發人員快速存取Internet的數據庫,并在用戶端實現網上實時更新顯示的Web數據庫技術;ADO幾乎兼容于各種數據庫系統,而且跨越多種不同的程序語言開發環境。

 例如,我們在網上向本公司的客戶群提供各種硬件的升級程序,與此同時,我們希望能夠記錄下客戶的相關資料。在以前,這種Web上的交互操作一般采用CGI來完成,不僅難以書寫和維護,而且對處理器的消耗很大�,F在,我們使用ASP的ADO組件,就可以在短短的兩個小時輕輕松松的完成以前需要三天才能完成的開發工作,而且還不必花費太多的時間和精力放在維護上。

 首先,我們需要寫一個供用戶填寫資料的表格頁面,或者我們還可以將這個頁面與后面的ASP處理程序放在同一個文件里,只需要我們在<form>代碼中注明Action的對象是本程序(要么就什么都不寫)。

 假定我們的程序名是download.html,下面是原代碼:

<html>

<body>

`聲明提交方法及傳遞信息的方式

<form METHOD="POST" ACTION="download.asp">

<font face=arial>

<table border="0" align=center>

<tr>

<td><font color="black" size="2"><b>Name:</b></font></td>

<td><input TYPE="text" SIZE="30" NAME="name"></td>

</tr>

<tr>

<td><font color="black" size="2"><b>Telephone:</b></font></ #@62;

<td><input TYPE="text" SIZE="30" NAME="telephone"></td>

</tr>

<td><font color="black" size="2"><b>E-mail:</b></font></td>

<td><input TYPE="text" SIZE="30" NAME="email"></td>

</tr>

<tr>

<td><font color="black" size="2"><b>Address:</b></font></td>

<td><input TYPE="text" SIZE="30" NAME="address"></td>

</tr>

<tr>

</table>

<hr>

<table align=center><tr>

<td><input TYPE="Submit" VALUE="Submit"></td>

<td width=30></td>

<td><input TYPE="Reset" VALUE="Reset"></td>

</tr></table>

</font>

</form>

</body>

</html>

 然后,我們開始編寫數據處理程序download.asp。

<script language=vbscript runat=server>

`設置緩沖區屬性

response.buffer=true

Dim name

 判斷有關字段是否為空

if Len(request.form("name"))=0 then

name="Not Entered"

else

 不為空時,利用Response對象讓Server獲取表格中“name”字段內容

name=request.form("name")

end if

Dim telephone

if Len(request.form("telephone"))=0 then

telephone="Not Entered"

else

telephone=request.form("telephone")

end if

Dim address

if Len(request.form("address"))=0 then

address="Not Entered"

else

address=request.form("address")

end if

  由于我們將采取Email發送的方式將該下載軟件提供給用戶,所以我們必須要求客戶提供有效的Email地址。

Dim email

email=request.form("email")

 `判定客戶填寫的“Email”資料中是否含有特別字符“@”

if instr(email,"@")=0 then

`若為否,引導客戶至“back.htm”的提示頁面。

response.redirect("back.htm")

else

 建立數據庫連接通道

Set objConn = Server.CreateObject("ADODB.Connection")

 打開需要的數據庫

objConn.Open("download")

 創建對象接口

set objRst = Server.CreateObject("ADODB.Recordset")

set objRst.ActiveConnection = objConn

 設定對數據庫更新數據時的鎖定機制為:數據在更新時并未鎖定其他用戶的動作。

objRst.LockType = 3

 數據庫源

objRst.Source = "client"

 控制數據更新后過濾下載的數據類型

objRst.CursorType = adOpenKeyset

 將從表格內獲取的資料傳送到web服務器上的數據庫

objRst.Open

objRst.AddNew

objRst("company") = company

objRst("name") = name

objRst("telephone") = telephone

objRst("fax") = fax

objRst("email") = email

objRst("address") = address

objRst.Update

objRst.close

 關閉連接

objConn.close


  下面是利用IIS4.0附帶的Email組件CDONTS發送郵件

Dim objMail

 建立一個Email組件

set objMail=Server.CreateObject("CDONTS.NewMail")

 郵件發送者的Email地址

objMail.From="[email protected]"

 郵件接收者的Email地址

objMail.To=email

 郵件的標題

objMail.Subject="Thank you!"

 郵件的正文

objMail.Body="This is the software of Virtual Drive 2000 Network."

 在郵件里附加文件,“絕對路徑”,“文件名”。若為URL地址,則改為ObjMail.AttachUrl

objMail.AttachFile "d:/power/download/vdn2kdm.exe", "vdn2kdm.exe"

 發送郵件

objMail.Send

 將Email對象從內存中清除

Set objMail=nothing

response.write "<p><font face=arial size=3 color=blue><b>Thank you!<br>We have sent the file pass your Email, please wait...</b></font></p>"

end if

</script>

  到這里,一個很不錯的web數據庫交互操作程序就大功告成,而且,它還帶有向客戶發送Email的功能,方便客戶利用Email下載較大的文件。





主站蜘蛛池模板: 天天干天天拍天天射 | 手机福利视频 | 日本大蕉香蕉大视频在线观看 | 色婷婷一区二区三区四区成人 | 亚洲永久网站 | 五月丁婷| 四虎精品成人a在线观看 | 影音先锋亚洲资源 | 青青草原国产在线观看 | 在线天堂中文新版www | 日韩高清在线不卡 | 亚洲人成网站999久久久综合 | 色播五月婷婷 | 中国日韩欧美中文日韩欧美色 | 亚洲欧美日本综合 | 五月天伊人网 | 亚洲白嫩在线观看 | 日本www在线观看 | 在线视频中文字幕 | 中文字幕在线看视频一区二区三区 | 日韩 欧美 国产 亚洲 制服 | 日本不卡一区二区三区视频 | 日韩一级视频免费观看 | 一二三四手机在线观看视频播放 | 伊人影院久久 | 日本视频黄 | 又粗又硬又爽的三级视频在线观看 | 四虎剧院| 色站综合| 日日狠狠 | 在线观看91精品国产剧情免费 | 日本片免费观看一区二区 | 欧美综合在线播放 | 亚洲欧美日本在线 | 婷婷春色| 天天射天天干天天色 | 午夜国产精品免费观看 | 天堂在线影院 | 天天操天天插天天射 | 日本v在线观看 | 天堂 在线最新版在线 |