Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]


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

Re: [VB6] Shell con file multipli

From Franz_aRTiglio <franzgol@N0SPAMtin.it>
Newsgroups it.comp.lang.visual-basic
Subject Re: [VB6] Shell con file multipli
Date 2016-07-08 19:27 +0200
Organization Aioe.org NNTP Server
Message-ID <nlonkg$1u7d$1@gioia.aioe.org> (permalink)
References <f85986bc-a68b-4006-9156-1cec748be7ed@googlegroups.com>

Show all headers | 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 | NextPrevious 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