تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
محتاجة كود لأرسال رسائل نصية لأرقام موجوده داخل DataGrid بدلا Texbox البرنامج مرفق
#1
السلام عليكم اخواني 

احتاج كود للتالي :


اولا :
تحديد الكل من خلال الضغط ع  Button تحديد الكل 
تحديد ألكل ............ True يسهل عمليه تحديد جميع الارقام بضغطه واحدة




ثانيا :

عند الضغط على ارسال رساله يتم الارسال لجميع الأرقام الموجودة داخل الحقل Number في حاله ان تم تحديد الرقم من خلال الحقل Selected يتم ارساله الرساله للأرقم الموجودة داخل الداتا جيردفيو بدلا من استخدام حقل الأرقام المسمى بي txtNumbers

في حال تحقق شرط التحديد True

سابقا كنت استخدم  الحقل txtNumbers
 لارسال الرسائل ......... وكتابة الارقم بشكل كلي داخل الحقل

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

الصورة توضح الشرح .... تم ارفاق المشروع


الملفات المرفقة صورة/صور
   

.rar   Sms.rar (الحجم : 194.19 ك ب / التحميلات : 82)
الرد }}}
تم الشكر بواسطة:
#2
للتحديد السريع
PHP كود :
       For r 0 To d.Rows.Count - (IIf(d.AllowUserToAddRows21))
 
           d.Rows(r).Cells(1).Value 1
        Next 

الرقم 1 هو رقم العمود  لكن حسب الصورة حيكون رقمه 2
d = datagridview
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
الرد }}}
تم الشكر بواسطة: رهف العريفي
#3
مشكور اخي سعود جزاك الله خير

كيف اقدر ارسل رساله لجميع الارقام المسجلة واستخدام ال DataGridviwe الحقل Number بدلا من ال Textbox وكتابة الرقم بشكل فردي
الرد }}}
تم الشكر بواسطة:
#4
(14-05-16, 08:22 AM)رهف العريفي كتب : مشكور اخي سعود جزاك الله خير

كيف اقدر ارسل رساله لجميع الارقام المسجلة واستخدام ال DataGridviwe  الحقل Number  بدلا من ال Textbox  وكتابة الرقم بشكل فردي

هل الدالة  تستقبل ارقام عديدة وتتعامل معهم بشكل خاص؟؟
ام المطلوب رقم واحد لكل عملية ارسال؟؟

على كل حال قبل الارسال هذا الكود انظر رايك فيه
PHP كود :
       'NumberDataGridView
        For r = 0 To NumberDataGridView.Rows.Count - (IIf(NumberDataGridView.AllowUserToAddRows, 2, 1))
            If NumberDataGridView.Rows(r).Cells(2).Value <> 0 Then
                '
يوجد حقل على الاقل محدد بشبيكة البيانات

                
'مربع الرسالة فقط لعرض التي تم تحديدها
                ' 
 MsgBox(NumberDataGridView.Rows(r).Cells(1).Value)
 
           Else
                
'لا يوجد شيء محدد في شبيكة البيانات
                ' 
MsgBox("لم يتم تحديد شيء")

 
           End If
 
       Next 
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
الرد }}}
تم الشكر بواسطة: رهف العريفي
#5
المطلوب ارسال رساله لجميع الأرقام الموجودة داخل الحقل والتعامل معاهم بالترتيب بدأ من اولا رقم مسجل الى اخر رقم مسجل

الحين اذا جيت ارسل رساله لازم اكتب الرقم بال txtNumbers ثم ارسال

ومن ثم امسح الرقم واقوم بكتابة الرقم البعده ومن ثم امسح الرقم واقوم بكتابة الرقم الي بعده وهكذا انا اريد ان تكون العملية تلقائية بتحديد الارقام داخل حقل الداتا جيرد فيو وارسال نفس الرساله لها بشكل تلقائي بدلا من عمليه حذف الرقم وكتابة الرقم الذي يليه

المطلوب بضغطه ذر واحدة اقدر اتعامل مع جميع الارقام الي انا اخترتها كأنها انكتبت على txtNumbers لحالها
الرد }}}
تم الشكر بواسطة: العزابي
#6
اذا الكود اللي كتبته يفي بالغرض لكن لابد من استخدام  مسار مستقل للارسال ولنستخدم backgroundworker
على كل حال هذا هو الاجراء:
PHP كود :
       'NumberDataGridView
        For r = 0 To NumberDataGridView.Rows.Count - (IIf(NumberDataGridView.AllowUserToAddRows, 2, 1))
            If NumberDataGridView.Rows(r).Cells(2).Value <> 0 Then
                '
يوجد حقل على الاقل محدد بشبيكة البيانات
                
'مربع الرسالة فقط لعرض التي تم تحديدها
                ' 
 MsgBox(NumberDataGridView.Rows(r).Cells(1).Value)

 
               'الان يتم الارسال مباشرة دون الاسناد لمربع النص المخصص للارقام
                Dim t As String = SendMessage(TxtUserName.Text, TxtPassword.Text, ConvertToUnicode(txtMessage.Text), TxtSender.Text, NumberDataGridView.Rows(r).Cells(1).Value)
                ShowResult(t)
            Else
                '
لا يوجد شيء محدد في شبيكة البيانات
                
' MsgBox("لم يتم تحديد شيء")
            End If
        Next 
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
الرد }}}
تم الشكر بواسطة: العزابي


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  لماذا البرنامج يتوقف بدل عرض رسالة الخطأ justforit 0 98 07-12-25, 10:22 AM
آخر رد: justforit
  جهاز ارسال رسائل SMS من خلال برنامج فيجوال بيسك جيولوجي مبتدئ 4 1,012 05-09-25, 12:37 PM
آخر رد: جيولوجي مبتدئ
  [سؤال] طريقة توسيط النص داخل اداة comboBox سمير1404 7 3,854 24-08-25, 01:01 PM
آخر رد: أبو خالد الشكري
  كيفية حفظ إعدادات البرنامج بحيث لا تتغير أحمد إبراهيم سعد 4 2,996 06-08-25, 06:34 PM
آخر رد: Taha Okla
  [سؤال] تغيير الفورم الرئيسي عند تشغيل البرنامج في Visual Studio مع .NET 8؟ silverlord 2 648 09-03-25, 03:52 AM
آخر رد: silverlord
Rainbow [VB.NET] عدد من هم فاتحي البرنامج محمد مسافر 1 412 25-02-25, 07:58 PM
آخر رد: princelovelorn
  ارجو تعديل الكود جلب البيانات عن طريق اجراء مخزن - مرفق مثال new_programer 0 619 05-02-25, 01:51 AM
آخر رد: new_programer
  استفسار عن حمايه البرنامج ahmedramy 1 548 25-12-24, 11:07 PM
آخر رد: aljzazy
  مساعدة في عمل جملة الاتصال في ملف خارج البرنامج Emam emam 2 377 25-11-24, 09:24 PM
آخر رد: Emam emam
  استدعاء من جدولين داخل اداه FlowLayoutPanel برجاء الافادة للضرورة جداً modymody300894 7 624 15-11-24, 11:02 AM
آخر رد: modymody300894

التنقل السريع :


يقوم بقرائة الموضوع: