script cmd inséré dans visual basic 2005

Quelqu'un pourrait-il m'expliquer comment faire pour exécuter ce code vbs qui fonctionne très bien dans visual basic. Et si c'est possible d'abord. J'ai créé une listeBox avec une liste de logiciel à installer silencieusement mais je n'arrive pas à faire fonctionner mon script dans visual basic 2005

merci pou votre aide


Private Sub ListBox1_SelectedIndexChanged( ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged

start /wait \\nantes01\Root\Install$\"Adobe Reader" \ "AdbeRdr80_fr_FR.exe" /sPB /rs

Msiexec /i \\nantes01\Root\Install$\"Adobe Player" \install_flash_player_plugin.msi /passive

End Sub

Execute le dans le DOS à partir de ton programme :

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub ListBox1_SelectedIndexChanged( ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged   Process.Start("cmd.exe", "start /wait \\nantes01\Root\Install$\"Adobe Reader" \ "AdbeRdr80_fr_FR.exe" /sPB /rs")   Threading.Thread.Sleep(1000) 'attends une seconde   Process.Start("cmd.exe", "Msiexec /i \\nantes01\Root\Install$\"Adobe Player" \install_flash_player_plugin.msi /passive")   End Sub

---

Bonne chance :)

pour petite rectification, ce n'est pas du vbs mais bien une commande cmd.

Mais lorsque mon formulaire se lance, il lance bien l'invite de commande mais ne l'exécute pas. J'ai remplacé la listbox par un label mais cela n'a aucune importance car de toutes façon j'ai une petite liste de logiciel défini à installer

Code:

---

1 2 3

Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click Process.Start("cmd.exe", "Msiexec /i \\nantes01\Root\\Install$\7zip\7z442.msi /quiet") End Sub

---

Pourtant lorsque je mets cette ligne dans un fichier.cmd le logiciel s'installe bien

Citation:

---

Envoyé par poussin_44

pour petite rectification, ce n'est pas du vbs mais bien une commande cmd.

Mais lorsque mon formulaire se lance, il lance bien l'invite de commande mais ne l'exécute pas. J'ai remplacé la listbox par un label mais cela n'a aucune importance car de toutes façon j'ai une petite liste de logiciel défini à installer


Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click
Process.Start("cmd.exe", "Msiexec /i \\nantes01\Root\\Install$\7zip\7z442.msi /quiet")
End Sub

Pourtant lorsque je mets cette ligne dans un fichier.cmd le logiciel s'installe bien

---

Je n'y connais pas grand chose en Dos mais normalement il execute la commande (chez moi ca marche). Essaye avec 'ipconfig' et tu verras bien ;)

PS: Penses aux balises CODE

j'ai donc essayé comme ci-dessous

Process.Start("cmd.exe", "<code>ipconfig /all</code>")

mais il me retourne The syntax of the command is incorrect.

Les balises CODE ne sont-elles pas prévues pour le HTML?

Non les balises CODE c'est pour le code en VB.NET, C#... sur ce forum !! Il faut pas la mettre dans le code el la commande dos...

Ok, c'est enregistré.

Avec la syntax shell() j'arrive à exécuter certains logiciels (ici par exemple juste le 1er)

Code:

---

1 2 3 4 5

Shell("Msiexec /i \\nantes01\root\Install$\7zip\7z442.msi /quiet") Threading.Thread.Sleep(1000) Shell("start /wait \\nantes01\Root\Install$\Adobe Reader\AdbeRdr80_fr_FR.exe /sPB /rs") Threading.Thread.Sleep(1000) Shell("start /wait \\nantes01\Root\Install$\Java\jre-6u1-windows-i586-p-s.exe /passive")

---

Sinon il me mets que le fichier est introuvable alors que cette commande fonctionne très bien dans un fichier.cmd

En fait un des problèmes est que pour lancer l'exécution silencieuse d'un logiciel, il n'accepte pas les espace donc je mets des "".
Mais vb ne les acceptes pas !

Code:

---

Shell("Msiexec /i "\\nantes.ares.ssii\root\Install$\Lotus Domino\CAS1\Lotus Notes 7.0.1 fr.msi" /passive")

---

Citation:

---

Envoyé par poussin_44

En fait un des problèmes est que pour lancer l'exécution silencieuse d'un logiciel, il n'accepte pas les espace donc je mets des "".
Mais vb ne les acceptes pas !

Code:

---

Shell("Msiexec /i "\\nantes.ares.ssii\root\Install$\Lotus Domino\CAS1\Lotus Notes 7.0.1 fr.msi" /passive")

---

---

Oui Shell est une autre solution ! Mais les espaces sont acceptés ! ?

Pour ceux que ca intéresse, voici la commande que j'ai inseré dans mon code pour l'exécution de commande cmd que je n'arrivais pas à lancer via vb2005 :

Code:

---

System.Diagnostics.Process.Start("chemin\du\fichier.cmd")

---

et la ça fonctionne nickel

Mais ca aussi ca marche :

Code:

---

Process.Start("cmd.Exe", "/c start Y:\Sillicon\tutos.txt")

---