[收藏本方案]

Active Server Page (ASP) 常見問題[15]

[入库：2005年8月18日] [更新：2007年3月24日]

本文简介：选择自 aloxy 的 blog
首页 上页 下页 尾页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [11] [12] [13] [14] [15] [16] [17] [18] [19] [20] [21] [22] [23] [24] [25] [26]

<head><title>mainfrm</title></head>
<body>
<frameset rows="400,*">
<frame scrolling="no" noresize src="frame1.asp">
<frame scrolling="no" noresize src="frame2.asp">
</frameset>
</body>
</html>

file: frame1.asp
----------------

<%
if (request.servervariables("http_referer") = "") or
(left(request.servervariables("http_referer"),42) <>
"http://www.myserver.com/appdir/mainfrm.htm") then
response.redirect "http://www.myserver.com/appdir/mainfrm.htm"
end if
%>

<html>
<head><title>frame1</title></head>
<body>
in frame 1.
</body>
</html>

file: frame2.asp
----------------

<html>
<head><title>frame2</title></head>
<body>
in frame 2.
</body>
</html>

問： 如何使用asp 製作模攎動慴生閘的表單(form) ? 答： file: dynaform.asp
<%@ language = vbscript%>
<% response.expires = 0 %>
<html>
<head>
<title>dynamically growing form</title>
</head>
<body>
<%
if request("action") = "submit the list" then

' show what was entered.
response.write "<b>here are the items submitted:</b><br>"
nitems = request.form("items").count
for i = 1 to nitems
' show submitted items
response.write request.form("items")(i) & "<br>"
next
response.write request("item") & "<br>"

else

' create the form from all items. %>
<form action=dynaform.asp method=post>
<b>items:</b><br>
<%
nitems = request.form("items").count
for i = 1 to nitems
' show previously submitted items
response.write "<input type=text name=items value=""" & _
trim(request.form("items")(i)) & """><br>"
next

if request.form("item") <> "" then
' paint a new input box, and store the old item in items collection
response.write "<input type=text name=items value=""" & _
trim(request.form("item")) & """><br>"

response.write "<p>please enter an item,<br>"
response.write "and submit them one at a time<br>"
response.write "by pressing the add item button.<br>"
response.write "<input type=text size=50 name=item value="""""">"
else
' no item was submitted, don't show an error
response.write "<p>please enter an item,<br>"
response.write "and submit them one at a time<br>"
response.write "by pressing the add item button.<br>"
response.write "<input type=text size=40 name=item value="""""">
<br>"
end if

%>

<p>
<input type="submit" name="action" value="add item to list">
<input type="submit" name="action" value="submit the list">
<br>

<% end if %>

</form>
</body>

首页 上页 下页 尾页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] [11] [12] [13] [14] [15] [16] [17] [18] [19] [20] [21] [22] [23] [24] [25] [26]
本文关键：Active Server Page (ASP) 常見問題
　　相关方案
Google
 

本站最佳浏览方式为 分辨率 1024x768 IE 6.0（或更高版本的 IE浏览器）

go top