با کد زیر پکیج می گیرم و برنامه را می بندم اما ......
OS.Initialize("OS")
lstname.Initialize
lstpid.Initialize
lstnamepid.Initialize
lstret=OS.RunningAppProcessInfo(lstname,lstpid,lstnamepid)
lstname.Clear
lstname = pm.GetInstalledPackages
For i = 0 To lstname.Size - 1
Dim g As String
g=lstname.Get(i)
If g.Contains("task") = True Then
If lstname.Get(i) = g Then
OS.killBackgroundProcesses(lstname.Get(i))
' OS.killProcess(lstpid.Get(i))
End If
End If
Next
توضیح کامل بدم
OS.Initialize("OS")
lstname.Initialize
lstpid.Initialize
lstnamepid.Initialize
lstret=OS.RunningAppProcessInfo(lstname,lstpid,lstnamepid)
lstname.Clear
lstname = pm.GetInstalledPackages
For i = 0 To lstname.Size - 1
Dim g As String
g=lstname.Get(i)
If g.Contains("task") = True Then
اینجا به عنوان مثال نام پکیج های که کلمه task دارند را می گیره تا اینجا مشکل ندارم
اما برای بستن فقط اولین پکیج نیم می گیره و برنامه را می بنده خوب میگید درسته که ===== اگر تو پکیج نیم ما سه تا پکیج نیم با کلمه task باشه فقط اولی را می بنده اون موقع چه طوری اون دو تا برنامه را ببندیم
منطورم اینه که هر چند تا پکیج نیم که بود همه ای اونا را بگیره و با کد زیر برنامه را ببنده
If lstname.Get(i) = g Then
OS.killBackgroundProcesses(lstname.Get(i))
' OS.killProcess(lstpid.Get(i))
End If
End If
Next
خوب حال شما یه راهنمایی بکنید
سوال دوم
اگر هم راه داره بفرمایید که چطوری همه برنامه های باز یکجا ببندیم و چرا بعضی از برنامه ها را با کد بالا نمیشه بست
سوال
shahan148 28
با سلام و خسته نباشید به دوستان برنامه نویس
با کد زیر پکیج می گیرم و برنامه را می بندم اما ......
OS.Initialize("OS") lstname.Initialize lstpid.Initialize lstnamepid.Initialize lstret=OS.RunningAppProcessInfo(lstname,lstpid,lstnamepid) lstname.Clear lstname = pm.GetInstalledPackages For i = 0 To lstname.Size - 1 Dim g As String g=lstname.Get(i) If g.Contains("task") = True Then If lstname.Get(i) = g Then OS.killBackgroundProcesses(lstname.Get(i)) ' OS.killProcess(lstpid.Get(i)) End If End If Nextتوضیح کامل بدم
OS.Initialize("OS") lstname.Initialize lstpid.Initialize lstnamepid.Initialize lstret=OS.RunningAppProcessInfo(lstname,lstpid,lstnamepid) lstname.Clear lstname = pm.GetInstalledPackages For i = 0 To lstname.Size - 1 Dim g As String g=lstname.Get(i) If g.Contains("task") = True Thenاینجا به عنوان مثال نام پکیج های که کلمه task دارند را می گیره تا اینجا مشکل ندارم
اما برای بستن فقط اولین پکیج نیم می گیره و برنامه را می بنده خوب میگید درسته که ===== اگر تو پکیج نیم ما سه تا پکیج نیم با کلمه task باشه فقط اولی را می بنده اون موقع چه طوری اون دو تا برنامه را ببندیم
منطورم اینه که هر چند تا پکیج نیم که بود همه ای اونا را بگیره و با کد زیر برنامه را ببنده
If lstname.Get(i) = g Then OS.killBackgroundProcesses(lstname.Get(i)) ' OS.killProcess(lstpid.Get(i)) End If End If Nextخوب حال شما یه راهنمایی بکنید
سوال دوم
اگر هم راه داره بفرمایید که چطوری همه برنامه های باز یکجا ببندیم و چرا بعضی از برنامه ها را با کد بالا نمیشه بست
لینک ارسال
به اشتراک گذاری در سایت های دیگر
5 پاسخ به این سوال تاکنون داده شده است
ارسال‌های توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.