تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] ساعدوني ياشباب - اختصار التكرار
#1
سلام عليكم ورحمة الله وبركاته ..

اخواني انا بعاني من مشكلة عدم اختفاء الـ cmd  وحليت المشكلة كما ترون في الكود ..
بس مشكلة ... مااعرف اجعل الامر في سطر واحد .. قمت بوضع اكثر من سطر وتغير المتغير ..
وهذه الطريقة  متعبة جدا .. بحيث ان الاكواد .. اكثر من اللي في الصورة ..
ارجو  من المحترفين مساعدتي في اختصار الاوامر ...
يعني مثلا دمج المتغيرات .. ps1 >> ps2 >> ps3
او اي طريقة تختصر على الشغل . الله يعطيكم العافية .


الكود vb.net >>>

الرد
تم الشكر بواسطة:
#2
ننتظر المساعدة
الرد
تم الشكر بواسطة:
#3
وعليكم السلام ورحمة الله وبركاته
بغض النظر عن الفكرة الاساسية لديك.
ضع الاوامر في مصفوفة وقم باستخدام For لتنفيذ تلك الاوامر.
[صورة مرفقة: q.jpg]
الرد
تم الشكر بواسطة:
#4
اخوي سعود اشرح لي تكفى Sad
الرد
تم الشكر بواسطة:
#5
اكتب الاوامر بملف نصي وارفعه او اكتبه ضمن المشاركة عشان اجهز مثال
[صورة مرفقة: q.jpg]
الرد
تم الشكر بواسطة:
#6
(02-12-20, 03:26 PM)سعود كتب : اكتب الاوامر بملف نصي وارفعه او اكتبه ضمن المشاركة عشان اجهز مثال

هذي الاوامر اخوي سعود رفعتها


الاوامـــــــــــــــــــــر
الرد
تم الشكر بواسطة:
#7
عرف متغير على مستوي الفورم
PHP كود :
Dim lst As New List(Of String

ثم عند تحميل الفورم اكتب الاسنادات:
PHP كود :
       lst.Add("/c taskkill.exe /f /t /im tp3helper.dat")
 
       lst.Add("/c taskkill.exe /f /t /im androidemulator.exe")
 
       lst.Add("/c taskkill.exe /f /t /im aow_exe.exe"
ثم بحدث زر تكتب
PHP كود :
Dim i As Integer
        For i 
0 To lst.Count 1
            Dim ps1 
As New ProcessStartInfo("cmd.exe"lst(i))
 
           ps1.WindowStyle ProcessWindowStyle.Hidden
            Process
.Start(ps1)
 
       Next 
لم اجرب التشغيل لا اظن البرامج لدي والله اعلم لكن باذن الله فيها المطلوب خصوصا انك تود الاختصار فقط.

تم تحديث المشاركة .
[صورة مرفقة: q.jpg]
الرد
تم الشكر بواسطة: ابو روضة , ابو روضة
#8
(02-12-20, 03:43 PM)سعود كتب : عرف متغير على مستوي الفورم
Dim lst As New List(Of String)

ثم عند تحميل الفورم اكتب الاسنادات:
PHP كود :
       lst.Add("/c taskkill.exe /f /t /im tp3helper.dat")
 
       lst.Add("/c taskkill.exe /f /t /im androidemulator.exe")
 
       lst.Add("/c taskkill.exe /f /t /im aow_exe.exe"
ثم بحدث زر تكتب
PHP كود :
Dim i As Integer
        For i 
0 To lst.Count 1
            Dim ps1 
As New ProcessStartInfo("cmd.exe"lst(i))
 
           ps1.WindowStyle ProcessWindowStyle.Hidden
            Process
.Start(ps1)
 
       Next 
لم اجرب التشغيل لا اظن البرامج لدي والله اعلم لكن باذن الله فيها المطلوب خصوصا انك تود الاختصار فقط.



خطأ ..  هل يمكن ان ترفق السورس ؟
هذا رابط السورس الخاص بي ...  هنا



الرد
تم الشكر بواسطة:
#9
راجع مشاركتي بشكل جيد ففيه خطوتين لم تكتبهم بل كررت خطوة واحدة.
[صورة مرفقة: q.jpg]
الرد
تم الشكر بواسطة: XVIMTO
#10
(02-12-20, 04:00 PM)سعود كتب : راجع مشاركتي بشكل جيد ففيه خطوتين لم تكتبهم بل كررت خطوة واحدة.

اي صح ي سعود يالبى قلبك ي شيخ ..
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  السلام عليك مشكل في رقم التسجيل برنامج المكتبة ساعدوني ارجوكم crazykinko 0 101 15-01-21, 04:55 PM
آخر رد: crazykinko
  عمل اختصار لمجلد ابو روضة 5 175 08-01-21, 06:37 AM
آخر رد: ابو روضة
Exclamation [VB.NET] مطلوب كود إنشاء اختصار لمجلد بعيد على محرك الأقراص الC لدي abomo3ath 0 307 10-08-20, 03:00 PM
آخر رد: abomo3ath
  [كود] اريد التعديل على الكود وهو عدم التكرار عمور2016 3 468 23-07-20, 01:03 AM
آخر رد: عبد العزيز البسكري
  ياشباب محتاج كود صغير يقوم بالبحث عن حقل معين فلتر بال Datagridview moh61 13 4,602 21-07-20, 11:48 PM
آخر رد: alessam4pro
  [VB.NET] ساعدوني رجاء في تعديل مشروعي tahaayyoub 0 340 09-06-20, 02:09 AM
آخر رد: tahaayyoub
  [VB.NET] سؤال حول التكرار farfour 2 497 23-05-20, 09:18 PM
آخر رد: farfour
  مشكلة التكرار في الكريستل ريبورت makky 10 1,903 20-05-20, 08:48 AM
آخر رد: zinom
  السلام عليكم ممكن مساعده معلش ياشباب ؟ modywassemmody 1 436 28-03-20, 06:37 PM
آخر رد: ابراهيم ايبو
  ياشباب ازاي استخدام ملف xmlكقاعده بيانات ؟؟ modywassemmody 2 557 17-03-20, 02:23 PM
آخر رد: modywassemmody

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


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم