M18581M

بصراحه انا ناسي الاوراكل لكن خذ الفكره begin select user_name, password, user_type from users where user_name = :block4.user_n and password =:block4.passw; --if data found-- if user_type = "Admin" then new_form('D:\dbms\Admin_Form'); else new_form('D:\dbms\Emp…

حاول بدون كلمة Private في الموديول

وعليكم السلام ورحمة الله وبركاته أخي الكريم ابحث في قسم الاكسيس /index.php?showforum=116

بصراحه انا لا اعلم ما الحل ممكن أحد من الاخوان لديه العلم بذلك أرجو المعذره وبالتوفيق

جزاك الله كل الخير وجعله في ميزان حسناتك الى يوم الدين

البرنامج اشتغل معاي طبيعي وفتح الفيديو في نفس البرنامج ممكن المشكله في ال version للبلاير

أرفق البرنامج

أهلين أخوي والله أنا مش كتير بالدوت نت :) في قسم خاص للدوت نت لكن أهم حاجة في التقارير أن يكون الداتا سورس للتقرير سليم ضع الداتا سورس للتقرير نفس الداتا سورس لل datagridview وبالتوفيق ان شاء الله

vb6 ولا vb.net ؟؟ وما برنامج التقارير عندك؟؟

ضع عند الحدث LostFocus ل Text1 في Form1 InvoiceNo=Text1.text وعند الحدث Form_Load ل Form2 Text1.Text=InvoiceNo

أرفق مثال

افتح ملف نصي (new text file) جديد واكتب فيه: REGEDIT4 [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\IniFileMapping\Autorun.inf] @="@SYS:DoesNotExist" ثم احفظه باسم stop.reg ثم شغل الملف و اضغط yes -------------------------------------- من Go…

واياكم حياك الله

حاول وضعهم جميعا في نفس المجلد (البرنامج وملفات الفيديو والصوت) وأرسل المجلد بالكامل لصديقك ليجربه مرة أخرى

الكود شغال ومجرب وبدون أخطاء لكن لا أعلم ماذا تريد أنت؟!!!

مش مفهوم!!!

وعليكم السلام ورحمة الله وبركاته اللي فهمته انه يفتح تقرير اكسس من برنامج ال vb لست كثيرا بهذه الامور لكن حاول هذا الكود: (بحث من Google) Private Sub Skills_Click() Dim Raid As Access.Application Set Raid = New Access.Application Raid.Visible = True Raid.OpenC…

"SELECT * FROM tb1 WHERE (tb1.Today_date Between '" & Text1.Text & "' and '" & Text2.Text & "') and (tb1.start_time between '" & Me.Text3 & "' and '" & Me.Text4 & "')"

وعليكم السلام يجب أن يحتوي كلا الجدولين على حقل مشترك والمفروض في مثالك هو (رقم التلميذ) فتكون جملة الاستعلام كالتالي: select P.StNo, P.Point, S.StName from Point P, Student S where S.StNo=P.StNo order by P.StNo

سلام يجب عليك تنزيل sp6 لبرنامج الفيجوال بيسك لديك وهو مجاني ومن ثم أعد ال عمل ال setup ولن ترى الرسالة ان شاء الله