البحث في قاعدة بيانات السيرفر

<%@ LANGUAGE="VBSCRIPT" %> <% 'if (session("validity")="on") and (session("prvlgs")=3 OR session("prvlgs")=2) then %> البحث في قاعدة بيانات السيرفر <% accessdb="tm" DataConn="DRIVER={Microsoft Access Driver (*.mdb)};" DataConn=DataConn & "DBQ="&server.mappath(accessdb) server.mappath(accessdb) Set cmdTemp = Server.CreateObject("ADODB.Command") Set DataCommand1 = Server.CreateObject("ADODB.Recordset") 'DataCommand1.open "SELECT Cntry_ID, Cntry_Name FROM Country",dataconn,1,3,1 cmdTemp.CommandType = 1 'Set cmdTemp.ActiveConnection = DataConn 'DataCommand1.Open DataConn, , 0, 1 %>

	الإداره العامه لحماية الملكيه الفكريه - اليمن (البحث في قاعدة البيانات)
	برمجة وتصميم :ماتركس لتقنية المعلومات م / فهيم محسن
الرئيسيــــه

حالة الطلب
رقم العلامة
اسم العلامة
المـالك

<% 'DataCommand1.Close 'DATACONN.CLOSE 'else ' response.redirect "error.asp" 'End IF %>