<%@LANGUAGE="VBSCRIPT" codepage=65001 %> <% Response.Charset="utf-8" %> قاعدة بيانات قوانين الحجر البيطري في الدول العربية <%set conn=server.createObject("Adodb.connection") strdsn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("Quaratine.mdb") conn.open strdsn set rscountries=server.createobject("Adodb.recordset") '=========================================================== ' sqlquery="Select * from Tbl_Countries " sqlquery="Select distinct Full_name_a,id from Tbl_Countries order by id" 'response.write "Sqlquery===" & sqlquery rscountries.open sqlquery,conn,1 '=========================================================== %>
 بحث بسيط
 بحث متقدم
إستعراض البيانات حسب المجال
 دليل إستخدام القاعدة
صفحة رئيسية

 

<%if not(rscountries.bof and rscountries.eof) then%> <%rscountries.movefirst do while not rscountries.eof%> <%if not rscountries.eof then%> <%if request.querystring("Fieldid")="" and request.querystring("contid")="" then%> <%rscountries.movenext%> <%end if%> <%if request.querystring("Fieldid")<>"" and request.querystring("contid")<>"" then%> <%rscountries.movenext%> <%end if%> <%if request.querystring("Fieldid")<>"" then%> <%rscountries.movenext%> <%end if%> <%end if%> <%if not rscountries.eof then%> <%if request.querystring("Fieldid")="" and request.querystring("contid")="" then%> <%rscountries.movenext%> <%end if%> <%if request.querystring("Fieldid")<>"" and request.querystring("contid")<>"" then%> <%rscountries.movenext%> <%end if%> <%if request.querystring("Fieldid")<>"" then%> <%rscountries.movenext%> <%end if%> <%end if%> <%if not rscountries.eof then%> <%if request.querystring("Fieldid")="" and request.querystring("contid")="" then%> <%rscountries.movenext%> <%end if%> <%if request.querystring("Fieldid")<>"" and request.querystring("contid")<>"" then%> <%rscountries.movenext%> <%end if%> <%if request.querystring("Fieldid")<>"" then%> <%rscountries.movenext%> <%end if%> <%end if%> <%if not rscountries.eof then%> <%if request.querystring("Fieldid")="" and request.querystring("contid")="" then%> <%rscountries.movenext%> <%end if%> <%if request.querystring("Fieldid")<>"" and request.querystring("contid")<>"" then%> <%rscountries.movenext%> <%end if%> <%if request.querystring("Fieldid")<>"" then%> <%rscountries.movenext%> <%end if%> <%end if%> <%if not rscountries.eof then%> <%if request.querystring("Fieldid")="" and request.querystring("contid")="" then%> <%rscountries.movenext%> <%end if%> <%if request.querystring("Fieldid")<>"" and request.querystring("contid")<>"" then%> <%rscountries.movenext%> <%end if%> <%if request.querystring("Fieldid")<>"" then%> <%rscountries.movenext%> <%end if%> <%end if%> <%loop end if%> <%if request.querystring("Fieldid")="" and request.querystring("contid")="" then%> <%end if%> <%if request.querystring("Fieldid")<>"" and request.querystring("contid")<>"" then%> <%end if%> <%if request.querystring("Fieldid")<>"" then%> <%end if%>
" color="#663300"> <%=rscountries.fields(0)%>&Fieldid=<%=request.querystring("Fieldid")%>"> <%=rscountries.fields(0)%>&Fieldid=<%=request.querystring("Fieldid")%>"> <%=rscountries.fields(0)%>"> <%=rscountries.fields(0)%>&Fieldid=<%=request.querystring("Fieldid")%>"> <%=rscountries.fields(0)%>&Fieldid=<%=request.querystring("Fieldid")%>"> <%=rscountries.fields(0)%>"> <%=rscountries.fields(0)%>&Fieldid=<%=request.querystring("Fieldid")%>"> <%=rscountries.fields(0)%>&Fieldid=<%=request.querystring("Fieldid")%>"> <%=rscountries.fields(0)%>"> <%=rscountries.fields(0)%>&Fieldid=<%=request.querystring("Fieldid")%>"> <%=rscountries.fields(0)%>&Fieldid=<%=request.querystring("Fieldid")%>"> <%=rscountries.fields(0)%>"> <%=rscountries.fields(0)%>&Fieldid=<%=request.querystring("Fieldid")%>"> <%=rscountries.fields(0)%>&Fieldid=<%=request.querystring("Fieldid")%>"> <%=rscountries.fields(0)%>"> الكل"> الكل&Fieldid=<%=request.querystring("Fieldid")%>"> الكل

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

  Copyright© AOAD 2010