<!--#include file="conn.asp"-->
<!--#include file="admin/inc/getkind.asp"-->
<!--#include file="admin/inc/common.asp"-->
<%
Dim ID
ID = Request.QueryString("ID")
IF ID = "" Then ID = 0
If Not IsNumeric(ID) Then ID = 0
ID = Int(ID)
SQL = "SELECT * FROM [Product] WHERE ID = " & ID
Set RS = Server.CreateObject("ADODB.Recordset")
RS.Open SQL,Connstr,1,1
IF RS.EOF Then
Response.Write "该产品信息不存在!"
Response.End
End If
%>
<HTML><HEAD><TITLE>山东E星科技有限公司-www.exkj.com</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META http-equiv=imagetoolbar content=no><LINK href="images/style.css"
rel=stylesheet>
<STYLE type=text/css>
.style1 {
FONT-SIZE: 10pt; FONT-FAMILY: "宋体"
}
P.MsoNormal {
TEXT-JUSTIFY: inter-ideograph; FONT-SIZE: 10.5pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: "Times New Roman"; TEXT-ALIGN: justify; mso-style-parent: ""
}
.STYLE2 {color: #FFFFFF}
.style111 {font-size: 12px;
line-height: 20px;
}
.style7 {font-size: 12px;
line-height: 20px;
}
.style8 {font-size: 14px}
</STYLE>
<META content="MSHTML 6.00.2900.2523" name=GENERATOR>
<script type="text/JavaScript">
<!--
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function MM_showHideLayers() { //v6.0
var i,p,v,obj,args=MM_showHideLayers.arguments;
for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
obj.visibility=v; }
}
//-->
</script>
</HEAD>
<BODY onLoad="MM_preloadImages('menu/ggszxon.jpg')">
<SCRIPT language=JavaScript>
function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</SCRIPT>
<TABLE height="100%" cellSpacing=0 cellPadding=0 width="760">
<TBODY>
<TR>
<TD vAlign=top align=middle>
<TABLE cellSpacing=0 cellPadding=0 width=850
background=images/contents_bg.gif>
<TBODY>
<TR>
<TD vAlign=top background=images/company_img.jpg colSpan=2
height=199>
<TABLE cellSpacing=0 cellPadding=0>
<TBODY>
<TR vAlign=top>
<TD width=685><IMG height=45 src="images/a.gif" width=150
border=0></TD>
<TD><IMG height=35 src="images/a.gif" width=51
border=0><IMG height=35 src="images/a.gif" width=52
border=0><IMG height=35 src="images/a.gif" width=62
border=0></TD></TR></TBODY></TABLE>
<TABLE id=table31 height=152 cellSpacing=0 cellPadding=0
width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=top align=left>
<TABLE id=table32 cellSpacing=0 cellPadding=0 width="100%"
border=0>
<TBODY>
<TR>
<TD width=450>
<TABLE id=table33 height=152 cellSpacing=0 cellPadding=0
width="101%" border=0>
<TBODY>
<TR>
<TD height=49> </TD></TR>
<TR>
<TD height=50>
<OBJECT id=obj3
codeBase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,40,0
height=60 width=450 border=0
classid=clsid:D27CDB6E-AE6D-11CF-96B8-444553540000><PARAM NAME="movie" VALUE="images/03.swf"><PARAM NAME="quality" VALUE="High"><PARAM NAME="wmode" VALUE="transparent">
<embed
src="images/03.swf"
pluginspage="http://www.macromedia.com/go/getflashplayer"
type="application/x-shockwave-flash" name="obj3"
width="450" height="60" quality="High"
wmode="transparent"></OBJECT></TD></TR>
<TR>
<TD> </TD></TR></TBODY></TABLE></TD>
<TD vAlign=top align=left>
<OBJECT id=obj2
codeBase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,40,0
height=151 width=305 border=0
classid=clsid:D27CDB6E-AE6D-11CF-96B8-444553540000><PARAM NAME="movie" VALUE="images/yg.swf"><PARAM NAME="quality" VALUE="High"><PARAM NAME="wmode" VALUE="transparent">
<embed
src="images/yg.swf"
pluginspage="http://www.macromedia.com/go/getflashplayer"
type="application/x-shockwave-flash" name="obj2"
width="305" height="151" quality="High"
wmode="transparent"></OBJECT></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD vAlign=top align=middle width=200 height=759>
<TABLE cellSpacing=0 cellPadding=0>
<TBODY>
<TR>
<TD><IMG
src="images/company_title.jpg"></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width=155>
<TBODY>
<TR>
<TD><a href="jj.asp"><IMG height=30 src="images/company_menu01a.gif"
width=187 border=0></a></TD>
</TR>
<TR>
<TD vAlign=top align=middle>
<P align=center><A href="index.asp"><IMG
height=25 src="images/01-1.gif" width=155
border=0></A></P></TD></TR>
<TR>
<TD vAlign=top align=middle>
<P align=center><A href="jj.asp"><IMG
height=25 src="images/02-1.gif" width=155
border=0></A></P></TD></TR>
<TR>
<TD vAlign=top align=middle>
<P align=center><A href="cp.asp"><IMG
height=25 src="images/03-1.gif" width=155
border=0></A></P></TD></TR>
<TR>
<TD vAlign=top align=middle>
<P align=center><A href="xw.asp"><IMG
height=25 src="images/04-1.gif" width=155
border=0></A></P></TD></TR>
<TR>
<TD vAlign=top align=middle><A
href="sl.asp"><IMG height=25
src="images/12.gif" width=155 border=0></A></TD>
</TR>
<TR>
<TD vAlign=top align=middle>
<P align=center><A href="fw.asp"><IMG
height=25 src="images/05-1.gif" width=155
border=0></A></P></TD></TR>
<TR>
<TD vAlign=top align=middle><A
href="lx.asp"><IMG height=25
src="images/06-1.gif" width=155 border=0></A></TD>
</TR>
<TR>
<TD vAlign=top align=middle>
<P align=center> </P></TD></TR></TBODY></TABLE>
<TABLE id=table34 height=39 cellPadding=0 width=187>
<TBODY>
<TR>
<TD width=354 height=30><IMG height=30
src="images/jpzsm.gif" width=187 border=0></TD>
</TR>
<TR>
<TD width=187 bgColor=#b5e3ec
height=1></TD></TR></TBODY></TABLE>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><%
Dim KindID,arrKindID,Keyword,I
KindID = Request("kindid")
If KindID = "" Then KindID = 0
arrKindID = Split(KindID,",")
For I = 0 To UBound(arrKindID)
If arrKindID(I) = "" Then arrKindID(I) = 0
If Not IsNumeric(arrKindID(I)) Then arrKindID(I) = 0
Next
KindID = Join(arrKindID,",")
Dim SubRS
Set SubRS = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM [Product_Kind]"
SQL = SQL & " ORDER BY OrderID DESC,ID ASC"
Set RS = Server.CreateObject("ADODB.Recordset")
RS.Open SQL,Connstr,1,1
Dim IsDisplay,IsDisplayMore
Dim DisplayRS
Do While Not RS.EOF
IsDisplay = True
IsDisplayMore = True
'If UBound(arrKindID) = "jj" Then'> 0 Then
If Request.QueryString("action") = "more" Then
IsDisplay = False
For I = 0 To UBound(arrKindID)
SQL = "SELECT * FROM [Product1_Kind] WHERE ID = " & arrKindID(I)
Set DisplayRS = Server.CreateObject("ADODB.Recordset")
DisplayRS.Open SQL,Connstr,1,1
If Not DisplayRS.EOF Then
If DisplayRS("KindID") = RS("ID") Then
IsDisplay = True
IsDisplayMore = False
Exit For
End IF
End If
DisplayRS.Close
Set DisplayRS = Nothing
Next
End If
IF KindID&"" = "0" Then
IsDisplay = True
End IF
If IsDisplay Then
%>
<table width="80%" border="0" align="center" cellpadding="0" cellspacing="0" background="images/proleftbj2.gif">
<tr>
<td width="189"><table width="100%" border="0" cellpadding="0" cellspacing="0" class="search">
<tr>
<td width="22%"></td>
<td width="44%" class="main_txt"></td>
<td width="34%" class="text00"><%If IsDisplayMore Then%>
<a href="?kindid=<%
SQL = "SELECT * FROM [Product1_Kind] WHERE KindID = " & RS("ID") & " ORDER BY id DESC,ID desc"
SubRS.Open SQL,Connstr,1,1
Do While Not SubRS.EOF
%><%=SubRS("ID")%>,<%
SubRS.MoveNext
Loop
SubRS.Close
%>10000&action=more" target="_blank" class="text style1"></a>
<%End IF%>
</td>
</tr>
</table></td>
</tr>
</table>
<table width="90%" border="0" align="center" cellpadding="1" cellspacing="4" class="search">
<%
Dim sqlTemp
IF Request.QueryString("action") <> "more" Then
sqlTemp = " TOP 14 "
end if
SQL = "SELECT " & sqlTemp & " * FROM [Product1_Kind] WHERE KindID = " & RS("ID") & " ORDER BY ID DESC,ID ASC"
SubRS.Open SQL,Connstr,1,1
Do While Not SubRS.EOF
%>
<tr>
<td width="18%" align="center"><img src="images/arror.jpg" width="12" height="10" /></td>
<td width="82%"><a href="cp.asp?kindid=<%=SubRS("ID")%>" class="text00"><%=SubRS("KindName")%></a></td>
</tr>
<%
SubRS.MoveNext
Loop
SubRS.Close
%>
</table>
<%
End If
RS.MoveNext
Loop
RS.Close
Set RS = Nothing
%>
<%
'If Not (UBound(arrKindID) > 0) Then
If Request.QueryString("action") <> "more" Then
%>
<%End If%></td>
</tr>
</table>
<table width="100%" border="0">
<tr>
<td><IMG height=30
src="images/jpzsm2.gif" width=187 border=0></td>
</tr>
<tr>
<td><TABLE cellSpacing=0 cellPadding=0 width="98%" align=center
border=0>
<TBODY>
<TR>
<TD> <IMG height=25 src="images/next.gif"
width=13><A href="http://www.lwbx.cn"
target=_blank> <FONT color=#000000>莱芜百姓网 </FONT></A></TD>
</TR>
<TR>
<TD> <IMG height=25 src="images/next.gif"
width=13><A href="http://www.laiwumeishi.com"
target=_blank> <FONT color=#000000>莱芜美食网 </FONT></A></TD>
</TR>
<TR>
<TD> <IMG height=25 src="images/next.gif"
width=13><A href="http://www.laiwu.net"
target=_blank> <FONT color=#000000>莱芜在线</FONT></A></TD>
</TR>
<TR>
<TD> <IMG height=25 src="images/next.gif"
width=13> <a href="http://www.yuyesf.com">玉叶随风网</a> </TD>
</TR>
<TR>
<TD> <IMG height=25 src="images/next.gif"
width=13><A href="http://www.baidu.com"
target=_blank> <FONT color=#000000>百度竞价排名 </FONT></A></TD>
</TR>
</TBODY>
</TABLE></td>
</tr>
<tr>
<td> </td>
</tr>
</table></TD>
<TD style="PADDING-BOTTOM: 30px" vAlign=top align=middle width=651
rowSpan=2>
<TABLE cellSpacing=0 cellPadding=0 width="100%">
<TBODY>
<TR>
<TD>
<DIV align=center>
<TABLE id=table22 cellSpacing=0 cellPadding=0 width=515>
<TBODY>
<TR vAlign=top>
<TD width=515>
<TABLE id=table23 cellSpacing=0 cellPadding=0
width="100%">
<TBODY></TBODY></TABLE>
<TABLE id=table24 cellSpacing=0 cellPadding=0
width="65%">
<TBODY>
<TR>
<TD><A
onmouseover="MM_swapImage('www_menu01','','menu/gsyon.jpg',1);MM_showHideLayers('top_layer1','','show')"
onmouseout=MM_swapImgRestore()
href="index.asp"><IMG
height=36 src="images/gsy.jpg" width=80
border=0 name=www_menu01></A><IMG height=36
src="images/gfgx.jpg" width=7 border=0> </TD>
<TD><A
onmouseover="MM_swapImage('www_menu02','','menu/ggsjjon.jpg',1);MM_showHideLayers('top_layer2','','show')"
onmouseout=MM_swapImgRestore()
href="jj.asp"><IMG
height=36 src="images/ggsjj.jpg" width=80
border=0 name=www_menu02></A><IMG height=36
src="images/gfgx.jpg" width=7 border=0> </TD>
<TD><a
onMouseOver="MM_swapImage('www_menu08','','menu/ggszxon.jpg',1)"
onMouseOut="MM_swapImgRestore();MM_showHideLayers('top_layer8','','hide')"
href="xw.asp"><img
height=36 src="images/ggszx.jpg" width=80
border=0 name=www_menu08></a></TD>
<TD vAlign=top><IMG height=36
src="images/gfgx.jpg" width=7 border=0><A
onmouseover="MM_swapImage('www_menu04','','menu/gcpjson.jpg',1)"
onmouseout="MM_swapImgRestore();MM_showHideLayers('top_layer4','','hide')"
href="cp.asp"><IMG
height=36 src="images/gcpjs.jpg" width=80
border=0 name=www_menu04></A> </TD>
<TD><IMG height=36 src="images/gfgx.jpg"
width=7 border=0><A
onmouseover="MM_swapImage('www_menu06','','menu/ggcalon.jpg',1);MM_showHideLayers('top_layer6','','show')"
onmouseout="MM_swapImgRestore();MM_showHideLayers('top_layer6','','hide')"
href="sl.asp"><IMG
height=36 src="images/ggcal.jpg" width=80
border=0 name=www_menu06></A> </TD>
<TD><IMG height=36 src="images/gfgx.jpg"
width=7 border=0><A
onmouseover="MM_swapImage('www_menu03','','menu/gxsfwon.jpg',1)"
onmouseout="MM_swapImgRestore();MM_showHideLayers('top_layer3','','hide')"
href="fw.asp"><IMG
height=36 src="images/gxsfw.jpg" width=80
border=0 name=www_menu03></A> </TD>
<TD><IMG height=36 src="images/gfgx.jpg"
width=7 border=0><A
onmouseover="MM_swapImage('www_menu05','','menu/glxwmon.jpg',1);MM_showHideLayers('top_layer5','','show')"
onmouseout=MM_swapImgRestore()
href="lx.asp"><IMG
height=36 src="images/glxwm.jpg" width=80
border=0 name=www_menu05></A> </TD>
</TR></TBODY></TABLE>
<DIV id=top_layer8
onmouseover="MM_swapImage('www_menu08','','menu/ggszxon.jpg',1);MM_showHideLayers('top_layer8','','show')"
style="PADDING-RIGHT: 0px; PADDING-LEFT: 0px; Z-INDEX: 1; LEFT: 453px; VISIBILITY: hidden; PADDING-BOTTOM: 0px; WIDTH: 97px; PADDING-TOP: 0px; POSITION: absolute; TOP: 235px; HEIGHT: 101px"
onmouseout="MM_swapImgRestore();MM_showHideLayers('top_layer8','','hide')">
<TABLE id=table25 height=102 cellSpacing=0 cellPadding=0
width=119 bgColor=#124349>
<TBODY>
<TR>
<TD vAlign=top>
<DIV align=center>
<TABLE id=table26 height=92 cellPadding=0
width=103 border=0>
<TBODY>
<TR>
<TD vAlign=bottom height=24>
<P align=center><B><FONT face=宋体 color=#eeeeee
size=2><A
href="http://www.dzbl.com/cn/gsyw.asp"><FONT
color=#eeeeee>公司要闻</FONT></A></FONT></B></P></TD></TR>
<TR>
<TD bgColor=#206f7e height=1></TD></TR>
<TR>
<TD vAlign=bottom height=26>
<P align=center><B><FONT face=宋体 color=#eeeeee
size=2><A
href="http://www.dzbl.com/cn/zxrz.asp"><FONT
color=#eeeeee>资信认证</FONT></A></FONT></B></P></TD></TR>
<TR>
<TD bgColor=#206f7e height=1></TD></TR>
<TR>
<TD vAlign=bottom height=26>
<P align=center><B><FONT face=宋体 color=#eeeeee
size=2><A
href="http://www.dzbl.com/cn/xptj.asp"><FONT
color=#eeeeee>新品推荐</FONT></A></FONT></B></P></TD></TR>
<TR>
<TD bgColor=#206f7e
height=1></TD></TR></TBODY></TABLE></DIV></TD></TR></TBODY></TABLE></DIV>
[此贴子已经被hmhz于2007-10-21 21:10:37编辑过]