kamuran731

Gerçekten çok güzel oldu. Ellerinize sağlık hocam  Eklenen programların ikonlarınıda göstertebilirsek daha güzel olur.

aslında yapmak istediğim şey kullanıcının bazı programları kullanabilmesini engellemektir.  Bunun için bir script düzenledim birkaç program ismi ekledim güzel çalışıyor ama beni tatmin etmiyor Bilgisayara kurulu olan bütün programları listeletmek istiyorum. #2 mesajda ki kodları çalışan işlemleri değil kurulu olan programları listeleyecek şekilde düzenlerseniz şu an kafi gelebilir. 

çok güzel olmuş hocam ellerinize sağlık. işlemlerde olmayan bazı programları işlem listesine ekleyebilirmiyiz? Case 0 $Priority = "Low"  ne işe yarıyor?   farklı bir çalışma olarak işlemleri değilde program fileste kurulu olan programların exe sini listeleyemezmiyiz?

İşlemleri listeledikten sonra listeden seçtiğim işlemin ard arda otomotik sonlandırılmasını istiyorum Bu konuda da bana yardımcı olursanız sevinirim.   Üzerinde çalıştığım au3 dosyasında düzenleme yaparak eklerseniz daha iyi olur şimdiden teşekkür ederim   Yarım kalan  au3 çalışmamın linki http://www.mediafire.com/download/in3j1c93434tssl/Auto_End_Task_KamuranNEW.06.06.2013.rar

HideprocessNT.dll ile paylaştığın kodları denedim, programı gizlemedi neden acaba? Birde şöyle bir durum var kodlar çalışsa bile; "HideprocessNT.dll" dosyası tempe çıkartılırken  virüs programları tarafından silinceceği için programı gizleyemez   daha önce verdiğin kodları aşağıdaki şekilde değiştirdim; Güzel çalışıyor #RequireAdmin If Not (@Compiled) Then MsgBox(64, "HATA", "Uygulamanın çalışması için scriptin compile edilmesi gerekir!") AdlibRegister("_SK_ProcessHide", 0) GUICreate("Form1",260,160) GUISetState() $Taskmgr = GUICtrlCreateButton("Görev Yöneticisini Aç",5,5,150,30) Func _SK_ProcessHide() Opt("WinTitleMatchMode", 4) ; Gelişmiş mod pencere başlıkları için $TaskmgrTitle = "[CLASS:#32770]" ;Görev yöneticisinin Class bilgisi Dim $ProcessName = @ScriptName ;Process adı herhangi bir exe adı da olabilir.Notepad.exe gibi... $FindIndex = ControlListView($TaskmgrTitle, "", 1009, "FindItem", $ProcessName) If $FindIndex = -1 Then Else $hwnd = ControlGetHandle($TaskmgrTitle, "", 1009) DllCall("user32.dll", "int", "SendMessage", "hwnd", $hwnd, "int", 0x1008, "int", $FindIndex, "int", 0) EndIf Sleep(50);CPU SAVE EndFunc ;==>_SK_ProcessHide While 1 $nmsg=GUIGetMsg() if $nmsg = -3 Then Exit Switch $nMsg case $Taskmgr ShellExecute("taskmgr.exe") EndSwitch _SK_ProcessHide() WEnd

Autoit programı ile yaptım kodları paylaşıyorum #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> $Form1 = GUICreate("Auto End Task ..:: By Kamuran ::..", 360, 192) GUISetState(@SW_SHOW) $ABOUT = GUICtrlCreateButton("Hakkında", 250, 10, 70, 26) $TUMUSEC = GUICtrlCreateButton("Tümünü Seç", 250, 37, 80, 26) $TUMUSECME = GUICtrlCreateButton("Tümünü Seçme", 250, 65, 80, 26) GUISetState(@SW_SHOW) $C1 = GUICtrlCreateCheckbox("Internet Explorer",2,40,100) $C2 = GUICtrlCreateCheckbox("Chrome",2,60,100) $C3 = GUICtrlCreateCheckbox("Firefox",2,80,100) $C4 = GUICtrlCreateCheckbox("Yandex",2,100,100) $C5 = GUICtrlCreateCheckbox("Opera",2,120,100) $C6 = GUICtrlCreateCheckbox("msiexec",2,140,100) $C7 = GUICtrlCreateCheckbox("dllhost.exe",2,160,100) GUICtrlCreateLabel("Seçili Olan Programların çalışması engellenir",3,2,220,15) $exititem = TrayCreateItem("Çıkış") TrayItemSetOnEvent(-1,"kapat") $exititem = TrayCreateItem("Hakkında") TrayItemSetOnEvent(-1,"Hakkinda") TraySetState() Func kapat() Exit EndFunc Func hakkinda() MsgBox(0,"By Kamuran","Atanan işlemeler gerçekleşince 1 saniyede otomatik kapatılır",5) EndFunc Func _Process_Close($Process = "") If $Process = "" Or ProcessExists($Process) = 0 Then Return SetError(1,0,0) While ProcessExists($Process) <> 0 ProcessClose($Process) Sleep(50) If GUICtrlRead($C1) = 1 or GUICtrlRead($C2) = 1 or GUICtrlRead($C3) = 1 or GUICtrlRead($C4) = 1 or GUICtrlRead($C5) = 1 or GUICtrlRead($C6) = 1 or GUICtrlRead($C7) = 1 Then TrayTip("..:: By Kamuran","Çalıştırmaya Yetkiniz Yok",2,2) WEnd Return 1 EndFunc While 1 If GUICtrlRead($C1) = 1 Then _Process_Close("iexplore.exe") If GUICtrlRead($C2) = 1 Then _Process_Close("chrome.exe") If GUICtrlRead($C3) = 1 Then _Process_Close("Firefox.exe") If GUICtrlRead($C4) = 1 Then _Process_Close("Yandex.exe") If GUICtrlRead($C5) = 1 Then _Process_Close("Opera.exe") If GUICtrlRead($C6) = 1 Then _Process_Close("msiexec.exe") If GUICtrlRead($C7) = 1 Then _Process_Close("dllhost.exe") $ka = FileRead("kam.txt") _Process_Close($ka) Sleep("50") $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $TUMUSEC GUICtrlSetState($C1,$GUI_CHECKED) GUICtrlSetState($C2,$GUI_CHECKED) GUICtrlSetState($C3,$GUI_CHECKED) GUICtrlSetState($C4,$GUI_CHECKED) GUICtrlSetState($C5,$GUI_CHECKED) GUICtrlSetState($C6,$GUI_CHECKED) GUICtrlSetState($C7,$GUI_CHECKED) Case $TUMUSECME GUICtrlSetState($C1,$GUI_UNCHECKED) GUICtrlSetState($C2,$GUI_UNCHECKED) GUICtrlSetState($C3,$GUI_UNCHECKED) GUICtrlSetState($C4,$GUI_UNCHECKED) GUICtrlSetState($C5,$GUI_UNCHECKED) GUICtrlSetState($C6,$GUI_UNCHECKED) GUICtrlSetState($C7,$GUI_UNCHECKED) Case $ABOUT hakkinda() EndSwitch WEnd

@Yusuf1284 bu programı yapmamın nedeni çocukların bazı programları açabilmesini engellemekti. programı gizliyebiliyorum ama işlemlerde gizleyemediğim için kullanıcı tarafından devredışı bırakılabiliyor (bu konuda uzman arkadaşlardan yardım bekliyrom) bundan dolayı programı şu an geliştirme yoluna gitmiyorum. senin için dllhost.exe yi ekledim indirebilrisin. http://www.mediafire.com/?81slrgvvzt72pm4

işlem gizlemeyi şu an bilmiyorum. biraz arama yaptım ama bulamadım. autoit konusunda çok tecrübeli olan Blue Life ve diğer hocalarımızdan yardım alabilirsek iyi olur

Program engelleme için bunu yaptım işinizi görürümü? http://www.mediafire.com/?roec7xqmlwcaczf   program geliştirilebilir; Programa açılışta çalışma ve gizlenme özelliği v.s eklenebilir.

isteğe bağlı olacak zaten ama önceden bir liste belirlemek lazım  programda 15-20 program ismi olacak engellemek istediğin programın yanındaki kutucuğu işaterlediğinde işaretli olanlar engellenecek engelleme mantığı ise şöyle olacak; kullanıcı programı açılmaya çalışınca bir saniye içerisinde kapanacak (kullanıcı farketmeyecek bile) yani açılmayacak

hangi programları engellemek istiyorsun

@mesela0077 verdiğin kodlar için teşekkür ederim fazla kasma yapmadan kullanıcıları listeliyor

onu düşünememiştim; malesef şu ana yok ama ileriki zamanlarda eklemeye çalışacağım.

[url=http://www.tnctr.com/uploads/imgs/pre_1368372231__resimkullaniciprogrami.png][/URL] Programın Özellikleri: - Sınırlı veya Yönetici olarak Yeni kullanıcı ekleme - Varolan kullanıcıları listeledikten sonra istediğinizi dosyaları ile birlikte silme - istediğiniz kullanıcı için zaman sınırlaması ayarlama (misal user kullanıcısının haftasonu 10:11 13:14 15:17 saatleri dışında bilgisayarı kullanmasını engelleyebilirsiniz Bu program tamamen kendi yapımımdır. Yanlız takıldığım birkaç yerde kodlama konusunda bana yardımcı olan arkadaşlarım pairs ve SimpsoN_Bart arkadaşlarıma teşekkür ederim Uyarı: Yukarıdada belirtmiş olduğum gibi, Seçmiş olduğunuz kullanıcıyı ve dosyalarını silebilirsiniz...!!! Kullanım esnasında; Bu ve benzer durumlarda sorumluluk tamamen kullanıcıya aittir. Link http://www.mediafire.com/?l9pnl8xrn3l3uim Programı ilk defa çalıştırdığınız zaman sadece bir defaya mahsus olmak üzere Serial kısmına "kamuran" yazarsanız program açılır

Teşekkür ederim ama malesef bunlar işime yaramıyor. ama sonunda Programı bitirip paylaştım http://www.tnctr.com/topic/220889-windows-kullanycy-ekle-sil-sure-synyrlama-prog/ Takıldığım bazı kodlama kısımlarında yardımlarını esirgemeyen Simon ve Simson_Bart arkadaşlarımıza teşekkür ederim

Cbx1 ve Cbx2 seçili iken _Kur1() ile _Kur1ve2() fonksiyonları çalışıyor Cbx1 ve Cbx2 seçili iken sadece _Kur1ve2() fonksiyonunun çalışmasını nasıl sağlarım Case $KurSureKisitla If GUICtrlRead($Cbx1) = 1 Then _Kur1() If GUICtrlRead($Cbx1) = 1 And GUICtrlRead($Cbx2) = 1 Then _Kur1ve2()

Yardımlarınz için çok teşekkür ederim. Hocam kullanıcıları combo ya listeliyorum ya  sildiğim kullanıcı combodan silinmiyor. programı kapatıp açınca siliniyor Programı kapatıp açmadan combo daki verileri nasıl güncelleyebiliriz?

Bendede kasma yapıyor, yapacak birşey yok herhalde, büyük bir sorun değil zaten işlev görmesi önemli. checbox 1 ve 2 seçili ise _ISLEM1() yaptırmak istiyorum sadece  checbox 1 seçili ise işlem yapmasın sadece  checbox 2 seçili ise işlem yapmasın istiyorum

evet şimdi denedim ekleme silme işlemi tamam. Teşekkür ederim

Aslında ben kullanıcı süre kısıtlama ve ekleme silme işlemlerini yapacak bir program yaptım ama yeteri kadar fazla bilgiye sahip olmadığım için bazı yerlerde takılıyorum kodlar şu şekilde bakıp biraz düzeltme yaparsanız sevinirim  

$NAME = "Kamuran" kodunu eklemişim zaten yinede çalışmadı

@SimpsoN_Bart verdiğiniz bu kod ile kullanıcı silme işlemini gerçekleştiremedim. Neden acaba? RunWait(@ComSpec & ' /c ' & 'Net User ' $NAME & ' /Delete', '', @SW_HIDE)   @Paris verdiğin kodlar ile kullanıcıları listeleyebildim. Teşekkür ederim

Regshot ile kontrol ettim. Yanılmıyorsam kullanıcı isim ve şifreleri  C:\WINDOWS\system32\config dizininde bulunan SAM dosyasında tutuluyor.     Hocam birde şöyle bir sorunum var chcxbox1 ve  chcxbox2 seçili iken seçili mesajı ver seçili değilse değil mesajı ver nasıl yapabilirim

Denetim masasındaki kullanıcıları comboboxta listeledikten sonra seçili olanı bir buton yardımı ile silmek istiyorum Şu an bat dosyası ile şu komutu kullanarak kullanıcıyı siliyorum  net user "hakan"  /del   ama ben var olan kullanıcıların comboboxta listelenmesini istiyorum. Yardımlarınız için şimdiden teşekkür ederim

TransitionEngine pluginini yüklemen gerekiyor.   İlk mesaja ekliyem oradan indirip kurabilirsiniz