[es] - Rar with password

dava
Banja Luka

Član broj: 27208
Poruke: 893

+384 Profil

Rar with password

^{17.09.2007. u 10:13 - pre 202 meseci}

Potreban mi je dio koda ili neke smjernice za pakovanje fajla u rar arhivu sa password-om. Kako bi se to moglo izvesti.

SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'

Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
195.252.105.*

+7 Profil

Re: Rar with password

^{17.09.2007. u 11:59 - pre 202 meseci}

Sastavio sam ti VB6 primer (5 , 6 linija koda)
Imas i iskompajlovan exe a objasnjenja su u kodu.
Pozdrav
(prvo raspakuj zip fajl)

HomePage http://www.eurora3d.com

Prikačeni fajlovi

ESWinRarPrimer.zip - 6.54k

Odgovor na temu

dava
Banja Luka

Član broj: 27208
Poruke: 893

+384 Profil

Re: Rar with password

^{17.09.2007. u 12:24 - pre 202 meseci}

Mozda grijesim, ali meni ne radi tvoj kod.

Do sad sam koristio komandu winrar-a za cmd:

Code:

'Shell "cmd /k c:\progra~1\winrar\rar a c:\baza.rar c:\baza.jpg -p[password] > 0", vbNormalFocus

ali me nerviralo sto prozor cmd-a ostane otvoren, a onda sam pronasao ovo:

Code:

Sleep 2000
SendKeys "EXIT"
Sleep 2000
SendKeys "{Enter}", True

a na to Kaspersky reaguje kao Invader (Loader).

SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'

Odgovor na temu

dava
Banja Luka

Član broj: 27208
Poruke: 893

+384 Profil

Re: Rar with password

^{18.09.2007. u 07:14 - pre 202 meseci}

Da li postoji vb-ova komponenta za pakovanje?

SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'

Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
195.252.105.*

+7 Profil

Re: Rar with password

^{19.09.2007. u 00:41 - pre 202 meseci}

Vidim da si ti za svoju verziju WinRar-a stavljao -p na kraju.
Probaj da promenis CommandLine string u kodu

Code:

CommLine = "a " & He & txtPassword.Text & " " & Archive & " " & App.Path & "\File1.txt" & " " & App.Path & "\File2.txt" 'stari
CommLine = "a " & Archive & " " & App.Path & "\File1.txt" & " " & App.Path & "\File2.txt" & " " & He & txtPassword.Text 'novi

Meni radi u oba slucaja s tim da u ovom drugom u arhivi pravi sve foldere (putanju) od C:\ drajva do fajla (npr u arhivi je prvo npr Files pa u njemu VB pa unutra fajl koji je kompresovao) tako da je prva linija bolja.
Inace zadnji parametar ShellExecute WinApi funkcija odredjuje kako ce pozvani program da se otvori (ako ima GUI) .0 je sakriven a to tebi treba.

Citat:

dava: Mozda grijesim, ali meni ne radi tvoj kod.

Do sad sam koristio komandu winrar-a za cmd:

Code:

'Shell "cmd /k c:\progra~1\winrar\rar a c:\baza.rar c:\baza.jpg -p[password] > 0", vbNormalFocus

ali me nerviralo sto prozor cmd-a ostane otvoren

Mozda gresis

(a mozda i ne). Zadnji parametar ovog tvog reda odredjuje kako ce cmd prozor da se otvori
Ako hoces sakriven stavi vbHide

Code:

'Shell "cmd /k c:\progra~1\winrar\rar a c:\baza.rar c:\baza.jpg -p[password] > 0", vbHide

Pozdrav

HomePage http://www.eurora3d.com

Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
195.252.105.*

+7 Profil

Re: Rar with password

^{19.09.2007. u 12:05 - pre 202 meseci}

Ovo ti nisam napisao prosli put
Sa

Code:

Shell "cmd /k c:\progra~1\winrar\rar a c:\baza.rar c:\baza.jpg -p[password] > 0", vbHide

cmd.exe ostaje aktivan (ali nevidljiv) posle izvrsenja komande (to mozes da vidis u Task manageru).
Tako da ti je Api funkcija iz predhodnog odgovora bolje resenje.
Pozdrav

HomePage http://www.eurora3d.com

Odgovor na temu

dava
Banja Luka

Član broj: 27208
Poruke: 893

+384 Profil

Re: Rar with password

^{19.09.2007. u 14:01 - pre 202 meseci}

Rijesio sam jos jutros sa tvojom API f-jom, jucer se nisam dovoljno posvetio. Sto se tice vbHide, to mi je poznato ali mi nije rjesenje jer kao sto kazes ostaje u memoriji, u memoriji racunara koji se nikad ne gasi, zamisli ga nakon mjesec-dva.
Pokusao sam sa redirekcijom izlaza u fajl umjesto na prozor ali nije pomoglo, povratne informacije je svarno upisao u fajl, ali se prozor ipak otvorio.
Imao sam rjesenje i sa jednom funkcijom koja ubija proces, u ovom slucaju cmd.exe, ali tvoje rjesenje je ipak bolje.
Pozdrav i hvala.

SELECT * FROM หน่วยงานหลัก WHERE ยสันติ LIKE 'โดย%'

Odgovor na temu