|
导读让你的ASP控制Frame我以前说过使用response.redirect是不能够跳到另外一个Frame的把,呵呵,那么我们怎么来使用ASP来控制frame呢?下面将提供一个方法来解决这个问题。事实... 让你的ASP控制Frame我以前说过使用response.redirect是不能够跳到另外一个Frame的把,呵呵,那么我们怎么来使用ASP来控制frame呢? 下面将提供一个方法来解决这个问题。 事实上,一共有两种方法控制ASP生成的HTML显示在哪一个Frame中。 简单的是设置HTML的Form元素的基本标志即可。这个方法可以解决大多数简单情况下的页面定位问题。 这个方法大家应该都见过,我就不详细说明了。 但是问题是当出现一些复杂的情况时,我们怎么来控制redirect的跳转呢? 下面将给出一个例子程序(其实是个很有用的例子程序) 它将动态生成Frame并且可以在你的网站上增加4个搜索引擎(如果你确实 想把这段代码加入到你的网站上的话,呵呵) 用FP随便写一个HTML页面,文件名为frsearch.htm分为两个Frame 左边的Frame里面有一个用来输入查询条件的文本框(name为searchTopic), 再外加4个checkbox(表示4个查询站点 内容分别是:这四个单选框的name分别为AltaVista,mskb, news, AVDF,4个的value都为ON) , 其中还专门给mskb(MS Knowledge Base)做一个下拉框,用来选择topic用的, name是SearchArea),还有两个单选框,name都是viewtype,最后是一个提交按钮。 然后在你的页面中加入下面两句话。 <base target="_top"> <form action="doSearch.asp"> 文件名为doSearch.asp <% searchTopic = request.form ("SearchTopic") searchTopic = server.urlencode(searchTopic) '只给微软的KB用的 searchArea = request.form ("SearchArea") 'frame的显示形式 viewtype = request.form("viewtype") '你要显示的frame数目 frcount = 0 if request.form("AltaVista") = "ON" then AVurl = "http://www.altavista.yellowpages.com.au/cgi-bin/telstra?pg=q&what=web&fmt=.&q=" & SearchTopic frcount = 1 end if if request.form("mskb") = "ON" then MSurl = "http://search.microsoft.com/searchbin/kb/mts_search.idq?Hdr=@KBArea&Scope=/kb/articles/&Tmplt=mts_search&SWR=F&Sort=rank[d]&Purl=/kb&Pfx=kb&Base=kb&sl=NULL&KBD=" & SearchArea & "&maxp=25&maxr=100&Sz=" & SearchTopic frcount = frcount + 1 end if if request.form("AVDF") = "ON" then AVDFurl = "http://www.gui.com.au/gcgi/glance?tp=search.gl&query=" & SearchTopic & "&case=on&whole=on&area=All+Issues&errors=0+%28Exact+match%29&maxfiles=10&maxlines=10" frcount = frcount + 1 end if if request.form("news") = "ON" then NEWSurl = "http://www.gui.com.au/gcgi/news_search?query=" & SearchTopic &"&maxresults=50&rtype=1" frcount = frcount + 1 end if if viewtype = "frame" then '动态生成frame splitpct = fix(100/frcount) pcts = Cstr(splitpct) if frcount = 1 then pctstr = pcts & "%" end if if frcount > 1 then pctstr = pctstr & "," & pcts & "%" end if if frcount > 2 then pctstr = pctstr & "," & pcts & "%" end if if frcount = 4 then pctstr = pctstr & "," & pcts & "%" end if end if %> <Script language="JavaScript" for="window" event="onLoad()"> <!-- <%if AVurl <> "" then %> window.open ("<%=AVurl %>") <% end if %> <%if AVDFurl <> "" then %> window.open ("<%=AVDFurl %>") <% end if %> <%if NEWSurl <> "" then %> window.open ("<%=NEWSurl %>") <% end if %> <%if MSurl <> "" then %> window.open ("<%=MSurl%>") <% end if %> Window.location.href = "frsearch.htm" --> </Script> <html> <head> <title>4个搜索引擎</title> </head> <%if viewtype = "frame" then %> <frameset cols="20%,80%"> <frame src="searchside.htm"> <frameset rows="<%=pctstr%>"> <%if AVurl <> "" then %> <frame src="<%=AVurl%>" name="AltaVista"> <% end if %> <%if AVDFurl <> "" then %> <frame src="<%=AVDFurl%>" name="AVDF"> <% end if %> <%if NEWSurl <> "" then %> <frame src="<%=NEWSurl%>" name ="news"> <% end if %> <%if MSurl <> "" then %> <frame src="<%=MSurl%>" name = "mskb"> <% end if %> </frameset> <noframes> <body> <p>This web page uses frames, but your browser doesn't support them.</p> </body> </noframes> </frameset> |
温馨提示:喜欢本站的话,请收藏一下本站!