Jump to content

pairs

Editor
  • Posts

    2516
  • Joined

  • Last visited

  • Days Won

    24

Posts posted by pairs

  1. [quote name='sk8er_boi' date='19 May 2012 - 07:33 ' timestamp='1337405602' post='1202527']
    ?
    Bak sen?! Ftp'ye shell atılmasını engellemekle ddosu engellemek arasnda nasıl bir bağlantı kurdun acaba? Madem ddosun çözümü var, niye anonymous en büyük siteleri bile kilitleyebiliyor?
    [/quote]


    Adminim benim kendi sitem de hem ddos hemde shell e karşı koruma var.Ddos yapılamıyor.Firma ile alakalı tamamen.isimtescil.net bu işi çok iyi yapıyor.
  2. Bunları metin belgesine yapıştırıp uzantısı reg olacak şekilde kaydet



    [code]Windows Registry Editor Version 5.00

    [HKEY_USERS\S-1-5-21-839522115-1383384898-1417001333-500\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced]
    "TaskbarGlomming"=dword:00000000

    [HKEY_USERS\S-1-5-21-839522115-1383384898-1417001333-500\Software\Microsoft\Windows\CurrentVersion\Explorer]
    "EnableAutoTray"=dword:00000000[/code]
  3. HKU\S-1-5-21-839522115-1383384898-1417001333-500\Software\Microsoft\Windows\CurrentVersion\Explorer\EnableAutoTray: 0x00000000

    bunun değerini sıfır yaparsan etkin olmayan simgeleri gizle seçeneğinin tik'i kalkar 1 yaparsan da gizlenirler.

    HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\TaskbarGlomming: 0x00000000

    değerini sıfır yaparsan hızlı başlat gizlenir 1 yaparsan gözükürler
  4. [code]--###### Fonksiyonumuzu oluşturuyoruz yani VB kodlarımızı yazıyoruz #####---
    strVBSCript = [[

    Function VBScriptTestFunc(strInput)--VBScriptTestFunc adında bir fonksiyon çağırılan veriyi strInput değişkenine atıyor.Gerisi VB kodlaması

    strArgs = Split(strInput,"|",-1,1)--
    NCount = 1
    for each Argument in strArgs

    msgbox("Argument "& NCount &" : "& Argument)
    NCount = NCount + 1
    next

    VBScriptTestFunc = "Bu bir Visual Basic Kodlamasıdır."

    End Function

    ]]


    local ScriptControl = luacom.CreateObject("ScriptControl");--LuaCom plugini ile geçen dersimizde anlattığım gibi Excel dosyası yerine VbScript Controller ekliyoruz.

    if ScriptControl then-- eğer oluşturulduysa

    ScriptControl:setLanguage("VBScript");--scriptin adını VBScripte Çevir bunu autoit felanda yapılabilir denemedim.
    ScriptControl:setAllowUI(true);
    ScriptControl:setSitehWnd(Application.GetWndHandle());
    ScriptControl:AddCode(strVBSCript);--Yukarıdaki strVBSCript fonksiyonumuzu çağırıyoruz unutmayın farklı illerin kodlarını ekleyeceğiniz zaman "[[" ve "]]" arasında kullanın.

    retval = ScriptControl:Run("VBScriptTestFunc","Test Argument 1|Test Argument 2|Test Arguement 3");--Şimdi ise fonksiyonun içindeki VBScriptTestFunc değişkenini çağırdık.
    Dialog.Message("Notice", retval, MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); -- ve sonuç

    ScriptControl = nil;
    collectgarbage()

    end[/code]
×
×
  • Create New...