starte en exe-fil med knapp i VB

[nuroa]

Hei hei

 

Jeg holder på å modifisere et VB program. Der har jeg lagt til en knapp, og det som er vanskelig (for meg) er det den skal gjøre. Jeg vil at den skal starte et annet program, kalib.exe, går det an? Hvordan?

 

Er temmelig fersk i VB, og setter stoor pris på all hjelp!

 

nuroa

[aadnk]

Bruk shell kommandoen:

 

Shell "C:\Program Filer\kalib.exe"

 

Du skriver altså stien til programmet du skal kjøre etter Shell. Skriver du kun navnet på programmet, må den befinne seg i Windows mappen.

[nuroa]

Takk, det var akkurat det jeg lette etter! Virker kjempefint

[Gjest Medlem-42829]

Hm.. har ikke teste pga min vb er litt rar

 

men går det an og åpne andre filer som .zip .txt og den slags?

[nuroa]

Og går det an til å si hvilken mappe .exe skal kjøre i? (Når det er forskjellig fra VB programmet) Nå virker det hvis jeg kopierer de filene som trengs over i samme katalog som VB programmet, men det er jo litt knotete...

[kaffenils]

Hm.. har ikke teste pga min vb er litt rar

 

men går det an og åpne andre filer som .zip .txt og den slags?

Du kan f.eks. bruke ShellExecute API'et:

 

Legg denne koden i begynnelsen av en modul:

 

public Const SW_SHOWNORMAL = 1

 

public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, _

ByVal lpOperation As String, ByVal lpFile As String, _

ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

 

 

Legg f.eks. denne koden i onclick på en knapp i formen frmMyForm for å åpne filen c:\fil.zip.

 

retVal = ShellExecute(frmMyForm.hWnd, "open", "c:\fil.zip", "", "", SW_SHOWNORMAL)