windows script host

[x.raver]

nějaký jiný zdroj na tento program?
nemohu se tam dostat:
Forbidden
You don't have permission to access /download/HostsXpert.zip on this server.

Additionally, a 403 Forbidden error was encountered while trying to use an ErrorDocument to handle the request.

[Reklama]

[x.raver]

už to jde

[jaro3]

Omylem jsem tam dal špatný odkaz ale hned přepsal.

[x.raver]

Po kroku "restore" nevidím možnost "replace", pouze "make read only", "backup/restore" a "import options".
Mám tedy dát rovnou make read only?

[Uziv00]

Ahoj,
zkusím se do toho vložit... Stáhni si process explorer http://technet.microsoft.com/cs-cz/sysi ... 96653.aspx .
Jak vybafne ta hláška, neuzavírej ji a spusť process explorer. Najdi položku wscript. Najeď na ni myší. Zobrazí se ti cesta ke skriptu - Command Line - (viz obrázek) . Skript otevři v poznámkovém bloku, ulož jako txt soubor a vlož sem. Případně postačí v tom notepadu označit vše a kód vložit sem do "Code". Podívám se co to je zač.

[x.raver]

Ahoj, diky za zájem.
Mám ten textový soubor, ale nevím, jak ho sem vložit. Příloha k odpovědi nepovoluje ".txt" a celý kód
se do odpovědi nevejde. Co mám udělat?

[Uziv00]

Dej ho třeba na leteckou poštu a odkaz vlož sem.

[x.raver]

http://leteckaposta.cz/816213450

[Uziv00]

Máš poslat ten soubor co je v tom Command Line a ne ten exáč! Podle mého obrázku by to byl "ProTechNew.vbs"!
Kód může vypadat nějak takto:

Kód: Vybrat vše

'****************************************************
'*        Skript zazipuje dva adresáře              *   
'****************************************************
'*           Vytvořeno pro PC-HELP                  *
'*            Etienn@Script v 1.0                   *
'****************************************************



Option Explicit
Dim fso, winShell, adr1, adr2, CilFile, file

Set fso = CreateObject("Scripting.FileSystemObject")
Set winShell = createObject("shell.application")
adr1 = "C:\temp1"
adr2 = "D:\temp2"
CilFile = "D:\archivecek.zip"

Set file = fso.CreateTextFile(CilFile, True)
file.write("PK" & chr(5) & chr(6) & string(18,chr(0)))
file.close

winShell.NameSpace(CilFile).CopyHere winShell.NameSpace(adr1).Items
do until winShell.namespace(CilFile).items.count = winShell.namespace(adr1).items.count
    wscript.sleep 1000
Loop

winShell.NameSpace(CilFile).CopyHere winShell.NameSpace(adr2).Items
do until winShell.namespace(CilFile).items.count = winShell.namespace(adr2).items.count
    wscript.sleep 1000
Loop

Set winShell = Nothing
Set fso = Nothing

=> bude to normální text.
A pro jistotu mi sem dej i ten command line. Tedy tohle:

Kód: Vybrat vše

"C:\WINDOWS\System32\WScript.exe" "C:\Documents and Settings\All Users\Nabídka Start\Programy\Po spuštění\ProTechNew.vbs"

Jinak na vysvětlenou - podle příkladu - Vlastní skript je "ProTechNew.vbs". WScript.exe je program, který skripty provádí.

[jaro3]

Po kroku "restore" nevidím možnost "replace", pouze "make read only", "backup/restore" a "import options".
Mám tedy dát rovnou make read only?

Jo.

[x.raver]

Sorry, jsem v tomto celkem lama :)

takže na tento soubor odkazuje cesta C:\WINDOWS\inf\ntvdm.vbe

http://leteckaposta.cz/492337791

což ale také není normální text

pak tam byl ještě soubor se stejným názvem ale koncovkou .inf pro jistotu také přikládám

http://leteckaposta.cz/680346761

[x.raver]

to jaro3:
to jsem udělal a nepomohlo...