纺织机械

<%Sub RsTOShow (rs)%>
<% sql="select content,pid from talk where pid=" & rs("id") & " order by createdate asc" set rs1=server.CreateObject("adodb.recordset") rs1.open sql,conn,3,1 if not rs1.eof then c=1 for j=1 to rs1.recordcount if not rs1.eof then %> <% rs1.movenext c=c+1 end if next else %> <% end if rs1.close %>

头像	：<%=rs("name")%>	：<%=rs("company")%>
.gif" width="82" height="90" />	：<%=rs("telephone")%>	："><%=rs("email")%>
	主题：<%=rs("subject")%>" width="19" />
	内容：<%=convert_to_html(rs("content"))%> 发布日期：<%=two_time(rs("CreateDate"),3)%>
回复<%=c%>：<%=convert_to_html(rs1("content"))%>

<% end sub %>