<%dim rs,slct_stm,cn,stm,j,chk,i dbPath = Server.MapPath( "quedata.mdb") connString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" SET conn = Server.CreateObject( "ADODB.Connection") conn.Open connString + dbPath 'Set Conn = Server.CreateObject("ADODB.Connection") 'Conn.Open Application("dsn") set rs=Server.CreateObject("ADODB.recordset") %> View <% j=request("txtcount") chk=request("chck1") ' response.write "*************" & j slct_stm = "SELECT Area.Name_A,Area.Area,Information.Org_ID,Information.Org_name,Information.Adress, Information.Tel,Information.Fax,Information.Mail,Information.Boss_org_name, Information.Capital, Information.City, Information.Region,Information.Village,Information.City_Active,Information.Region_Active,Information.Area_Active, Information.Direction, Information.Estab_Date,Information.Reg_Month,Information.Reg_Year, Information.Not_Reg, Information.Check1,Information.Check2,Information.Check3,Information.Check4,Information.Single_Num,Information.Group_Num,Information.Area, Information.Password, Information.UserName,Information.typ, Information.Website_Bit,Information.WebSite, Information.Not_Def, Information.Part_Def,Information.Definition FROM Area INNER JOIN Information ON Area.Area = Information.Area WHERE Org_ID=" & request.querystring("id") & "" 'slct_stm = "select * from Information where Org_ID='" & request.querystring("id") & "'" if request.querystring("id")<>"" then %> <%rs.open slct_stm,conn,2%> <%%> <% j=request("txtcount") %> <% %>

رقم  الجمعية/المنظمة/المؤسسة  

<%=rs.fields("Org_ID")%> 
أسم الجمعية/المنظمة/المؤسسة <%=FLD(rs.fields("Org_name"))%> 
الدولة <%=FLD(rs.fields("Name_A"))%> 
تلفون <%=rs.fields("Tel")%> 
فاكس <%=rs.fields("Fax")%> 
بريد الكتروني <%=FLD(rs.fields("Mail"))%> 
 اسم رئيس الجمعية/الشخص المسئول   <%=FLD(rs.fields("Boss_org_name"))%> 
العاصمة <%=FLD(rs.fields("Capital"))%> 
المدينة <%=FLD(rs.fields("City"))%> 
المنطقة الإقليمية <%=FLD(rs.fields("Region"))%> 
القرية <%=FLD(rs.fields("Village"))%> 
المدينة <%=FLD(rs.fields("City_Active"))%> 
المنطقة <%=FLD(rs.fields("Region_Active"))%> 
الجهة <%=FLD(rs.fields("Direction"))%> 
البلد <%=FLD(rs.fields("Area_Active"))%> 
تاريخ تأسيس الجمعية  <%=rs.fields("Estab_Date")%> 
الشهر <%=FLD(rs.fields("Reg_Month"))%> 
السنة <%=FLD(rs.fields("Reg_Year"))%> 
التسجيل <%=FLD(rs.fields("Not_Reg"))%> 
العمل على  مستوى <%=FLD(rs.fields("Check1"))%>  
عدد الأفراد المنتسبين للجمعية <%=FLD(rs.fields("Single_Num"))%> 
عدد الجماعات المنتسبة للجمعية <%=FLD(rs.fields("Group_Num"))%> 
التعريف الأنسب للجمعية <%=FLD(rs.fields("Definition"))%>-<%=FLD(rs.fields("Not_Def"))%> 
موقع المنظمة على الشبكة الدولية <%=FLD(rs.fields("WebSite"))%> 
<% else for i=1 to j stm=request.item("Chck" & i) if stm="" then else slct_stm = "select * from Information where Org_name='" & request.item("Chck" & i) & "'" if request.item("Chck" & i)<>"" then %> <%rs.open slct_stm,conn,2 %> <% rs.close end if end if next end if%>

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

  طباعة   <%conn.close%>