Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Kako da se otvori izabrani (na DblClick) fajl

[es] :: Visual Basic 6 :: Kako da se otvori izabrani (na DblClick) fajl

[ Pregleda: 2368 | Odgovora: 5 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

X-Cite
Goran Tadić
Mediacija, Tušmobil
Ljubljana

Član broj: 28706
Poruke: 625
*.dsl.siol.net

Sajt: www.baza-ukradenih-gsm.co..


Profil

icon Kako da se otvori izabrani (na DblClick) fajl10.09.2004. u 15:29 - pre 238 meseci
Idem iz drajva na drajv list i onda iz drajv list na file.
Želim da kad se 2x klikne na fajl da otvori to što je izabrano.

Pokusao sam ovako:

Code:
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

Private Sub drv1_Change()
Dir1.Path = drv1.Drive
End Sub


ali mi ovo ne valja...

Code:
Private Sub File1_DblClick()
Dim RetVal
RetVal = Shell(File1.Path & "\" & File1.Name, 6)
End Sub


Hvala
Pozdrav
GoGy
 
Odgovor na temu

Pr[o_O]F
Tamna strana mjeseca ;)

Član broj: 30368
Poruke: 155
*.as3.sr.bih.net.ba.



Profil

icon Re: Kako da se otvori izabrani (na DblClick) fajl10.09.2004. u 20:13 - pre 238 meseci
a da probas samo

Code:

shell (file1.path & "\" &  file1.filename)


NaraFski to samo radi s Exe filevima...
pokusaj na

[url] http://www.planet-source-code.com [/url]
ili na:
[url] www.freevbcode.com [/url]

[ :. n!t .: ]
 
Odgovor na temu

X-Cite
Goran Tadić
Mediacija, Tušmobil
Ljubljana

Član broj: 28706
Poruke: 625
*.dial-up.arnes.si

Sajt: www.baza-ukradenih-gsm.co..


Profil

icon Re: Kako da se otvori izabrani (na DblClick) fajl11.09.2004. u 18:13 - pre 238 meseci
E baš šteta da radi samo sa exe fajlovima.

Koju ključnu rječ da upišem da trazim to dalje?
Pozdrav
GoGy
 
Odgovor na temu

vujkev
Beograd

Član broj: 8072
Poruke: 1347
*.scnet.yu



+104 Profil

icon Re: Kako da se otvori izabrani (na DblClick) fajl11.09.2004. u 19:12 - pre 238 meseci
Evo kljucne shell funkcije
Code:
Shell "rundll32.exe url.dll,FileProtocolHandler " & <naziv fajla sa punim pathom>, vbMaximizedFocus

kao na primer
Code:
Shell "rundll32.exe url.dll,FileProtocolHandler " & App.Path & "\pcu-vreme3.xls", vbMaximizedFocus

Naučio sam...
Da je važnije biti ljubazan nego biti u pravu
 
Odgovor na temu

X-Cite
Goran Tadić
Mediacija, Tušmobil
Ljubljana

Član broj: 28706
Poruke: 625
*.dial-up.arnes.si

Sajt: www.baza-ukradenih-gsm.co..


Profil

icon Re: Kako da se otvori izabrani (na DblClick) fajl13.09.2004. u 13:19 - pre 238 meseci
Hvala pokušaću to...
Pozdrav
GoGy
 
Odgovor na temu

Aleksandar Ružičić
Software Architect, Appricot d.o.o.
Beograd

Član broj: 26939
Poruke: 2881

Jabber: krckoorascic@gmail.com
Sajt: krcko.net


+44 Profil

icon Re: Kako da se otvori izabrani (na DblClick) fajl13.09.2004. u 14:45 - pre 238 meseci
Code:

Public Declare Function ShellExecute Lib "SHELL32.DLL" Alias "ShellExecuteA" _
(ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Public Const SW_ShowNormal = 1

Dim l As Long
l = ShellExecute(frmMain.hwnd, "Open", File1.Path & "\" & File1.Name, vbNullString, App.Path, SW_ShowNormal)

to je to
 
Odgovor na temu

[es] :: Visual Basic 6 :: Kako da se otvori izabrani (na DblClick) fajl

[ Pregleda: 2368 | Odgovora: 5 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.