Oppure

Loading
10/04/10 14:10
marco444
ciao,
come scritto nel titolo voglio evitare che il programma venga eseguito due volte, non so se c'è un modo piu semplice, ma io ho scritto un codice, penso che sia assurdo il mio metodo però, infatti non funziona, ditemi cosa puo non andare:

Dim a1 As String, c As String
Dim b
a1 = Application.ExecutablePath.ToString
b = Split(a1, "\";)
c = Join(b, "\";)
Dim numero As String
numero = b.Length - 1
Dim file1 As String
file1 = b(numero)
Dim esec As String
esec = file1.Replace(".exe", "";)

Dim PrcProcesso As System.Diagnostics.Process()

PrcProcesso = Process.GetProcessesByName("esec";)

If (PrcProcesso.Length > 0) Then

End
Else

End If
aaa
10/04/10 14:17
walker93
nelle proprietà del tuo progetto nella scheda applicazione devi mettere la spunta su:
-attiva framework applicazione
--rendi a istanza singola
aaa
10/04/10 14:24
marco444
grazie mille,
ho fatto un codice assurdo, quando invece la soluzione non era semplice , di piu.
grazie mille ancora
aaa
10/04/10 14:47
Postato originariamente da marco444:

grazie mille,
ho fatto un codice assurdo, quando invece la soluzione non era semplice , di piu.
grazie mille ancora


Al posto di chiedere come ottenere il nome dell'eseguibile, avresti potuto spiegare direttamente e chiaramente il problema ... avresti risparmiato tempo tu e quelli che ti hanno risposto nell'altro thread ...
14/04/10 8:04
marco444
ok errore mio.
pensavo che in quell'altro modo sarebbe stato piu semplice.
aaa