عبد الغني محسن

يا هلا فيك أخوي وبكل أعضاء المنتدى

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

إذا احتوى البرنامج على أدوات خاصة فيجب أن يتوفر في الجهاز ملفات OCX إضافة للملف MSVBVM60.DLL الذي يوجد في مسار System . إما إذا لم يحوى على أدوات خاصة فيكفي توفر الملف MSVBVM60.DLL . عموماً هناك كثير من الأجهزة يكون محمل عليها بعض البرامج تحوي على هذا الملف MS…

في أداة Image هناك خاصية التمدد Stretch . لوكان هناك أمر مشابه في أداة Picture لكان الأمر أسهل قليلاً.

طيب شباب ... إذا ما حدا منكم عرف الجواب .. فأنا سأسهل الموضوع قليلاً : من لديه أداة Active Movie ومتأكد من عملها بشكل جيد أرجو أن يرفقها في رد في هذا الموضوع. مشكورين ...

سؤال بسيط نوعاً ما . أضيف للفورم أداة Active Movie وقبل كتابة أي كود أعمل Run للمشروع فتظهر لي الرسالة التالية : خطأ غير محدد System Error &H80004005 (2147467259). سبب استعمالي لهذه الأداة هو أنني أريد تكبير صورة ملف الفيديو على كامل الشاشة (Ful Screen ) . أرج…

السلام عليكم ورحمة الله وبركاته الحمد لله رب العالمين ...... عدت إلى المشاركة في المنتدى بشغف بعد فراق دام أكثر من سنة بسبب امتحانات الشهادة الثانوية تحياتي وسلامي للأعضاء الجدد والقدامى.....

أهلاً بكم يااخوة وأهلاً بكل من راسلني و سيراسلني قمت باضافتكم.

وش أخبارك أخي rami23 جرب هذا الرابط: http://www.geocities.com/agmsoft2002/SPY.zip هذا هو ماسنجري : agmsoft2002@hotmail.com أرجو أن تضع ماسنجرك لنتواصل ونتبادل المعلومات.

أخي rami23 أرجو أن تضع لي ماسنجرك للتواصل وتبادل المعلومات وكذلك أنت أخي حسين أحمد عبد الله حسن وأهلاً بكل من يريد التواصل على الماسنجر. أرجو وضع عناوينكم. هذا هو ماسنجري : agmsoft2002@hotmail.com

أهلاً بك عزيزي VB.Net على العموم أنا لم أجرب الكود على ACCESS فلست متأكد من عمله أم لا

هلا أخي POWER وشكراً لتعاونك لكن ماذا يعني 01888

السلام عليكم ورحمة الله وبركاته يا اخوة : من أجل ضمان نجاح الهجمة يجب : 1- التعرف على طريقة هجوم كل واحد منا وما هي البرامج التي يستخدمها. 2- ضمان أكبر عدد ممكن من الأشخاص للهجوم على نفس الموقع في نفس الوقت ( لذلك اتفقوا مع أصدقائكم على هذا الأمر ). البرامج ال…

الظاهر بمفردي عبهاجم بقيت ساعتان تقريباً وأنا أهاجم www.kahane.org ولكن لم ألاحظ أي تغيير على الموقع ( لم يقفل ) لأنني وحدي كنت مهاجم يا إخوة يلزمنا عدد كبير من المهاجمين أكثر من 100 حددوا موعد آخر نتفق عليه علينا أن نقوم ولو بعمل بسيط كل حسب مجاله لنصرة إخوان…

إليك الطريقة عزيزي المع قم بإضافة أداة Microsoft Multimedia Cotrole6.0 ثم قم بكتابة الكود التالي MMControl1.DeviceType = "waveaudio" MMControl1.FileName = "c:a.wav" MMControl1.Command = "open" MMControl1.Command = "prev" MMControl1.Command = "play" بفرض أن مسا…

لإيقاف عمل برنامجك لمدة زمنية معينة : startime = Format(Now, "hh:mm:ss AMPM") endtime = DateAdd("s", 60, startime) While startime < Format(endtime, "hh:mm:ss AMPM") startime = Format(Now, "hh:mm:ss AMPM") Wend

اكتب هذا الكود في قسم التصريحات : Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _ (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) _ As Long Const WM_SYSCOMMAND = &H112 Const SC_MONITORPOWER = &HF170 ثم اكت…

هذا الكود لمعرفة عدد تكرار حرف معين في جملة : Public Function CountChar(StringToSearch As String, Character As String) As Integer CountChar = 0 For i = 1 To Len(StringToSearch) If Mid(StringToSearch, i, 1) = Character Then CountChar = CountChar + 1 Next i End …

لوضع محتويات ملف نصي في TextBox : Open "c:windowsdesktopbooks.txt" For Input As #1 Text1.Text = Input(LOF(1), 1) Close #1

لتحميل جميع خطوط الكمبيوتر في ComboBox : Private Sub Form_Load() Dim i As Integer For i = 0 To Screen.FontCount - 1 Combo1.AddItem Screen.Fonts Next i Combo1.Text = Combo1.List(0) End Sub