| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1912 人关注过本帖
标题:请问一个弹出新窗口的问题
取消只看楼主 加入收藏
藏马
Rank: 2
等 级:新手上路
威 望:3
帖 子:25
专家分:0
注 册:2004-7-16
收藏
 问题点数:0 回复次数:2 
请问一个弹出新窗口的问题
我想请问高手一个问题,下面这段代码是点击一个链接,新弹出一个窗口
<a href='javascript:;' onclick="javsscript:open_view('?c_id=<%response.write cid%>&s_id=<%response.write sid%>&action=view&id=<%response.write nid%>',1);">帮帮我吧</a>
我想让弹出的窗口没有菜单栏和工具条,请问怎么做到?谢谢!
搜索更多相关主题的帖子: 窗口 response write 出新 
2005-04-17 21:46
藏马
Rank: 2
等 级:新手上路
威 望:3
帖 子:25
专家分:0
注 册:2004-7-16
收藏
得分:0 

我改了半天也没改好,下面是我的那个文件 <% sub gallery_new(g_tit,gtype,n_num,w_num) dim rs,sql,pic_temp,pic,name,ut response.write "<table cellspacing=1 cellpadding=1 class=table0>" & _ "<tr><td class=td>&nbsp;"&img_small(sk_jt)&"&nbsp;<a href='gallery.asp?action="&gtype&"'><font class="&sk_class&">"&g_tit&"</font></a></tr>" & _ "<tr><td class=bg_1 align=center><table border=0 width='100%'><tr><td height=5></td></tr><tr align=center>" sql="select top "&n_num&" id,c_id,s_id,types,spic,pic,name,counter,power,emoney from gallery where hidden=1 and types='"&gtype&"' order by id desc" set rs=conn.execute(sql) do while not rs.eof if gtype="paste" then pic=rs("pic") else pic=rs("spic") end if name=rs("name") ut="gallery.asp?types=view&action="&gtype&"&c_id="&rs("c_id")&"&s_id="&rs("s_id")&"&id="&rs("id") pic_temp="<table border=0>" & _ "<tr><td align=center><a href='javascript:;' onclick=""javascript:open_view('"&ut&"',1);""><script language=javascript>pic_url('"&pic&"',1)</script></a></td></tr>" & _ "<tr><td align=center><a href='javascript:;' onclick=""javascript:open_view('"&ut&"',1);"" class=blue><b>"&objv7.code_html(name,1,w_num)&"</b></a></td></tr>" if gtype<>"paste" then pic_temp=pic_temp&"<tr><td align=center>"&m_unit&":<font class=red_3>"&rs("emoney")&"</font>&nbsp;&nbsp;人气:<font class=red>"&rs("counter")&"</font></td></tr>" & _ "<tr><td align=center>"&power_pic(0,rs("power"),0)&"</td></tr>" end if pic_temp=pic_temp&"</table>" response.write "<td><script language=javascript>pic_fk(1,1)</script>"&pic_temp&"<script language=javascript>pic_fk(2,1)</script></td>" rs.movenext loop rs.close:set rs=nothing response.write "</tr><tr><td height=3></td></tr></table></td></tr></table>" end sub

sub website_new(wtype,t_num,w_num,w_jt) dim rs,wtit,wname,wjt if w_jt<>"" then wjt=img_small(w_jt) sql="select top "&t_num&" id,c_id,s_id,name from website where hidden=1 " select case wtype case "hot" wtit="热门站点" sql=sql&"order by counter desc,id desc" case "top" wtit="推荐站点" sql=sql&"and isgood=1 order by id desc" case else wtit="最新站点" sql=sql&"order by id desc" end select response.write "<table cellspacing=1 cellpadding=1 class=table0>" & _ "<tr><td class=td>&nbsp;"&img_small(sk_jt)&"&nbsp;<font class="&sk_class&">"&wtit&"</font></td></tr>" & _ "<tr><td class=bg_1 align=center><table border=0 width='100%'>" set rs=conn.execute(sql) do while not rs.eof wname=rs("name") response.write "<tr><td height="&space_mod&">"&wjt&"<a href='javascript:;' onclick=""javascript:open_view('website.asp?c_id="&rs("c_id")&"&s_id="&rs("s_id")&"&action=view&id="&rs("id")&"',1);"" title='"&wname&"'>"&objv7.code_html(wname,1,w_num)&"</a></td></tr>" rs.movenext loop rs.close:set rs=nothing response.write "</table></td></tr></table>" end sub %> 请问在那里,如何设置才能是弹出的窗口没有工具栏和菜单栏,谢谢各位前辈了!

[此贴子已经被作者于2005-4-22 0:19:18编辑过]


2005-04-22 00:17
藏马
Rank: 2
等 级:新手上路
威 望:3
帖 子:25
专家分:0
注 册:2004-7-16
收藏
得分:0 
谢谢版主,你给我的代码我试了,非常的好!

2005-04-22 14:19
快速回复:请问一个弹出新窗口的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015481 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved