<%rs.open "select top 20 * from Ad where TypeCode='2' order by AdOrder asc,id desc",conn,1,1%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr> 
	<td height="23" background="/images/index_11.gif" align="center"><img src="/images/r_3.gif"></td>
  </tr>
  <tr> 
	<td align="center">
	  <Marquee direction="up" height="95" width="150" scrollamount="1" onmouseover="this.stop()" onmouseout="this.start()"><table cellpadding=2 width="100%">
		<% while not rs.eof%><tr><td align=center>
		<%if rs("LinkUrl")&""<>"" then%><a href="<%=rs("LinkUrl")%>"<%if rs("AltText")&""<>"" then%> title="<%=rs("AltText")%>"<%end if%> target="_blank"><%end if%><%=ShowPicture(rs("PicPath")&"",150,60,"")%></a></td></tr>
		<%rs.movenext
		wend
		rs.cancel:rs.close%></table>
	  </marquee>
	</td>
  </tr>
  <tr>
	<td height="8"></td>
  </tr>
  <%rs.open "select top 20 * from Ad where TypeCode='4' order by AdOrder asc,id desc",conn,1,1%>
  <%if not rs.eof then%>
  <tr>
	<td height="18" align="center"><select class="inbox" onchange="if(this.vlaue!='')window.open(this.value)"><option value="">----  ÓÑÇéÁ´½Ó  ----</option><%while not rs.eof%><option value="<%=rs("LinkUrl")%>"><%=rs("AltText")%></option><%rs.movenext:wend%></td>
  </tr>
  <%end if
  rs.cancel:rs.close%>
  <tr>
	<td height="5"></td>
  </tr>
</table>