answer.asp

医药进销存管理系统 全代码 很详细 可惜没有数据库 可供参考

<!--#include file="function.asp"-->
<!--#INCLUDE VIRTUAL="/MANAGE/INCLUDE/CONN.ASP"-->
<%
key=request.QueryString("keywords")
sql="select * from tb_MedicineName where yName like '%"&key&"%' or fortill like '%"&key&"%'"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,3,3
if rs.eof then
  response.write "Sorry!没有找到您想要的结果．．．．．．"
else
  response.write "<center>"
  response.write "<table border=0 width='100%'><tr><td align=center  bgcolor='#339966'>共找到<font color=red>"&rs.recordcount&"</font>条包含<font color=blue>"&key&"</font>的记录</td></tr></table>"
  response.write "</center>"
%><style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
}
-->
</style>
<title>搜索结果</title>
<link rel="stylesheet" href="manage/include/style.css" type="text/css">
<table width="100%" height="100%" border="0" align="center" cellpadding="0" cellspacing="0">
   <tr>
       <td width="10"></td>
     <td width="740" align="center" valign="top">
       <%do while not rs.eof%>
	   <table width="100%" border="0" align="center" cellpadding="0" cellspacing="4">
		       <tr>
		           <td width="163" rowspan="6">
				     <div align="center">
			           <%if len(rs("img"))>0 then%>
                       <img src="/manage/goods/goodspic/<%=rs("img")%>" width="80" height="80">                       
					   <%else%>
	                     <img src="/images/nopic.gif" width="77" height="70">
                       <%end if%>
			         </div></td>
			       <td width="163" valign="top" bgcolor="#CCCCCC" style="word-break:break_all"><div align="right">[药品名称]</div></td><td width="421" valign="top" bgcolor="#F5F5F5"  style="word-break:break_all"><%=rs("yName")%></td>
			   </tr>
		       <tr>
			       <td align="right" valign="top" bgcolor="#CCCCCC"  style="word-break:break_all">[主要成份]</td><td valign="top" bgcolor="#f5f5f5"  style="word-break:break_all"><%=repstr(rs("elements"))%></td>
			   </tr>
			   <tr>
			       <td align="right" valign="top" bgcolor="#CCCCCC"  style="word-break:break_all">[适应症]</td><td valign="top" bgcolor="#F5F5F5"  style="word-break:break_all"><%=repstr(rs("fortill"))%></td>
			   </tr>
		       <tr>
			       <td align="right" valign="top" bgcolor="#CCCCCC"  style="word-break:break_all">[用法用量]</td><td valign="top" bgcolor="#F5F5F5"><%=repstr(rs("usesize"))%></td>
			   </tr>
		       <tr>
			       <td height="63" align="right" valign="top" bgcolor="#CCCCCC"  style="word-break:break_all">[详细说明]</td>
			       <td valign="top" bgcolor="#F5F5F5"  style="word-break:break_all"><%=repstr(rs("medbook"))%></td>
			   </tr>		   			   
       </table><hr size="1" width="100%" style="border:1px;border-color:#999900;border-style:dashed">
	   <%
	   rs.movenext
	   loop
	   %>
	       <p align="center"><input type="button" value="关闭窗口" onClick="window.close();" style="border:1px solid;border-color:000000;background-color:#99CC66"></p></td>
       <td width="10" align="center" valign="middle"></td>
   </tr>
</table>
<%end if%>
<table border="0" cellpadding="0" cellspacing="0" width="100%">
   <tr>
       <td bgcolor="#339966" height="10"></td>
   </tr>
</table>