Mo7eb_Alrasool

/index.ph...st&p=517292

السلام عليكم حياك الله أخي اذا ما بدك تستخدم ازرار الاختيار فتستطع ان تستخدم الكود التالي Function GetWhere() As String Dim ComboBoxs, Fileds Dim sWhere As String ComboBoxs = Split("مربع_تحرير_وسرد10,مربع_تحرير_وسرد8,مربع_تحرير_وسرد6,مربع_تحرير_وسرد2,مربع_تحري…

السلام عليكم أخي لازم تختار زر الأختيار ليتم البحث عن العنصر المقابل له اذا لماذا عاصر الاختيار موجودة في النموذج? تستطيع ان تختار اكثر من اختيار جرب ذلك

السلام عليكم حياك الله استذي الفاضل ابن مسقط ما في ايا غلبة اخي ما رسا لة الخطا التي تظهر لك وصلت فكرة المشروع عين خير ان شاء الله

السلام عليكم اخي الكريم في البدايه هذا مثال ورفق بكيفية تغيير الكود المودل ولكن اخوي بانسبة للمصفوفات اذا اردت تغيير طول المصفوفة فيتم بالطريقة التالية 'تعريف المصفوفة Global Questions() As String 'سوف يتم اعادة تعريف المصفوفة ReDim Questions(15) As String 'اع…

alsalam 3alaykom on error resume next docmd.close acform, me.name

السلام عليكم اسف أخي الكريم هذا هو الفولدر database.rar

الف مبروك والى الأفضل باذن الله وبارك الله في جهود كل الأخوةوالأخوات القائمين على هذا الموقع

alsalam 3alaykom hay ur file after updating db1.rar

alsalam 3alaykom db111111.rar

السلام عليكم اهلا بك اخوي ابن مسقط اسف لانشغالي عن الرد على على سؤالك الاول فلقد كنت على عجل فكتبت ال methods فقط وانشغلت بعدها لعدة ايام ولكن الاخوة كفوا ووفوا الله يبارك فيهم اولا الله يوفقك بالمشروع ان شاء الله في الملف المرفق باكج اسمها ebnmasqat وبها باكج…

السلام عليكم يعطيك العافية استازتنا زهرة ما شاء الله عليك و بارك الله فيك وخلاكي للغلابا حالاتنا يمكن انت من أكثر اللي بجاوبو على لأسئله ما بتقصري والله ممكن ما فهمتي عليه كويس بانسبه للخطأ لأنه يوجد argument زياده وضع بالخطأ يجب ان يكون DoCmd.OpenReport "REPO…

alsalam 3alaykom Dim DB As Database Set DB = OpenDatabase("data base name") Dim Rec As Recordset Set Rec = DB.OpenRecordset("select f_name from fathers") While Not Rec.EOF Combo1.AddItem Rec(0) Rec.MoveNext Wend Rec.Close DB.Close

السلام عليكم هل هذا طلبك? Dim MinutePrice As Double, dSum As Double Dim lpTime As String lpTime = Text2.Text ' "01:20:50" Dim TimeParts TimeParts = Split(lpTime, ":") For i = 1 To 2 - UBound(TimeParts) ReDim Preserve TimeParts(i + 1) TimeParts(i + 1) = 0 Next …

السلام عليكم ما بعرف الكود الأول ما أخذه صح وما عندي خاصية التعديل بدي أحاول أضعه مرة ثانية <HTML> <HEAD> <title>WebForm1</title> <STYLE> #tblRecords { BORDER-RIGHT: gray 1px solid; BORDER-TOP: gray 1px solid; BORDER-LEFT: gray 1px solid; BORDER-BOTTOM: gray 1…

السلام عليكم اسف على تاخري بالرد لعدم رؤية الرسالة الى مبارح في الليل المهم هذ ال file في جدول يسمح للمستخدم باضافة وحذف صفوف <%@ Page Language="vb script:AddRecord(true)">Add New Row</A> <TABLE ID="tblRecords" BORDER="1" CELLSPACING="0" CELLPADDING="0"> <TR b…

you have to add these methods to the restaurant file public void itemStateChanged(ItemEvent e) {} public void actionPerformed(ActionEvent e) { }

<% Dim Marq Set cn = CreateObject("ADODB.Connection") Dim strConn strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DbName cn.Mode = 3 cn.Open strConn ', strLogin, strPassword sql = "SELECT top 10 * FROM t ORDER BY t.postedDate DESC;" ' use your own …

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

السلام عليكم هي كود لاضافة TextField لل applet import java.awt.*; import java.awt.event.*; public class NewClassaaa extends java.applet.Applet { TextField txtText = new TextField("any thing u write in the new text well be showen here"); Button cmdAddText = new…