Gde ga spusti ?
Prikazujem rezultate 1 do 4 od 4

Tema: Gde ga spusti ?

  1. #1
    MarsSpirit
    Guest

    Podrazumevano Gde ga spusti ?

    Kada bilo koju aplikaciju minimiziram ona nestane, tj. spusti se u pravcu Quick Lunch-a ali je nema u Taskbar-u !?

    Ima li neko neki predlog ?

    Pozdrav, hvala



  2. #2
    Executor
    Guest

    Podrazumevano

    Ja sam imao slican problem sa programom DAMN info, sve sto sam ja uradio to je da sam u Registriju (znas ono:Run-Regedit)pronasao doticni programcin i ceo njegov ulaz obrisao iz registrija.Kad sam ponovo pokrenuo program morao sam ponovo da izvrsim asocijaciju doticnog programa.Ovo ti ne preporucujem posto mislim da imas problem sa Explorerom. Probaj da startujes Windows taskmanager i odatle ugasis Explorer pa ga iz iste Aplikacije podigni ili jednostavno reinstaliraj Windows.

  3. #3
    Obećava
    Učlanjen
    25.03.2004.
    Lokacija
    BeOgR@D
    Poruke
    88
    Reputaciona moć
    51

    Podrazumevano Kuka i motika...

    Citat Original postavio Executor
    Ja sam imao slican problem sa programom DAMN info, sve sto sam ja uradio to je da sam u Registriju (znas ono:Run-Regedit)pronasao doticni programcin i ceo njegov ulaz obrisao iz registrija.Kad sam ponovo pokrenuo program morao sam ponovo da izvrsim asocijaciju doticnog programa.Ovo ti ne preporucujem posto mislim da imas problem sa Explorerom. Probaj da startujes Windows taskmanager i odatle ugasis Explorer pa ga iz iste Aplikacije podigni ili jednostavno reinstaliraj Windows.
    Nije neka konstruktivna ideja (reinstalacija) . U svakom slucaju hvala. Ne moze ovo sto si predlozio. Izgleda je nesto vise prirode. Verovatno je neki kljuc poremecen u Registry-u ali ne znam koji.
    Ako neko ima neku ideju drugu neka mi pomogne.

    Hvala unapred.
    Ivan

  4. #4
    Obećava
    Učlanjen
    25.03.2004.
    Lokacija
    BeOgR@D
    Poruke
    88
    Reputaciona moć
    51

    Podrazumevano kod

    Evo , nasao sam...Sve sto treba da se uradi je da se otkuca ovo u notepadu :
    Citat Original postavio Kod

    Set WSHShell = WScript.CreateObject("WScript.Shell")

    Message = "To work correctly, the script will close" & vbCR
    Message = Message & "and restart the Windows Explorer shell." & vbCR
    Message = Message & "This will not harm your system." & vbCR & vbCR
    Message = Message & "Continue?"

    X = MsgBox(Message, vbYesNo, "Notice")

    If X = 6 Then

    On Error Resume Next

    WshShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Ex plorer\StuckRects2\"
    WshShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Ex plorer\StreamMRU\"
    WshShell.RegDelete "HKCU\Software\Microsoft\Windows\CurrentVersion\Ex plorer\Streams\Desktop\"

    WshShell.RegDelete "HKCU\Software\Microsoft\Internet Explorer\Explorer Bars\{32683183-48a0-441b-a342-7c2a440a9478}\BarSize"

    P1 = "HKCU\Software\Microsoft\Windows\CurrentVersion\Po licies\Explorer\"

    WshShell.RegWrite p1 & "NoBandCustomize", 0, "REG_DWORD"
    WshShell.RegWrite p1 & "NoMovingBands", 0, "REG_DWORD"
    WshShell.RegWrite p1 & "NoCloseDragDropBands", 0, "REG_DWORD"
    WshShell.RegWrite p1 & "NoSetTaskbar", 0, "REG_DWORD"
    WshShell.RegWrite p1 & "NoToolbarsOnTaskbar", 0, "REG_DWORD"
    WshShell.RegWrite p1 & "NoSaveSettings",0,"REG_DWORD"
    WshShell.RegWrite p1 & "NoToolbarsOnTaskbar", 0, "REG_DWORD"
    WshShell.RegWrite p1 & "NoSetTaskbar",0,"REG_DWORD"
    WshShell.RegWrite p1 & "NoActiveDesktop",0,"REG_DWORD"
    WshShell.RegWrite p1 & "ClassicShell",0,"REG_DWORD"

    p1 = "HKCU\Software\Microsoft\Windows\CurrentVersion\Gr oup Policy Objects\LocalUser\Software\Microsoft\Windows\Curre ntVersion\Policies\Explorer\"

    WshShell.RegWrite p1 & "NoCloseDragDropBands", 0, "REG_DWORD"
    WshShell.RegDelete p1 & "NoMovingBands"

    p1 = "HKLM\Software\Microsoft\Windows NT\CurrentVersion\Winlogon\Shell"

    WshShell.RegWrite p1, "explorer.exe", "REG_SZ"

    p1 = "HKCU\Software\Microsoft\Internet Explorer\Explorer Bars\{32683183-48a0-441b-a342-7c2a440a9478}\"
    WshShell.RegDelete p1 & "BarSize"
    WshShell.RegWrite p1, "Media Band", "REG_SZ"

    On Error Goto 0

    For Each Process in GetObject("winmgmts:"). _
    ExecQuery ("select * from Win32_Process where name='explorer.exe'")
    Process.terminate(0)
    Next

    MsgBox "Finished." & vbcr & vbcr & "© Kelly Theriot and Doug Knox", 4096, "Done"

    Else

    MsgBox "No changes were made to your system." & vbcr & vbcr & "© Kelly Theriot and Doug Knox", 4096, "User Cancelled"

    End If
    snimi sa ekstenzijom .vbs i pokrene isti fajl.

    Pozdrav

Pravila za slanje poruka

  • Ne možete kreirati novu temu
  • Ne možete poslati odgovor
  • Ne možete dodati priloge
  • Ne možete prepraviti svoju poruku
  •