fosforo (Normal User)
Expert
Messaggi: 391
Iscritto: 06/04/2009
|
Ciao a tutti.
Sto cercando come passare un dato al mio eseguibile tramite CMD line.
Leggendo qui e la ho scoperto la funzione Command$.
Ecco come lancio il mio programma dando anche il mio parametro:
mioprogramma.exe & parametro
All'interno del mio script ho messo:
Private Sub Command1_()
Dim param As String
param = Command$
MsgBox param
On Error Resume Next
If param = "" Then
MsgBox "Azzzzzz"
Else
MsgBox param
End If
End Sub
Ma non va.
Avete suggerimenti?
Grazie
|
|
Alceus (Member)
Expert
Messaggi: 288
Iscritto: 22/07/2008
|
Postato originariamente da fosforo:
Private Sub Command1_()
|
Forse intendevi Command1_Click() ?
Inoltre questo passaggio è inutile
Codice sorgente - presumibilmente Plain Text |
se poi metti
Codice sorgente - presumibilmente Delphi |
If param = "" Then MsgBox "Azzzzzz" Else MsgBox param End If
|
Ultima modifica effettuata da Alceus il 06/04/2009 alle 13:04 |
|
fosforo (Normal User)
Expert
Messaggi: 391
Iscritto: 06/04/2009
|
Ciao
Come hai capito sono prorpio agli inizi.
Questo è il mio primo 3d.
In realta vorrei solo stampare con un MsgBox quello che passo con la linea di comando.
Come posso fare?
|
|
Alceus (Member)
Expert
Messaggi: 288
Iscritto: 22/07/2008
|
Non ti preoccupare se sei agli inizi.
Dunque, per fare ciò che vuoi fare tu segui queste istruzioni:
Crea un nuovo progetto Standard EXE Visual Basic 6
Elimina il form che viene aggiunto al progetto di default
Inserisci, invece, un modulo.
Vi scrivi dentro:
Codice sorgente - presumibilmente VB.NET |
Sub Main() Dim param As String param = Command$ If param = "" Then MsgBox "Azzzzzz" Else MsgBox param End If End Sub
|
Vai al menù Progetto (o Project) ---> Proprietà progetto (o Project1 Properties...) ---> Selezioni in Startup Object "Sub Main" ---> Fai OK
Compili l'eseguibile dal menù File ---> Make Project1.exe... e ti scegli le preferenze dell'eseguibile (nome, versione, autore) nel dialogo che ti apparirà.
Così avrai creato il programma a cui passare i dati da visualizzare nel messaggio.
Ultima modifica effettuata da Alceus il 06/04/2009 alle 13:37 |
|
theprogrammer (Normal User)
Guru^2
Messaggi: 2509
Iscritto: 28/01/2009
|
Molto semplicemente, per capire, se crei un nuovo programma con VB6, scrivi
Private Sub Form_Load()
MsgBox Command$
End Sub
per capire cosa succede.
|
|
fosforo (Normal User)
Expert
Messaggi: 391
Iscritto: 06/04/2009
|
Cio e grazie
Non ci crederete ma è il mio primo eseguibile.
In entrambi i casi non funziona, è come se non prendesse i dati dalla linea di comando che per corettezza vi posto:
Progetto1.exe&ciao
|
|
Alceus (Member)
Expert
Messaggi: 288
Iscritto: 22/07/2008
|
Sei vuoi far passare "ciao" al programma devi scrivere:
Codice sorgente - presumibilmente Plain Text |
nel prompt, con lo spazio e senza il simbolo &
|
|
fosforo (Normal User)
Expert
Messaggi: 391
Iscritto: 06/04/2009
|
Purtroppo non funziona
Vi posto il mio script:
Private Sub Form_Load()
Dim Command$
MsgBox Command$
End Sub
e lo lancio con:
progetto1.exe ciao
|
|
Alceus (Member)
Expert
Messaggi: 288
Iscritto: 22/07/2008
|
Allora, questo non serve:
Postato originariamente da fosforo:
Dim Command$ |
Per sicurezza puoi sostituire
Codice sorgente - presumibilmente Plain Text |
con
Codice sorgente - presumibilmente Plain Text |
Mentre questo
Codice sorgente - presumibilmente Plain Text |
funziona solo se hai compilato l'eseguibile con il nome "progetto1.exe"
|
|