<!--#include file="Connections/connDSN.asp" -->
<%
Dim Recordset1__MMColParam
Recordset1__MMColParam = "1"
If (Request.QueryString("prod_id"
<> ""
Then
Recordset1__MMColParam = Request.QueryString("prod_id"
End If
%>
<%
Dim Recordset1
Dim Recordset1_numRows
Set Recordset1 = Server.CreateObject("ADODB.Recordset"
Recordset1.ActiveConnection = MM_connDSN_STRING
Recordset1.Source = "SELECT * FROM production WHERE prod_id = " + Replace(Recordset1__MMColParam, "'", "''"
+ ""
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()
Recordset1_numRows = 0
%>
<SCRIPT RUNAT=SERVER LANGUAGE=VBSCRIPT>
function CleanHtmlBr(str)
// 织梦平台
www.e-dreamer.idv.tw CleanHtmlBr = Replace(Replace(Replace(Replace(str,"<","<"
,">",">"
,vbCrlf, "<br>"
, chr(32)&chr(32)," "
End Function
</SCRIPT>
<table width="588" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table width="588" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="7"><img src="pin_img/pindao_07.gif" width="7" height="161"></td>
<td><img src="pintu/production.gif" width="581" height="161"></td>
</tr>
<tr>
<td height="25" colspan="2"><table width="588" height="25" border="0" cellpadding="0" cellspacing="0">
<tr>
<td background="pin_img/dian .gif" title=""> <img src="pin_img/hand.gif" width="13" height="12"> 当前位置:<a href="production.asp">艾迪尔产品</a> -> <%=(Recordset1.Fields.Item("prod_type"
.value)%> -> <%=(Recordset1.Fields.Item("prod_title"
.value)%></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td valign="top"><table width="588" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="500" height="30" valign="middle" background="pin_img/detail.gif"><div align="center" class="STYLE1"><%=(Recordset1.Fields.Item("prod_title"
.value)%></div></td>
<td width="88" height="30" valign="top"> </td>
</tr>
<tr>
<td height="10" colspan="2"><img src="pin_img/pindao_16.gif" width="588" height="16"></td>
</tr>
<tr>
<td colspan="2" bgcolor="#FFFFFF" class="ziti"><table width="540" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td class="ziti" ><%= CleanHtmlBr(Recordset1.Fields.Item("prod_content"
.value)%></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>