KHALED-AFIFI

اخي العزيز .. وددت مساعدتك لكن المشروع خالي تماما بعد فكه ..

try the following select top <n> from <tablename> where <condition> for example select top 50 from employees where emp_name like '%Ali %'

هذا هو الكود بعد التعديل FatharAndChild2.zip

اخي العزيز استخدم الكود التالي select de_name,avg from emp where avg=(select min(avg) from emp )

أخي العزيز : السلام عليكم يجب أن تعدل جميع الجمل التي تحتوي عل FILTER كي تحتوي على علامة % مثل adosearchcustomer.Recordset.Filter = "cst-name like '%" & Text6.Text & "%'" وسيعمل البرنامج ان شاء الله

أخي العزيز : طبيعي ان بداية الشهر هي 1 لذلك فإن تاريخ بداية أي شهر هي: sdate=cdate("1/" & mn & "/" & yr) حيث أن mn هو الشهر و yr هي السنه ولإيجاد نهاية الشهر: مرر الى الداله الأتيه رقم الشهر m ورقم السنة y private function GetEndDate(m as byte , y as integer) …

أخي العزيز : نغترض ان قاعدة البيانات قد أعطيتها متغير dbs يمكنك استخدام الكود التالي Dim csql as string Dim tbl As TableDef For Each tbl In dbs.TableDefs csql="select * from " & tbl.name & " where description like '%" & searchtext & "%'" '*********************…

أخي العزيز : لقد نزلت برنامجك ووجدت أن الخطأ الوحيد هو أن جدول المساحات أعطيته اسم Size وهو من الكلمات المحجوزه ( Reserved Words) أي لا يمكنك استخدامه. غقط عدل الإسم الى sizes أو أي اسم آخر ثم من داخل البرنامج ومن داخل ال Form الخاصة بالمساحات عدل خصائص ال ADO…

أخي العزيز : إذا كنت لا تريد العوده الى قاعدة البيانات فإليك هذا الكود البسيط الذي يدور على كل item داخل ال Listbox وعليك تطويره كي يناسب برنامجك dim i as integer For i = 0 To List1.ListCount - 1 MsgBox List1.List(i) Next ورد علي اذا لم تستطع تنفيذه مع ايضاح أ…

أخي العزيز أرجوا ان توضح لي الآتي : 1- اذا كنت تستعمل DAO أو ADO 2- إذا كانت كل الجداول داخل قاعدة البيانات نفس التركيبه ( Structure) أي ان كل الجداول تحتوي عل نفس الحقول بنفس النوع أم لا ولو تفضلت اكتب الكود الذي تبحث به في أي جدول أنا في إنتظار الرد وأرجوا م…

السلام عليكم ورحمة الله يمكنك الربط كما يلي : الخطوة الأولى : * افترض ان الملف اسمه C:DF.MDB انشئ ملف نصي باسم معين تحت مجلد معين وليكن C:XYXY.TXT ثم اكتب فيه هذا السطر : Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:DF.MDB; الخطوة الثانية : من داخل البرنامج…

أخي العزيز : قبل السطر التالي : cmd.CommandText = "select * from LetterLookUp where letter='" & Text & "'" يجب اعطاء قيمة لـ text افترض أنك تبحث عن السجلات التي تحتوي على "محمد" فيجب ان تنفذ هذا السطر أولا text="محمد" وعمليا يجب أن تضع text Box على ال Form ليق…

أخي العزيز : يبدوا انك تريد اضافة بيانات وليست مجرد استيراد لأنك الإستيراد سوف يبني جداول جديده بنفس الأسم ولكن مع اضافة رمز الى آخر الإسم 2 أو 3 أو ... لذلك إذا كنت تريد اضافة البيانات نفسها دون فقدان البيانات القديمة اتبع الآتي (1) شغل ال access مرتين لتكون …

أخي الكريم : اعتقد انك نسيت وضع العلامه % وهذا مثال csql="select * from table1 where fldname like '%" & Trim(Text1.Text) & "%'" أرجوا من الله الإفاده إن كانت صحيحة والمغفرة إن كانت خطأ

أخي العزيز ليس لدي مشكلة ولكن يجب أن تكون عندك على الجهاز قبل كل شيء. أبعث الي ببريدك كي ارسله لك

أخي العزيز جرب هذه الداله private function xy (numValue as currency) as currency dim strValue as string dim strInt as string dim strFact as string strValue=format(nymValue,"00.00") strint=left(strvalue,len(strvalue)-3) strfact=right(strvalue,2) if val(strFact)…

اخي العزيز : نفذ الأمر التالي update tablename set fldname="*" where fldname=""

بالنسبة للسؤال الأول : غير ال Style الى grapfics ثم غير اللون السؤال الثاني : اريد توضيحا أكثر من فضلك السؤال الثالث : اكتب بريدك لكي أرسله لك (مجانا) ثم بعد ذلك نناقش كيفية استعماله

أخي العزيز فقط غير الجزء التالي : ---------------------------------------------------------- cmd.CommandText = "LetterLookUp" cmd.CommandType = adCmdStoredProc ' Get parameter value and append parameter. Letter = Text Set PramTemp = cmd.CreateParameter("Letter…

windows xp تحتاج الى sqlserver 2000 Personnel edition وليست أي اصدار آخر مثل standard أو enterprise التي تحتاج الى srver أعتقد أن النسخة التي ليست personnel