<!-- #include file="include/config_other.asp" -->
<!-- #include file="include/jk_ubb.asp" -->
<!-- #include file="include/config_flea.asp" -->
  <!-- #include file="include/conn.asp" -->
<%
dim hidden
sql="select * from popwin"
set rs=conn.execute(sql)
if rs.eof and rs.bof then
  rs.close:set rs=nothing:call close_conn()
  response.end
end if
hidden=rs("hidden")
if hidden=0 then
else
    response.write("<SCRIPT LANGUAGE='javascript' src='js/popwin.js'></script>")
end if
rs.close
%>
<%
dim atb:atb=" target=_blank"
dim titl1,titl0
index_url="main"
tit=format_menu(index_url)
tit_fir=""

call web_head(0,0,0,0,0)
%>
<table width="775" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td width="185" valign="top"> 
      <%call format_login()%>
      <script>
<!-- 
function crml(nid) 
{ 
try 
{ 
nid=new ActiveXObject("Agent.Control.2"); 
nid.Connected = true; 
nid.Characters.Load(""); 
return nid; 
} 
catch (err) 
{ 
return false; 
} 
} 

function chplay () 
{ 
if (ml=crml ("ml")) 
{ 
var MerlinID; 
var MerlinACS; 
Merlin = ml.Characters.Character(MerlinID); 
Merlin.MoveTo(200,120);
Merlin.Show(); 
Merlin.Play("GestureRight"); 
Merlin.Speak("欢迎光临『海岸线—经典社区』！"); 
Merlin.Play("GestureLeft");
Merlin.Speak("您的光临是对我们最大的支持！");
Merlin.MoveTo(800,120);
Merlin.Play("GestureLeft");
Merlin.Speak("希望在这里您能找到合适您的信息！");
Merlin.MoveTo(200,575);
Merlin.Play("GestureRight"); 
Merlin.Speak("本站每天总有一些好东东"); 
Merlin.Play("GestureRight");
Merlin.Speak("快快加入本站会员优惠多多"); 
Merlin.Play("GestureUp");
Merlin.Speak("加入VIP会员优惠更大");
Merlin.Play("GestureDown");
Merlin.Hide();
Merlin.MoveTo(300,300);
Merlin.Show();
Merlin.Play("Surprised"); 
Merlin.Play("GestureUp");
Merlin.Speak("忘了还有一点要提醒您！");
Merlin.Play("GestureUp");
Merlin.Speak("各分板块需注册为会员才能观看！"); 
Merlin.Play("GestureUp");
Merlin.Speak("登录后我也就随同消失了：）！"); 
Merlin.Play("GestureUp");
Merlin.Speak("祝您猴年快乐，心想事成！！！");
Merlin.Play("GestureDown");
Merlin.Play("GestureDown");
Merlin.Play("GestureDown");
Merlin.Hide(); 
} 
} 
//--> 
</script> <script> 
<!-- 
chplay() 
--> 
      </script> 
      <table width="95%" border="0" cellspacing="0" cellpadding="0" align="center">
        <tr> 
          <td> 
            <%call main_update_view()%>
          </td>
        </tr>
      </table>
      <%call main_stat("","jt1",1,1,1)%>
      <%call user_data_top("bbs_counter","jt12",1,8)%>
      <%call links_up(10,"fir",1)%>
      <%call vote_type(1,1,"","f7f7f7")%>
      <%call top_flea("price","jt0",1,7)%>
      <br>
    </td>
    <td width="8" background="IMAGES/BG3R.GIF"><img src="IMAGES/BG3R.GIF" width="8" height="1"></td>
    <td align="center" valign="top" bgcolor="#FFFFFF" width="583"> 
      <table width="100%" border="0" cellspacing="0" cellpadding="0" align="right">
        <tr> 
          <td align="center" valign="top"> 
            <table border=0 width='98%' cellspacing=0 cellpadding=0 align=center>
              <tr align=center valign=top> 
                <td> 
                  <%call web_search(1)%>
                </td>
              </tr>
            </table>
            <table border=0 width='98%' cellspacing=0 cellpadding=0 align=center>
              <tr align=center valign=top> 
                <td> 
                  <%call news_fpic("",8,"jt0",7,21,1,1)%>
                </td>
              </tr>
            </table>
            <table border=0 width='98%' cellspacing=0 cellpadding=0 align=center>
              <tr align=center valign=top> 
                <td> 
                  <%call video_new_hot_pic("","","",4,9,120,100)%>
                </td>
              </tr>
            </table>
            <table border=0 width='98%' cellspacing=0 cellpadding=0 align=center>
              <tr align=center valign=top> 
                <td width='49%'> 
                  <%call main_down("jt0","","","","new",7,0,21,1,1)%>
                </td>
                <td width='2%'></td>
                <td width='49%'> 
                  <%call main_article("jt0",2,"",7,17,1,1)%>
                </td>
              </tr>
            </table>
            <table border=0 width='98%' cellspacing=0 cellpadding=0 align=center>
              <tr align=center valign=top> 
                <td> 
                  <%call main_gallery_pic("","","paste",8,13,110,80,4)%>
                </td>
              </tr>
            </table>
            <table border=0 width='98%' cellspacing=0 cellpadding=0 align=center>
              <tr align=center valign=top> 
                <td width='49%'> 
                  <%call main_news("jt0",49,"",7,17,1,1)%>
                </td>
                <td width='2%'></td>
                <td width='49%'> 
                  <%call main_news("jt0",50,"",7,17,1,1)%>
                </td>
              </tr>
            </table>
            <table border=0 width='98%' cellspacing=0 cellpadding=0 align=center>
              <tr align=center valign=top> 
                <td width='49%'> 
                  <%call main_flash_picv("","","flash",2,13,115,88)%>
                </td>
                <td width='2%'></td>
                <td width='49%'> 
                  <%call main_forum("jt0",8,17,1,1)%>
                </td>
              </tr>
            </table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<%
response.write ukong
'---------------------------------center end-------------------------------
call web_end(0)
sub links_left()
  tit=vbcrlf&"<table border=0 width='100%' cellpadding=0 cellspacing=0>" & _
      vbcrlf&"<tr><td align=center height=50><a href='" & web_var(web_config,2) & "' target=_blank><img border=0 src='images/logo.gif' width=88 heigh=31 alt='" & web_var(web_config,1) & "'></a></td></tr>" & _
      vbcrlf&"<tr><td align=center valign=top><textarea name=flink_main rows=5 cols=21  onfocus=this.select() onmouseover=this.focus()><a href='" & web_var(web_config,2) & "' target=_blank><img border=0 src='" & web_var(web_config,2) & "images/logo.gif' width=88 heigh=31 alt='" & web_var(web_config,1) & "'></a></textarea></td></tr>" & _
      vbcrlf&"</table>"
  call left_type(tit,"links",1)
end sub
%>
