<%@LANGUAGE="VBSCRIPT" codepage=1256 %> <% Response.Charset="ar-sa" %> <% session.CodePage=1256 %> <% pStr = "private, no-cache, must-revalidate" Response.ExpiresAbsolute = #2000-01-01# Response.AddHeader "pragma", "no-cache" Response.AddHeader "cache-control", pStr %> المكتبة الإلكترونية للمنظمة العربية للتنمية الزراعية
الرئيسية   التسجيل للدخول بحث بسيط بحث متقدم

إستعراض  التصنيف

روابط مطبق المكتبة إهداءات للمنظمة

نموذج البحث البسيط

 

<%'response.write "userid====" & Session("userid")%> <%'============================CODE Start Here====================================================================== checkPostBack = Request.ServerVariables("REQUEST_METHOD") Set Conn = Server.CreateObject("ADODB.Connection") dbPath = Server.MapPath( "./AOAD-Library.mdb") connString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Conn.Open connString + dbPath set rs=server.createobject("Adodb.recordset") Set rs_libraries =Server.CreateObject("ADODB.Recordset") %> <%if request.form("TBL_name")<>"" then TBL_name=request.form("TBL_name") else TBL_name=request.querystring("TBL_name") end if if request.form("userid")<>"" then userid=request.form("userid") else userid=request.querystring("userid") end if %>

 

 

  أدخل كلمة أو فقرة

 

                       بحث عن الملفات الإلكترونية