%@LANGUAGE="JAVASCRIPT" codepage=65001 %>
<% Response.Charset="utf-8" %>
<%
var AniDis = Server.CreateObject ('ADODB.Connection');
AniDis.Provider = "Microsoft.Jet.OLEDB.4.0"
AniDis.Open(Server.MapPath("AD.mdb"))
%>
<%
var RSStat = Server.CreateObject("ADODB.Recordset");
RSStat.ActiveConnection = AniDis;
RSStat.Source = "SELECT * FROM States";
RSStat.CursorType = 0;
RSStat.CursorLocation = 2;
RSStat.LockType = 1;
RSStat.Open();
var RSStat_numRows = 0;
%>
<%// search criteria for dis%>
<%
var RSAniDes__MMColParam = "0";
if (String(Request.Form("Stat_No")) != "undefined" &&
String(Request.Form("Stat_No")) != "") {
RSAniDes__MMColParam = String(Request.Form("Stat_No"));
}
%>
<%
var RSAniDes__MMColParam1 = "0";
if (String(Request.Form("App_year")) != "undefined" &&
String(Request.Form("App_year")) != "") {
RSAniDes__MMColParam1 = String(Request.Form("App_year"));
}
%>
<%
var RSAniDes__MMColParam2 = "";
if (String(Request.form("SenName")) != "undefined" &&
String(Request.form("SenName")) != "") {
RSAniDes__MMColParam2 = String(Request.form("SenName"));
}
%>
<%
var RSAniDes__MMColParam3 = "";
if (String(Request.Form("DisName")) != "undefined" &&
String(Request.Form("DisName")) != "") {
RSAniDes__MMColParam3 = String(Request.Form("DisName"));
}
%>
<%
var RSAniDes__MMColParam4 = "0";
if (String(Request.form("DisCus")) != "undefined" &&
String(Request.form("DisCus")) != "") {
RSAniDes__MMColParam4 = String(Request.form("DisCus"));
}
%>
<% // select statement
var SelStat="" ; // check if no any criteria have been chosen
if (RSAniDes__MMColParam != "0" || RSAniDes__MMColParam1 != "0" || RSAniDes__MMColParam2 != "" || RSAniDes__MMColParam3 != "" || RSAniDes__MMColParam4 != "0"){
SelStat="Where 1 = 1";}
else {
SelStat="Where 1 <> 1";
};
// check if no any States has been chosen then select all states
if (RSAniDes__MMColParam !=0 ){
SelStat=SelStat+ "and Stat_No in ("+ RSAniDes__MMColParam.replace(/'/g, "''")
+ ")"};
// check if no any app year has been chosen
if (RSAniDes__MMColParam1 !=0 ){
if (String(Request.form("RG1"))=="1" && String(Request.form("RG1"))!="undefined") {
SelStat=SelStat+ " and Expr2 in ('"+ RSAniDes__MMColParam1.replace
(/'/g, "''")+ "')"};
else if (String(Request.form("RG1"))=="0" && String(Request.form("RG1"))!="undefined") {
SelStat=SelStat+ " or Expr2 in ('"+ RSAniDes__MMColParam1.replace
(/'/g, "''") + "')"};
};
// check if Dis Sent Name has been entered
if (RSAniDes__MMColParam2 !=0 ){
if (String(Request.form("RG2"))=="1" && String(Request.form("RG2"))!="undefined") {
SelStat=SelStat+ "and Scient_name LIKE '%"+ RSAniDes__MMColParam2.replace(/'/g, "''") +
"%'" };
else if (String(Request.form("RG2"))=="0" && String(Request.form("RG2"))!="undefined") {
SelStat=SelStat+ "or Scient_name LIKE '%"+ RSAniDes__MMColParam2.replace(/'/g, "''") +
"%'" };
};
//check if no loc name has been entered
if (RSAniDes__MMColParam3 !=0 ){
if (String(Request.form("RG3"))=="1" && String(Request.form("RG3"))!="undefined") {
SelStat=SelStat+ "and Local_name LIKE '%"+ RSAniDes__MMColParam3.replace(/'/g, "''") +
"%'" };
else if (String(Request.form("RG3"))=="0" && String(Request.form("RG3"))!="undefined") {
SelStat=SelStat+ "or Local_name LIKE '%"+ RSAniDes__MMColParam3.replace(/'/g, "''") +
"%'" };
};
//check if no dis cuse has been choosen
if (RSAniDes__MMColParam4 !=0 ){
// check if select othere
if (String (Request.Form("DisCus")) == "فيروس" || String (Request.Form("DisCus")) == "بكتيريا" || String (Request.Form("DisCus")) == "فطر" || String (Request.Form("DisCus")) == "حشرات"){
if (String(Request.form("RG4"))=="1" && String(Request.form("RG4"))!="undefined") {
SelStat=SelStat+ "and Dis_Caus LIKE '%"+ RSAniDes__MMColParam4.replace(/'/g, "''") +
"%'" };
else if (String(Request.form("RG4"))=="0" && String(Request.form("RG4"))!="undefined") {
SelStat=SelStat+ "or Dis_Caus LIKE '%"+ RSAniDes__MMColParam4.replace(/'/g, "''") +
"%'" }};
else if (String (Request.Form("DisCus")) != "فيروس" || String (Request.Form("DisCus")) != "بكتيريا" || String (Request.Form("DisCus")) != "فطر" || String (Request.Form("DisCus")) != "حشرات") {
if (String(Request.form("RG4"))=="1" && String(Request.form("RG4"))!="undefined") {
SelStat=SelStat+ "and (Dis_Caus <> 'فيروس' and Dis_Caus <>'بكتيريا' and Dis_Caus <>'فطر' and Dis_Caus <>'حشرات')"};
else if (String(Request.form("RG4"))=="0" && String(Request.form("RG4"))!="undefined") {
SelStat=SelStat+ "or (Dis_Caus <> 'فيروس' and Dis_Caus <>'بكتيريا' and Dis_Caus <>'فطر' and Dis_Caus <>'حشرات')"}};
};
%>
<%
var RSAniDes = Server.CreateObject("ADODB.Recordset");
RSAniDes.ActiveConnection = AniDis;
RSAniDes.Source = "SELECT * FROM OutAniDis " + SelStat;
RSAniDes.CursorType = 0;
RSAniDes.CursorLocation = 2;
RSAniDes.LockType = 1;
RSAniDes.Open( "SELECT * FROM OutAniDis " + SelStat);
var RSAniDes_numRows = 0;
%>
<%
var Repeat1__numRows = -1;
var Repeat1__index = 0;
RSAniDes_numRows += Repeat1__numRows;
%>
الأوبئة التي تصيب الحيوانات
|
|
|
الأوبئة التي تصيب الحيوانات
<% if (!RSAniDes.EOF || !RSAniDes.BOF) { %>
معلومات إضافية |
البلد |
التشخيص |
مسبب المرض |
سنة ظهور المرض |
طبيعة المرض |
الاسم العلمي للمرض |
اسم المرض |
<% while ((Repeat1__numRows-- != 0) && (!RSAniDes.EOF)) { %>
|
<%=(RSAniDes.Fields.Item("Expr4").Value)%> |
<%=(RSAniDes.Fields.Item("Dis_Diag").Value)%> |
<%=(RSAniDes.Fields.Item("Dis_Caus").Value)%> |
<%=(RSAniDes.Fields.Item("App_date").Value)%> |
<%=(RSAniDes.Fields.Item("Dis_home").Value)%> |
<%=(RSAniDes.Fields.Item("Scient_name").Value)%> |
<%=(RSAniDes.Fields.Item("L_name").Value)%> |
<%
Repeat1__index++;
RSAniDes.MoveNext();
}
%>
<% } // end !RSAniDes.EOF || !RSAniDes.BOF %>
<% if ((RSAniDes.EOF && RSAniDes.BOF)&& ( RSAniDes__MMColParam!=0 || RSAniDes__MMColParam1 !=0 || RSAniDes__MMColParam2!="" || RSAniDes__MMColParam3 !="" || RSAniDes__MMColParam4!=0 )) { %>
<% } // end RSShortPlans.EOF && RSShortPlans.BOF %> |
|
<%
RSStat.Close();
%><%
RSAniDes.Close();
%>