<!--#include file="conn.asp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>百润医药</title>
<style type="text/css">
<!--
@import url("images/br.css");
-->
</style>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" onLoad="MM_preloadImages('images/dh010.gif','images/dh020.gif','images/dh030.gif','images/dh050.gif')">
<!--#include file="top.asp"-->
<%
Dim Title,Path,Sql,Sql2,Pages,n_tid,n_tsid
Pages=Trim(Request.QueryString("pages"))
Select Case Pages
Case "xw"
	img="images/news2.jpg"
	title="公司新闻"
	Path="/1/1/"
	n_tid=59
	n_tsid=26
Case "dt"
	img="images/hydt2.jpg"
	title="行业动态"
	Path="/1/2/"
	n_tid=59
	n_tsid=27
Case else
	n_tid=0
	n_tsid=0
End Select

Sql="Select n_fpath,n_fname,n_title,n_date,n_hit From T_news Where n_tid="&n_tid&" and n_tsid="&n_tsid
%>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td width="1" rowspan="3" background="images/line4.gif"><img src="images/line4.gif" width="1" height="70"></td>
    <td valign="top">
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#E7E7E7">
        <tr> 
          <td width="10">&nbsp;</td>
          <td width="229">您现在的位置：<a href="/index.asp">首页 </a>&gt;&gt; <%=title%></td>
          <td width="10">&nbsp;</td>
          <td width="529"><TABLE cellSpacing=0 cellPadding=1 width="100%" 
                               border=0>
              <TBODY>
                <TR> 
                  <TD> 
                    <MARQUEE 
                                onmouseover="if (document.all!=null){this.stop()}" 
                                onmouseout="if (document.all!=null){this.start()}" 
                                scrollAmount=3 scrollDelay=120 
                                width="100%">
                    <font color="#CC3300">热烈庆贺湖南百润医药有限公司网站开通</font> 
                    </MARQUEE></TD>
                </TR>
              </TBODY>
            </TABLE></td>
        </tr>
      </table>
      <table width=778 border=0 align="center" cellpadding=0 cellspacing=0 bgcolor="#FFFFFF" class=border>
        <tbody>
          <tr> 
            <td width=163 align="left" valign=top bgcolor="#F2F2F2" class=listcontent>
              <!--#include file="left.asp"-->
            </td>
            <td class=columncontent valign=top width=615><table width="100%" border="0" cellspacing="0" cellpadding="0">
                <tr> 
                  <td width="615" valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
                      <tr> 
                        <td><img src="<%=img%>" border="0"></td>
                      </tr>
                      <tr> 
                        <td height="186" valign="top"> <script type="text/javascript"><!--
google_ad_client = "pub-6414546412158283";
google_alternate_color = "ffffFF";
google_ad_width = 336;
google_ad_height = 280;
google_ad_format = "336x280_as";
google_ad_type = "text_image";
google_ad_channel ="6078331934";
//--></script>
<script type="text/javascript"
  src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script><br><TABLE width=605 border=0 cellPadding=0 cellSpacing=0 class=index_lanmu>
                            <%
dim i,page
rs.pagesize=15
sql=sql&" order by n_id desc"
rs.open Sql,conn,1,1,1
if rs.eof then
%>
                            <TR> 
                              <TD colSpan=2 height=2></TD>
                            </TR>
                            <TR> 
                              <TD width=12 height="17">　</TD>
                              <TD vAlign=middle><img height=6 src="images/dog1.jpg" 
                              width=6>[暂无新闻]</TD>
                            </TR>
                            <%
else
				page=clng(request("page"))
				if page<1 Then page=1
				if page>rs.pagecount then page=rs.pagecount
				rs.AbsolutePage=page
				for i=1 to rs.pagesize
%>
                            <TR> 
                              <TD width=12 height="24">　</TD>
                              <TD vAlign=middle 
							  <%if i mod 2 = 0 then
								  Response.write "background=""/images/new_zi_bj.jpg"""
							  else
								  Response.write "background=""/images/new_zi_bj2.jpg"""
							  End if
							  %> ><img height=6 src="images/dog1.jpg" 
                              width=6><a title="<%=replace(rs("n_title"),"""","")%>" href="<%=Path&rs("n_fpath")&"\"&rs("n_fname")%>" > 
                                <%=cutStr(rs("n_title"),24)%>[<%=formatdatetime(rs("n_date"),2)%>]</a> 
                                <%if datediff("d",rs("n_date"),date())<15 then Response.write "<img src=""/images/dog_new.gif"" border=0>"%>
                              </TD>
                            </TR>
							<%
							rs.movenext
							if rs.eof then exit for
							next
%>
                            <TR>
                              <TD height="24"></TD>
                              <TD vAlign=middle 
							  <%if i mod 2 = 0 then
								  Response.write "background=""/images/new_zi_bj.jpg"""
							  else
								  Response.write "background=""/images/new_zi_bj2.jpg"""
							  End if
							  %> >&nbsp;共 <%=rs.recordcount%> 条&nbsp;&nbsp;共 <%=rs.pagecount%> 
                                页&nbsp;&nbsp;第 <%=page%> 页　　 
                                <%
												  if page<>1 then
													  Response.write "<a href=""?pages="&pages&"&page="&page-1&""">上一页</a>"
												  else
													  response.write "上一页"
												  end if
												  response.write "&nbsp;&nbsp;&nbsp;"
												  if page<rs.pagecount then
												  		response.write "<a href=""?pages="&pages&"&page="&page+1&""">下一页</a>"
													else
														response.write "下一页"
												  end if
												  %>
                                转到 
                                <select name="select3" onChange="location='?pages=<%=pages%>&page='+this.value">
                                  <%
				  for i=1 to rs.pagecount
				  %>
                                  <option value="<%=i%>" <%if page=i then response.write "selected"%>><%=i%></option>
                                  <%
				  next
					rs.close
					conn.close
					set rs=nothing
					set conn=nothing
				  %>
                                </select>
                                页 </TD>
                            </TR>
                            <%
end if
%>
                          </TABLE></td>
                      </tr>
                    </table></td>
                  <td width="1" background="images/line4.gif"><img src="images/line4.gif" width="1" height="70"></td>
                </tr>
              </table>
              
            </td>
          </tr>
        </tbody>
      </table></td>
    <td rowspan="3" background="images/line4.gif"><img src="images/line4.gif" width="1" height="70"></td>
  </tr>
  <tr> 
    <td align="center" valign="top"><img src="images/cpzs.gif" width="774" height="36"></td>
  </tr>
  <tr>
    <td valign="top"><table width="778" border="0" align="center" cellpadding="2" cellspacing="2">
        <tr> 
          <td><marquee direction=left height=50 onmouseout=this.start() onmouseover=this.stop() scrollAmount=4 scrollDelay=60>
            <!--#include file="bot.htm"-->
            </marquee></td>
        </tr>
      </table>
</td>
  </tr>
</table>
 <!--#include file="bottom.asp"-->
<SCRIPT language=JavaScript1.1>
<!--
var whichlink=0
var whichimage=0
var pixeldelay=(ie55)? document.images.slide.filters[0].duration*1000 : 0
function slideit(){
if (!document.images) return
if (ie55) document.images.slide.filters[0].apply()
document.images.slide.src=imageholder[whichimage].src
if (ie55) document.images.slide.filters[0].play()
whichlink=whichimage
whichimage=(whichimage<slideimages.length-1)? whichimage+1 : 0
setTimeout("slideit()",slidespeed+pixeldelay)
}
slideit()

//-->
</SCRIPT>
<br>
</body>
</html>
