如何修改被表單引用的ASP頁(yè)面?
formhandler.asp
<html>
<body>
<%
Dim RequestMethod
RequestMethod = Request.ServerVariables("REQUEST_ METHOD")
' 獲取REQUEST_METHOD的數(shù)值,并把它存入本地的變量中.當(dāng)Web頁(yè)面被表單標(biāo)記的Action參數(shù)調(diào)用時(shí),REQUESTMETHOD的數(shù)值為Post.其他時(shí)候, 用戶直接向?yàn)g覽器中鍵入地址,刷新頁(yè)面,或單擊頁(yè)面的一個(gè)鏈接而調(diào)用頁(yè)面,REQUEST_METHOD的數(shù)值是Get.
If RequestMethod = "GET" Then
' 檢查REQUEST-METHOD的數(shù)值.If結(jié)構(gòu)含有一個(gè)塊代碼,當(dāng)條件為真時(shí)被執(zhí)行,含有一個(gè)Else塊,條件為假時(shí)被執(zhí).刷新頁(yè)面.
%>
噢,您現(xiàn)在不能刷新并瀏覽屏幕當(dāng)前內(nèi)容!如果想更改表單數(shù)據(jù),請(qǐng)用后退鍵回到表單,或按提交返回.
<%Else
%>歡迎光臨隨風(fēng)起舞!
' 按下表單提交按鈕顯示.
<%
= Request.Form("Name")
%>.
<P>您最喜歡的國(guó)產(chǎn)汽車:
<%DIM favCaramre
favCaramre = Request.Form("Caramre")
If favCaramre = "OLYMPUS " Then
Response.Write("噢,請(qǐng)稍候!")
Response.Write("<P>A <B>OLYMPUS </B>?")
Else
Response.Write(favCaramre & ".<P>棒極了!")
End If
%>
<%End If%>
</body></html>
相關(guān)文章
如何用下拉列表顯示數(shù)據(jù)庫(kù)里的內(nèi)容?
如何用下拉列表顯示數(shù)據(jù)庫(kù)里的內(nèi)容?...2006-11-11如何編寫一個(gè)小數(shù)轉(zhuǎn)換分?jǐn)?shù)的函數(shù)?
如何編寫一個(gè)小數(shù)轉(zhuǎn)換分?jǐn)?shù)的函數(shù)?...2006-11-11如何把URL和郵件地址轉(zhuǎn)換為超級(jí)鏈接?
如何把URL和郵件地址轉(zhuǎn)換為超級(jí)鏈接?...2006-11-11如何動(dòng)態(tài)添加Form項(xiàng)?
如何動(dòng)態(tài)添加Form項(xiàng)?...2006-11-11如何正確顯示數(shù)據(jù)庫(kù)里同時(shí)存在的GB碼和BIG5碼?
如何正確顯示數(shù)據(jù)庫(kù)里同時(shí)存在的GB碼和BIG5碼?...2006-11-11