• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

valley

اعضاء
  • عدد المشاركات

    32
  • تاريخ الانضمام

  • تاريخ اخر زياره

السمعه بالموقع

0 عادي

عن valley

  • الرتبة
    عضو جديد

طرق الإتصال

  • ICQ 0
  1. اعضاء المنتدى الكرام   الرجاء الافادة في كيفية نسخ جميع الجداول من قاعدة البيانات الحالية المتصلة ب ADO محمية بكلمة مرور   الى قاعدة بيانات اخرى  فارغة بدون جداول بكامل البيانات ومحمية بكلمة مرور      
  2. اعضاء المنتدى الكرام   الرجاء الافادة في كيفية نسخ جميع الجداول من قاعدة البيانات الحالية المتصلة ب ADO محمية بكلمة مرور   الى قاعدة بيانات اخرى  فارغة بدون جداول بكامل البيانات ومحمية بكلمة مرور   استخدم Vb6
  3. الاخوة الكرام السلام عليكم ورحمة الله وبركاته الرجاء لمن لديه طريقة لتركيب AppServ على شبكة محلية LAN بمعنى ان اضع قاعدة البيانات على جهاز مشبوك بشبكة محلية peer To Peer ويتم وضع Script على مجموعة اجهزة اخرى مرتبطة بقاعدة بيانات على جهاز اخر ولكم خالص الشكر والتقدير
  4. الاخ الفاضل احمد جمال خليفة جعل الله ما قدمت في ميزان حسناتك ، الكتاب اكثر من رائع تستحق عليه الشكر والتقدير والاحترام وفقك الله ويرعاك ويرفع قدرك ان شاء الله
  5. ارفق طلبك بالتحديد اي ارفق الجدولين في قاعدة بيانات واحدة ( حتى نعرف اذا كنت تتعامل مع جداول مرتبطة ام لا ) ثم انصح باستخدام Ado في التعامل مع قواعد البيانات واكتب على اي عدد من الجداول في نفس الفورم حتى استطيع مساعدتك ولانها افضل من وجه نظري )
  6. السلام عليكم اليك هذا البرنامج وهو مجاني DBManager Professional http://www.dbtools.com.br/EN/downloads/dow....php?file_id=11
  7. السلام عليكم اذا كان القصد ادراج شعار مثلا بدلا من تضمينه بالكود فهذه احدى الطرق [size="2"]Private Sub DataReport_Initialize() img = App.Path & "\logo.gif" Set Me.Sections("section4").Controls("ImgLogo").Picture = LoadPicture(img) End Sub[/size] حيث يحدد القسم الذي يراد اظهار الصورة به اما اذا كان القصد شيء اخر فالرجاء التوضيح
  8. السلام عليكم ورحمة الله وبركاته هذا الكود يمكنك من البحث في اي مجال من التاريخ يمكنك تحويره واستخدامه حسب طلبك Dim CN As New ADODB.Connection Dim Rs As New ADODB.Recordset rs.Open "SELECT * FROM TblName WHERE Date Between #" & DTPicker1.Value & "# AND #" & DTPicker2.Value & "# ORDER BY Date ASC", CN, adOpenStatic, adLockOptimistic ويمكنك استخدام الدالة Month(Date) الستخلاص الشخر من التاريخ الحالي Year(Date) لاستخلاص السنة الحالية ارجو ان يكون هذا طلبك
  9. دروس PHP متقدمة

    الأخوة الكرام السلام عليكم ورحمة الله وبركاته ننتظر جميعا نقطة الانطلاق
  10. السلام عليكم ورحمة الله وبركاته كيف يمكن انشاء تقرير من جداول مختلفة باستخدام datareport, لدي عدد من الجداول لعمل شهادة طالب جدول البيانات الاساسية للطلاب ( رقم الطالب - اسم الطالب - رقم الشعبة - رقم الصف ) ****************************** جدول المواد ( رقم المادة - اسم المادة ) جدول الدرجات (رقم الطالب - رقم الصف - رقم المادة - درجة الطالب ) ****************************** جدول الصفوف (رقم الصف - اسم الصف ) ****************************** جدول الشعب (رقم الشعبة - رقم الصف - رائد الصف) ****************************** جدول للملاحظات تسجل به ملاحظات لكل طالب وهي أكثر من ملاحظة عن (رقم الملاحظة - رقم الطالب - الملاحظة ) شهادة الطالب تتضمن اسم الطالب - الصف - الشعبة اسماء المواد كل مادة يظهر بجانبها درجة الطالب فيه وبعد طباعة المواد يطبع ملاحظات الطالب المختلفة المسجلة في جدول الملاحظات كيف كيف يتم ذلك وكيف يوجه الى التقرير جزاكم الله خير
  11. الاخ الفضل المتميز استئذنك في التعقيب على الكود لتعم الفائدة منه ولك خالص شكري وتقديري Private Const VK_0 = &H30 Private Const VK_1 = &H31 Private Const VK_2 = &H32 Private Const VK_3 = &H33 Private Const VK_4 = &H34 Private Const VK_5 = &H35 Private Const VK_6 = &H36 Private Const VK_7 = &H37 Private Const VK_8 = &H38 Private Const VK_9 = &H39 Private Const VK_A = &H41 Private Const VK_B = &H42 Private Const VK_C = &H43 Private Const VK_D = &H44 Private Const VK_E = &H45 Private Const VK_F = &H46 Private Const VK_G = &H47 Private Const VK_H = &H48 Private Const VK_I = &H49 Private Const VK_J = &H4A Private Const VK_K = &H4B Private Const VK_L = &H4C Private Const VK_M = &H4D Private Const VK_N = &H4E Private Const VK_O = &H4F Private Const VK_P = &H50 Private Const VK_Q = &H51 Private Const VK_R = &H52 Private Const VK_S = &H53 Private Const VK_T = &H54 Private Const VK_U = &H55 Private Const VK_V = &H56 Private Const VK_W = &H57 Private Const VK_X = &H58 Private Const VK_Y = &H59 Private Const VK_Z = &H5A Private Const VK_ADD = &H6B Private Const VK_ATTN = &HF6 Private Const VK_BACK = &H8 Private Const VK_CANCEL = &H3 Private Const VK_CAPITAL = &H14 Private Const VK_CLEAR = &HC Private Const VK_CONTROL = &H11 Private Const VK_CRSEL = &HF7 Private Const VK_DECIMAL = &H6E Private Const VK_DELETE = &H2E Private Const VK_DIVIDE = &H6F Private Const VK_DOWN = &H28 Private Const VK_END = &H23 Private Const VK_EREOF = &HF9 Private Const VK_ESCAPE = &H1B Private Const VK_EXECUTE = &H2B Private Const VK_EXSEL = &HF8 Private Const VK_F1 = &H70 Private Const VK_F10 = &H79 Private Const VK_F11 = &H7A Private Const VK_F12 = &H7B Private Const VK_F13 = &H7C Private Const VK_F14 = &H7D Private Const VK_F15 = &H7E Private Const VK_F16 = &H7F Private Const VK_F17 = &H80 Private Const VK_F18 = &H81 Private Const VK_F19 = &H82 Private Const VK_F2 = &H71 Private Const VK_F20 = &H83 Private Const VK_F21 = &H84 Private Const VK_F22 = &H85 Private Const VK_F23 = &H86 Private Const VK_F24 = &H87 Private Const VK_F3 = &H72 Private Const VK_F4 = &H73 Private Const VK_F5 = &H74 Private Const VK_F6 = &H75 Private Const VK_F7 = &H76 Private Const VK_F8 = &H77 Private Const VK_F9 = &H78 Private Const VK_HELP = &H2F Private Const VK_HOME = &H24 Private Const VK_INSERT = &H2D Private Const VK_LBUTTON = &H1 Private Const VK_LCONTROL = &HA2 Private Const VK_LEFT = &H25 Private Const VK_LMENU = &HA4 Private Const VK_LSHIFT = &HA0 Private Const VK_MBUTTON = &H4 Private Const VK_MENU = &H12 Private Const VK_MULTIPLY = &H6A Private Const VK_NEXT = &H22 Private Const VK_NONAME = &HFC Private Const VK_NUMLOCK = &H90 Private Const VK_NUMPAD0 = &H60 Private Const VK_NUMPAD1 = &H61 Private Const VK_NUMPAD2 = &H62 Private Const VK_NUMPAD3 = &H63 Private Const VK_NUMPAD4 = &H64 Private Const VK_NUMPAD5 = &H65 Private Const VK_NUMPAD6 = &H66 Private Const VK_NUMPAD7 = &H67 Private Const VK_NUMPAD8 = &H68 Private Const VK_NUMPAD9 = &H69 Private Const VK_OEM_CLEAR = &HFE Private Const VK_PA1 = &HFD Private Const VK_PAUSE = &H13 Private Const VK_PLAY = &HFA Private Const VK_PRINT = &H2A Private Const VK_PRIOR = &H21 Private Const VK_PROCESSKEY = &HE5 Private Const VK_RBUTTON = &H2 Private Const VK_RCONTROL = &HA3 Private Const VK_RETURN = &HD Private Const VK_RIGHT = &H27 Private Const VK_RMENU = &HA5 Private Const VK_RSHIFT = &HA1 Private Const VK_SCROLL = &H91 Private Const VK_SELECT = &H29 Private Const VK_SEPARATOR = &H6C Private Const VK_SHIFT = &H10 Private Const VK_SNAPSHOT = &H2C Private Const VK_SPACE = &H20 Private Const VK_SUBTRACT = &H6D Private Const VK_TAB = &H9 Private Const VK_UP = &H26 Private Const VK_ZOOM = &HFB Private Const KEYEVENTF_EXTENDEDKEY = &H1 Private Const KEYEVENTF_KEYUP = &H2 Private Const SW_HIDE = 0 Private Const SW_SHOWNORMAL = 1 Private Const SW_SHOWMINIMIZED = 2 Private Const SW_MAXIMIZE = 3 Private Const SW_SHOWNOACTIVATE = 4 Private Const SW_SHOW = 5 Private Const SW_MINIMIZE = 6 Private Const SW_SHOWMINNOACTIVE = 7 Private Const SW_SHOWNA = 8 Private Const SW_RESTORE = 9 وهذا الكود حصلت من احد البرامج
  12. الاخ hazzoom جزاء الله خير على ما قدمت فلقد وجدت هذا الكود بناءا على توجيهاتك Text1.SetFocus 'لارسال Shift + c      SendKeys "+{c}", True ' لارسال F8      SendKeys "{F8}", True ' لارسال Alt+F4      SendKeys "%{F4}", True 'لارسال مفتاح Enter      SendKeys "{ENTER}", True الاخ المتميز ان شاء الله تكون متميز دائما وجعل الله ما قدمت في ميزان حسناتك الكود رائع
  13. الاخوة الاعزاء السلام عليكم كيف اجعل مفتاح معين مضغوط باستمرار في النموذج وليكن F1 وجزاكم الله خير