juece11.asp

这是一个基于WEB的树木分类专家系统asp源代码,对于初学者特别有帮助!

<%@language=vbscript%>
     <% 
     on error resume next
     dim conn,rs,sql,i,constr,temp
    Set conn = Server.CreateObject("ADODB.Connection")
    conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("tree.mdb")
    set rs= server.createobject("adodb.recordset") 
    dim x,y,z,t
     x=request.form("xiongjing")
     y=request.Form("height")
     z=request.Form("age")
     
     
     sql="select * from 生长特征表 where  xiongjing='"&x&"' and height='"&y&"' and age='"&z&"'"
    
     rs.open sql,conn
     if not rs.eof then
              temp1=rs("treename")
			  temp2=rs("laname") 
              
     else
               temp="Sorry！请选择恰当的决策条件！因为你还未决策或没有你所选决策条件的决策结果！请重新选择!谢谢!"
     end if
    
 
%>
     <style type="text/css">
<!--
.style2 {color: #3333CC}
.style3 {color: #FF9966}
body {
	background-color: #CCCCFF;
}
.style4 {	font-family: "华文行楷";
	color: #FF9966;
	font-size: 18px;
}
-->
     </style>
     
   查看决策详细信息
   <hr align="center" class="style3">
   <table width="510" border="0" align="center" bgcolor="#ECE9D8">
     <tr>
       <td colspan="2"><span class="style2">用户所选条件信息</span>         <hr width="600" size="4" class="style3"></td>
     </tr>
     <tr>
       <td><div align="center">用户决策时间是：</div></td>
       <td width="199"><div align="center"><%=date%></div></td>
     </tr>
     <tr>
       <td><div align="center">所选树木的胸径为：</div> </td>
       <td ><div align="center"><%=rs("xiongjing")%></div> </td>
     </tr>
     <tr>
       <td width="397"><div align="center">所选树木的高度是:</div></td>
       <td >
         <div align="center">	<%=rs("height")%></div></td>
     </tr>
     <tr>
       <td><div align="center">所选树龄是:</div></td>
       <td>&nbsp; <div align="center"><%=rs("age")%>	</div></td>
     </tr>
     <tr>
       <td colspan="2"><hr class="style3"></td>
     </tr>
     <tr>
       <td colspan="2"><span class="style2">决策信息</span>
         <hr width="600" size="4" class="style3"></td>
     </tr>
     <tr>
       <td> <div align="center">树木中文名字决策结果为:</div></td>
       <td>&nbsp;
         <div align="center"><a href="gouzao.asp?chname=<%=temp1%>&laname=<%=temp2%>"><%=temp1%></a></div></td>
     </tr>
     <tr>
       <td><div align="center">树木拉丁名字决策结果为: </div></td>
       <td><div align="center"><%=temp2%></div></td>
     </tr>
     <tr>
       <td><div align="center">可信度：</div> </td>
       <td><div align="center">100%</div></td>
     </tr>
     <tr>
       <td colspan="2">&nbsp;
       <div align="center"></div></td>
     </tr>
   </table>
   <p>&nbsp;</p>
   <div style="background-color:#99CC00 " align="center" >其它决策结论:<%=temp%></div>
   <p align="center"><a href="2.html" target="_self" class="style4">返回决策页</a></p>
   <p>&nbsp;</p>