Groups > it.comp.lang.visual-basic > #18840

Re: [VB6] Shell con file multipli

Path	csiph.com!aioe.org!.POSTED!not-for-mail
From	Franz_aRTiglio <franzgol@N0SPAMtin.it>
Newsgroups	it.comp.lang.visual-basic
Subject	Re: [VB6] Shell con file multipli
Date	Fri, 08 Jul 2016 19:27:55 +0200
Organization	Aioe.org NNTP Server
Lines	33
Message-ID	<nlonkg$1u7d$1@gioia.aioe.org> (permalink)
References	<f85986bc-a68b-4006-9156-1cec748be7ed@googlegroups.com>
NNTP-Posting-Host	a7iwE+Iho4Tt1698tHpYQQ.user.gioia.aioe.org
Mime-Version	1.0
Content-Type	text/plain; charset="iso-8859-15"; format=flowed
Content-Transfer-Encoding	8bit
X-Complaints-To	abuse@aioe.org
X-Notice	Filtered by postfilter v. 0.8.2
X-Newsreader	MesNews/1.08.06.00-it
X-ICQ	1931503972
Xref	csiph.com it.comp.lang.visual-basic:18840

Show key headers only | View raw

sixam69@gmail.com ha pensato forte :

> (o INVIO) su un file, uso la API ShellExecute cosi'    ShellExecute 0, 
> "Open", sFile, "", sPath, SW_SHOW e funziona benissimo, gestisce anche in 
> gestire anche il lancio di più file. Ad esempio, se seleziono 5 file .mp3, 
> alla pressione di INVIO dovrebbe aprirmi il player (io uso Foobar2000) 
> creando una nuova playlist. Esattamente come fa Esplora Risorse.


e' roba che l'ultima volta che ho toccato e' stato 10 anni fa, ma
a braccio mi pare di ricordare:


Sub ciccio()

Dim Vg as string
Dim ListaArgomenti as String

Vg = chr(34) ' virgolette

' supponendo di dover passare i seguenti file come argomento:
' pinco.mp3
' pallo.mp3

ListaArgomenti = Vg & "pinco.mp3" & " " & Vg & "pallo.mp3"

' nota che la stringa risultante è
' "pinco.mp3" "pallo.mp3"


ShellExecute 0, "Open", sFile, ListaArgomenti, SW_SHOW

end sub

Back to it.comp.lang.visual-basic | Previous | Next — Previous in thread | Next in thread | Find similar

Thread

[VB6] Shell con file multipli sixam69@gmail.com - 2016-07-08 03:42 -0700
  Re: [VB6] Shell con file multipli Franz_aRTiglio <franzgol@N0SPAMtin.it> - 2016-07-08 19:27 +0200
    Re: [VB6] Shell con file multipli Franz_aRTiglio <franzgol@N0SPAMtin.it> - 2016-07-08 19:28 +0200

csiph-web