将搜索栏转移到左边的修改方法
作者:cmscn 日期:2007-05-25
①、打开index2.asp,查找
<table border=0 cellspacing=0 cellpadding=0 width="100%">
<tr valign=top>
<td align=center><%call web_search()%></td>
</tr>
</table>
替换为:
<table border=0 cellspacing=0 cellpadding=0 width="98%" bgcolor="#DDDDFF">
<tr valign=top>
<td align=center bgcolor="#FFFFFF"><img border="0" src="images/small/search.gif"></td>
</tr>
<tr valign=top>
<td align=center><%call web_search()%></td>
</tr>
</table>
②打开include/functions.asp
查找:(在底部)
sub web_search()
response.write vbcrlf&" <table border=0>" & _
vbcrlf&" <form action='search.asp' method=get onsubmit=""javascript:frm_submitonce(this);"">" & _
vbcrlf&" <tr>" & _
vbcrlf&" <td>"&img_small("search")&"</td>" & _
vbcrlf&" <td> <input type=text name=keyword value='' size=20 maxlength=20></td>" & _
vbcrlf&" <td> <select name=sea_type>" & _
vbcrlf&"<option value='forum'>论坛</option>" & _
vbcrlf&"<option value='news'>新闻</option>" & _
vbcrlf&"<option value='article'>文栏</option>" & _
vbcrlf&"<option value='down'>下载</option>" & _
vbcrlf&"<option value='paste'>图片</option>" & _
vbcrlf&"<option value='flash'>Flash</option>" & _
vbcrlf&"<option value='website'>网站</option>" & _
vbcrlf&"<option value='shop_product'>商城</option>" & _
vbcrlf&"</select></td>" & _
vbcrlf&" <td> <input type=checkbox name=celerity value='yes'></td>" & _
vbcrlf&" <td>快速搜索 </td>" & _
vbcrlf&" <td valign=top><input type=image src='images/small/web_sea.gif' border=0></td>" & _
vbcrlf&" <td> <a href='search.asp?action=help' title='多功能搜索'>搜索帮助?</a></td>" & _
vbcrlf&" </tr>" & _
vbcrlf&" </form>" & _
vbcrlf&" </table>"
替换为:
sub web_search()
response.write vbcrlf&" <table border=0>" & _
vbcrlf&" <form action='search.asp' method=get onsubmit=""javascript:frm_submitonce(this);"">" & _
vbcrlf&" <tr>" & _
vbcrlf&" <td> <input type=text name=keyword value='' size=8 maxlength=8></td>" & _
vbcrlf&" <td> <select name=sea_type>" & _
vbcrlf&"<option value='forum'>论坛</option>" & _
vbcrlf&"<option value='news'>新闻</option>" & _
vbcrlf&"<option value='article'>文栏</option>" & _
vbcrlf&"<option value='down'>下载</option>" & _
vbcrlf&"<option value='paste'>图片</option>" & _
vbcrlf&"<option value='flash'>Flash</option>" & _
vbcrlf&"<option value='website'>网站</option>" & _
vbcrlf&"<option value='shop_product'>商城</option>" & _
vbcrlf&"</select></td>" & _
vbcrlf&" <td valign=top><input type=image src='images/small/web_sea.gif' border=0></td>" & _
vbcrlf&" </tr>" & _
vbcrlf&" </form>" & _
vbcrlf&" </table>"
评论: 8 | 引用: 0 | 查看次数: 779
发表评论