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: 918 | Odgovora: 5 ]

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

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

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

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


Profil

icon Kako da se otvori izabrani (na DblClick) fajl10.09.2004. u 15:29

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
10.09.2004. u 15:29 

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
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 .: ]
10.09.2004. u 20:13 

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

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

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


Profil

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

Koju ključnu rječ da upišem da trazim to dalje?
Pozdrav
GoGy
11.09.2004. u 18:13 

vujkev
Darko Vujičić
Telekom Srbija AD
Beograd

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



Profil

icon Re: Kako da se otvori izabrani (na DblClick) fajl11.09.2004. u 19:12
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
11.09.2004. u 19:12 

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

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

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


Profil

icon Re: Kako da se otvori izabrani (na DblClick) fajl13.09.2004. u 13:19
Hvala pokušaću to...
Pozdrav
GoGy
13.09.2004. u 13:19 

Aleksandar Ružičić
Aleksandar Ružičić
Junior Developer, Spoonlabs d.o.o
20°27'46'' - 44°48'8''

SuperModerator
Član broj: 26939
Poruke: 2360
195.252.81.*

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


Profil

icon Re: Kako da se otvori izabrani (na DblClick) fajl13.09.2004. u 14:45
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
13.09.2004. u 14:45 

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

[ Pregleda: 918 | Odgovora: 5 ]

Postavi temu Odgovori

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