default.asp

物流管理系统,可以用于中小企业,建立自己的内部物流管理.

Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1 
%> 
<%do while not rs.eof%>
<tr>
<TD height=18 vAlign=top width="94%" style="line-height: 150%">·<span style=\&quot;font-size:9pt;line-height: 15pt\"><a href="javascript:view1('shownews.asp?newsid=<%=rs("newsid")%>')"><% if len(rs("title"))>16 then%><%=left(rs("title"),15)%>..<% else%><%=rs("title")%><%end if%></a></span>&nbsp; </TD>
<TD height=18 width="6%" style="line-height: 150%"><FONT color=#999999>
<DIV align=right>(</FONT><FONT color=#808080><%=month(rs("dateandtime"))%>/<%=day(rs("dateandtime"))%></FONT><FONT color=#999999>)</DIV></FONT></TD>
<% b=b+1 
if b>=Max then exit do 
rs.movenext 
loop 
rs.close 
set rs=nothing 
%>
</tr>
</table>
</TD>
</tr>
</table>
</TD>
</TR>
</TBODY></TABLE></DIV></TD></TR>
<TR>
<TD bgColor=#cccccc height=1></TD>
<TD></TD>
<TD bgColor=#cccccc></TD></TR>
<tr>
<TD>&nbsp; </TD>
<TD>　</TD>
<TD>　</TD>
</tr>
<tr>
<TD background=images/TradeAid_index_bg01.gif 
height=22>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=250>
<TBODY>
<TR>
<TD width=25>　</TD>
<TD class=M><font color="#226666">企业管理</font></TD>
<TD width=80>
<DIV align=right><B><a href="more.asp?typeid=3&newstype=企业管理"><FONT 
color=#cc9900>&gt;&gt;更多</FONT></a></B></DIV></TD></TR></TBODY></TABLE></TD>
<TD>　</TD>
<TD background=images/TradeAid_index_bg01.gif>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=250>
<TBODY>
<TR>
<TD width=25>　</TD>
<TD class=M><font color="#226666">法律咨询</font></TD>
<TD width=80>
<DIV align=right><B><a href="more.asp?typeid=4&newstype=法律咨询"><FONT 
color=#cc9900>&gt;&gt;更多</FONT></a></B></DIV></TD></TR></TBODY></TABLE></TD>
</tr>
<tr>
<TD>
<DIV align=center>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD height=7></TD></TR>
<TR>
<TD align=middle width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="99%" id="AutoNumber4">
<tr>
<TD align=middle width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="99%" id="AutoNumber2">
<% 
sql="select * from Commerce where typeid=3 order by NewsID desc" 
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1 
%> 
<%do while not rs.eof%>
<tr>
<TD height=18 vAlign=top width="94%" style="line-height: 150%">·<span style=\&quot;font-size:9pt;line-height: 15pt\"><a href="javascript:view1('shownews.asp?newsid=<%=rs("newsid")%>')"><% if len(rs("title"))>16 then%><%=left(rs("title"),15)%>..<% else%><%=rs("title")%><%end if%></a></span>&nbsp; </TD>
<TD height=18 width="6%" style="line-height: 150%"><FONT color=#999999>
<DIV align=right>(</FONT><FONT color=#808080><%=month(rs("dateandtime"))%>/<%=day(rs("dateandtime"))%></FONT><FONT color=#999999>)</DIV></FONT></TD>
<% c=c+1 
if c>=Max then exit do 
rs.movenext 
loop 
rs.close 
set rs=nothing 
%>
</tr>
</table>
</TD>
</tr>
</table>
</TD>
</TR>
</TBODY></TABLE></DIV></TD>
<TD>　</TD>
<TD>
<DIV align=center>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD height=7></TD></TR>
<TR>
<TD align=middle width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="99%" id="AutoNumber7">
<tr>
<TD align=middle width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="99%" id="AutoNumber2">
<% 
sql="select * from Commerce where typeid=4 order by NewsID desc" 
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1 
%> 
<%do while not rs.eof%>
<tr>
<TD height=18 vAlign=top width="94%" style="line-height: 150%">·<span style=\&quot;font-size:9pt;line-height: 15pt\"><a href="javascript:view1('shownews.asp?newsid=<%=rs("newsid")%>')"><% if len(rs("title"))>16 then%><%=left(rs("title"),15)%>..<% else%><%=rs("title")%><%end if%></a></span>&nbsp; </TD>
<TD height=18 width="6%" style="line-height: 150%"><FONT color=#999999>
<DIV align=right>(</FONT><FONT color=#808080><%=month(rs("dateandtime"))%>/<%=day(rs("dateandtime"))%></FONT><FONT color=#999999>)</DIV></FONT></TD>
<% d=d+1 
if d>=Max then exit do 
rs.movenext 
loop 
rs.close 
set rs=nothing 
%>
</tr>
</table>
</TD>
</tr>
</table>
</TD>
</TR>
</TBODY></TABLE></DIV></TD>
</tr>
<tr>
<TD bgColor=#cccccc height=1></TD>
<TD></TD>
<TD bgColor=#cccccc></TD>
</tr>
<tr>
<TD>&nbsp; </TD>
<TD>　</TD>
<TD>&nbsp; </TD>
</tr>
<TR>
<TD background=images/TradeAid_index_bg01.gif 
height=22>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=250>
<TBODY>
<TR>
<TD width=25>　</TD>
<TD class=M><font color="#226666">合同样本</font></TD>
<TD width=80>
<DIV align=right><B><a href="more.asp?typeid=5&newstype=合同样本"><FONT 
color=#cc9900>&gt;&gt;更多</FONT></a></B></DIV></TD></TR></TBODY></TABLE></TD>
<TD>　</TD>
<TD background=images/TradeAid_index_bg01.gif>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=250>
<TBODY>
<TR>
<TD width=25>　</TD>
<TD class=M><font color="#226666">规章制度</font></TD>
<TD width=80>
<DIV align=right><B><a href="more.asp?typeid=6&newstype=规章制度"><FONT 
color=#cc9900>&gt;&gt;更多</FONT></a></B></DIV></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD>
<DIV align=center>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD height=7></TD></TR>
<TR>
<TD align=middle width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="99%" id="AutoNumber5">
<tr>
<TD align=middle width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="99%" id="AutoNumber2">
<% 
sql="select * from Commerce where typeid=5 order by NewsID desc" 
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1 
%> 
<%do while not rs.eof%>
<tr>
<TD height=18 vAlign=top width="94%" style="line-height: 150%">·<span style=\&quot;font-size:9pt;line-height: 15pt\"><a href="javascript:view1('shownews.asp?newsid=<%=rs("newsid")%>')"><% if len(rs("title"))>16 then%><%=left(rs("title"),15)%>..<% else%><%=rs("title")%><%end if%></a></span>&nbsp; </TD>
<TD height=18 width="6%" style="line-height: 150%"><FONT color=#999999>
<DIV align=right>(</FONT><FONT color=#808080><%=month(rs("dateandtime"))%>/<%=day(rs("dateandtime"))%></FONT><FONT color=#999999>)</DIV></FONT></TD>
<% e=e+1 
if e>=Max then exit do 
rs.movenext 
loop 
rs.close 
set rs=nothing 
%>
</tr>
</table>
</TD>
</tr>
</table>
</TD>
</TR>
</TBODY></TABLE></DIV></TD>
<TD>　</TD>
<TD>
<DIV align=center>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD height=7></TD></TR>
<TR>
<TD align=middle width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="99%" id="AutoNumber6">
<tr>
<TD align=middle width="100%">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="99%" id="AutoNumber2">
<% 
sql="select * from Commerce where typeid=6 order by NewsID desc" 
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1 
%> 
<%do while not rs.eof%>
<tr>
<TD height=18 vAlign=top width="94%" style="line-height: 150%">·<span style=\&quot;font-size:9pt;line-height: 15pt\"><a href="javascript:view1('shownews.asp?newsid=<%=rs("newsid")%>')"><% if len(rs("title"))>16 then%><%=left(rs("title"),15)%>..<% else%><%=rs("title")%><%end if%></a></span>&nbsp; </TD>
<TD height=18 width="6%" style="line-height: 150%"><FONT color=#999999>
<DIV align=right>(</FONT><FONT color=#808080><%=month(rs("dateandtime"))%>/<%=day(rs("dateandtime"))%></FONT><FONT color=#999999>)</DIV></FONT></TD>
<% f=f+1 
if f>=Max then exit do 
rs.movenext 
loop 
rs.close 
set rs=nothing 
%>
</tr>
</table>
</TD>
</tr>
</table>
</TD>
</TR>
</TBODY></TABLE></DIV></TD></TR>
<TR>
<TD bgColor=#cccccc height=1></TD>
<TD></TD>
<TD bgColor=#cccccc></TD></TR>
<TR>
<TD>&nbsp; </TD>
<TD>　</TD>
<TD>&nbsp; </TD></TR></TBODY></TABLE>
</TD></TR></TBODY></TABLE>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="760" id="AutoNumber1">
<tr>
<td width="100%" background="images/bt2.gif">　</td>
<!--#include file="../inc/end.asp"-->
</tr>
</table>
</CENTER></BODY></HTML>