NOVINKA: Získej 40 hodin praktických dovedností s AI – ZDARMA ke každému akreditovanému kurzu!
Hledáme nové posily do ITnetwork týmu. Podívej se na volné pozice a přidej se do nejagilnější firmy na trhu - Více informací.

Diskuze: "Chybící" soubor run.vbs

Jak se ti líbí článek?
Před uložením hodnocení, popiš prosím autorovi, co je špatněZnaků 0 z 50-500
Jak se ti kurz líbí?
Tvé hodnocení kurzuZnaků 0 z 50-500
Aktivity
Avatar
rikenbekr
Člen
Avatar
rikenbekr:11.11.2016 15:17

Zdravím,
po odvirování počítače mi po startu systému vyskakuje tato (viz obrázek) chybová hláška.
Co je soubor run.vbs?
Má vůbec co dělat na Windowsu 8.1?
I kdyby tam měl být tak určitě není původní protože nw byl proces který se spustil a zobrazoval reklamy.
Můžu ten soubor vymazat?

Zde je obsah souboru run

Set wShell = CreateObject ("Wscript.Shell")

wShell.Run wShell.ExpandEnvironmentStrings("%windir%") & "\system32\userinit.exe"

Dim prog_files
prog_files = wShell.ExpandEnvironmentStrings("%PROGRAMFILES(x86)%")
if(StrComp(prog_files, "%PROGRAMFILES(x86)%") = 0) then
prog_files = wShell.ExpandEnvironmentStrings("%PROGRAMFILES%")
end if

Function HasInternet
        HasInternet = false

        Set wShell = CreateObject ("Wscript.Shell")
        wShell.Run "cmd /c ping 8.8.8.8 -n 1 > %temp%\inet.log", 0, true

        Set fso  = CreateObject("Scripting.FileSystemObject")
        Set file = fso.OpenTextFile(wShell.ExpandEnvironmentStrings("%temp%") & "\inet.log", 1)
        text = file.ReadAll
        file.Close

        fso.DeleteFile wShell.ExpandEnvironmentStrings("%temp%") & "\inet.log"

        if(inStr(text, "=32")) then
                HasInternet = true
        end if
End Function

Function WaitInternet
        Do Until HasInternet
        Loop
End Function

WaitInternet

Dim nw
nw = """" & prog_files & "\ContentPush\app\bin\nw.exe"" """ & prog_files & "\ContentPush\app\app"""

wShell.Run nw, 0
Odpovědět
11.11.2016 15:17
In world without fences and walls, who needs Gates and Windows?
Avatar
Michal Žůrek - misaz
Tvůrce
Avatar
Odpovídá na rikenbekr
Michal Žůrek - misaz:11.11.2016 17:24

je to program, který spouštěl ten vir.

 
Nahoru Odpovědět
11.11.2016 17:24
Avatar
rikenbekr
Člen
Avatar
Odpovídá na Michal Žůrek - misaz
rikenbekr:11.11.2016 17:27

To mi došlo, ale nemá mít jinou funkci?

Nahoru Odpovědět
11.11.2016 17:27
In world without fences and walls, who needs Gates and Windows?
Avatar
Petr Čech
Tvůrce
Avatar
Odpovídá na rikenbekr
Petr Čech:11.11.2016 17:38

Ne, smaž to

Nahoru Odpovědět
11.11.2016 17:38
the cake is a lie
Avatar
rikenbekr
Člen
Avatar
rikenbekr:11.11.2016 17:49

Už se stalo, ale někde jsem četl že ve starších windows byl tento soubor obsažen. (samozřejmě s jiným obsahem)

Nahoru Odpovědět
11.11.2016 17:49
In world without fences and walls, who needs Gates and Windows?
Avatar
Michal Žůrek - misaz
Tvůrce
Avatar
Odpovídá na rikenbekr
Michal Žůrek - misaz:11.11.2016 18:05

to možná byl, ale pokud zrovna nepoužíváš XP nebo nějakou takovou vykopávku, tak ti to může být jedno.

 
Nahoru Odpovědět
11.11.2016 18:05
Avatar
krepsy3
Tvůrce
Avatar
krepsy3:11.11.2016 18:17

mimochodem, ten kód který si zde dal má 40 řádek, a jak vidím, předposlední řádek (39) je prázdný. Ta chybová hláška zobrazuje cosi o tomto řádku :D

Misaz - psal, že má 8.1

Nahoru Odpovědět
11.11.2016 18:17
Programátor je stroj k převodu kávy na kód.
Avatar
rikenbekr
Člen
Avatar
rikenbekr:11.11.2016 18:27

No už jsem to smazal, ale v originálu to byl řádek 39 poslední.

Nahoru Odpovědět
11.11.2016 18:27
In world without fences and walls, who needs Gates and Windows?
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 8 zpráv z 8.