[VB.NET] Eseguire comando DOS con parametri

[Kahm]

salve a tutti

devo eseguire un comando per compattare un database access 2007
sul sito web ho trovato questo da eseguire
System.Diagnostics.Process.Start(Me.TXT_Database.T ext & " /compact")

   c:/accdb  /compact

quindi ho provato ad inserirlo in questo docidce

  System.Diagnostics.Process.Start(Me.TXT_Database.Text & " /compact")

ma mi da errore di file non trovato,forse cerca un file con estenzione "/compact"
come posso fare per esetguire quiesto comando?
grazie

[alka]

Hai provato ad eseguirlo da un normale Prompt dei comandi?

[Kahm]

Originariamente inviato da alka
Hai provato ad eseguirlo da un normale Prompt dei comandi?

tramite: start ->esegui funziona benissimo

si ecco ora ho provato da dos,funziona pure qui

[xander1979]

Ciao, hai usato a provare il comando

SHELL([comando da eseguire])

Saluti

[filippo.buriola]

Con Shell("c:\ciccio.pdf",1) da errore...
Se scrivo c:\ciccio.pdf su Start->Esegui di windows mi apre il pdf. Perchè con Shell non funziona??

[xander1979]

Perchè usando il comando SHELL non conosce l'applicazione da usare per aprire il file, ad esmpio per aprire un file pdf potresti usare:

SHELL("C:\Programmi\Adobe\pdbreader.exe C:\prova.pdf"),

oppure puoi usare il comando shell32.exe di windows per aprirlo

SHELL("shell32.exe C:\prova.pdf")

in questo caso windows controlla qual'è applicazione predefinita e usa quella.

Ora non ricordo perfettamenre la sintassi ma se fai una brevissima ricerca sul web la trovi.

Saltui

[filippo.buriola]

shell32.exe non lo trovo.... shell32.dll c'è ma ovv non funzia. Ho provato a fare una ricerca su web ma non trovo soluzioni...

[filippo.buriola]

...invece la prima soluzione sembra funzionare... grazie!!

[xander1979]

Scusa non era SHELL32 ma RUNDLL32.EXE

di seguito ti riporto questo pezzettino di codice di esempio

Dim ret As Integer
ret = Shell("rundll32.exe url.dll,FileProtocolHandler " &  "C:\MiaDirectory\MioFile.pdf", vbMaximizedFocus)

Saluti

[fabio309]

non so se può essere utile ma per aggirare il problema dei comandi esegui dal prompt io in genere faccio così

Open "c:\comando.bat" For Output As #1
Print #1, comando
Close #1
X = Shell("c:\comando.bat", vbHide)