search.asp

来自「一个诚信信息港门户网 功能: 系统设置 企业会员 个人」· ASP 代码 · 共 38 行

<%'search.asp?search=形式
'1为横 2为竖
search=int(request.querystring("search"))

search1="<table width=""100%"" border=0 cellspacing=0 cellpadding=0 align=center>"&_
"<form name=form1 method=post action="&application("cityurl")&"search_redirect.asp target=_blank>"&_
"<tr><td>"&_
"<input type=text name=word size=19 class=input2> "&_
"<select name=key>"&_
"<option value=yp>企业</option>"&_
"<option value=sca selected>商机</option>"&_
"<option value=cp>产品</option>"&_
"<option value=ypdt>信息</option>"&_
"<option value=zh>展会</option>"&_
"</select> "&_
"<input type=submit name=Submit2 value="" 开 搜 "" class=""input1"">"&_
"</td></tr>"&_
"</form>"&_
"</table>"

search2="<table width=""100%"" border=0 cellspacing=0 cellpadding=0 align=center>"&_
"<form name=form1 method=post action="&application("cityurl")&"search_redirect.asp target=_blank>"&_
"<tr><td align=center height=30>"&_
"<input type=text name=word size=19 class=input2></td></tr>"&_
"<tr><td align=center height=30><select name=key>"&_
"<option value=yp>企业</option>"&_
"<option value=sca selected>商机</option>"&_
"<option value=cp>产品</option>"&_
"<option value=ypdt>信息</option>"&_
"<option value=zh>展会</option>"&_
"</select> "&_
"<input type=submit name=Submit2 value="" 开 搜 "" class=""input1"">"&_
"</td></tr>"&_
"</form>"&_
"</table>"
if search=1 then search=search1 else search=search2
%>
document.write('<%=search%>')