Súhrn
Môžete volať funkciu Windows API ShellExecute() z jazyka Visual Basic for Applications a začať iný program Microsoft Windows. Použitie ShellExecute() namiesto Shell (Visual Basic vyhlásenie) alebo WinExec() (Windows API funkcie) obísť nasledujúce obmedzenie tieto príkazy:
Prostredia a WinExec(), nemôžete spustiť aplikácie zadaním názvu. Napríklad nasledujúci príkaz prostredia zlyhá:
x = Shell("C:\My Documents\Book1.Xls")
Ďalšie informácie
Microsoft poskytuje príklady programovacieho iba, bez ľubovoľnej vyjadrenej alebo implicitnej záruky. Tie okrem iného zahŕňajú predpokladané záruky obchodovateľnosti alebo vhodnosti na konkrétny účel. Tento článok predpokladá, že ovládate predvádzaný programovací jazyk a nástroje, ktoré sa používajú na vytváranie a ladenie procedúr. Pracovníci technickej podpory spoločnosti Microsoft vám môžu vysvetliť fungovanie konkrétneho postupu, ale neupravia tieto príklady s cieľom poskytnutia pridanej funkčnosti ani nevytvoria procedúry zohľadňujúce vaše konkrétne požiadavky. Nasleduje vzorky Visual Basic for Applications a že volá funkciu Windows API ShellExecute() . ShellExecute() určuje, či je spustený program Microsoft Excel; Ak áno, načíta Zošit1.xls do aktuálnej relácii programu Microsoft Excel. Ak nie je spustený program Microsoft Excel, ShellExecute() spustí program Microsoft Excel a načíta Zošit1.xls.
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
Declare Function apiFindWindow Lib "User32" Alias "FindWindowA" _
(ByVal lpclassname As Any, ByVal lpCaption As Any) As Long
Global Const SW_SHOWNORMAL = 1
Sub ShellExecuteExample()
Dim hwnd
Dim StartDoc
hwnd = apiFindWindow("OPUSAPP", "0")
StartDoc = ShellExecute(hwnd, "open", "C:\My Documents\Book1.xls", "", _
"C:\", SW_SHOWNORMAL)
End Sub
ShellExecute() funkcia otvorí alebo tlačí zadaný súbor. Informácie o ShellExecute() stránok 901-904 systému Microsoft Windows Software Development Kit (SDK) "Programátora odkaz na zväzku 2:Functions."
Parametre
Parameter Description
---------------------------------------------------------------------------
hwnd Identifies the parent window.
lpszOp A string specifying the operation to perform. This
string can be "open" or "print".
lpszFile Points to a string specifying the file to open.
lpszParams Points to a string specifying parameters passed to
the application when the lpszFile parameter
specifies an executable file. If lpszFile points to
a string specifying a document file, this parameter
is NULL.
lpszDir Points to a string specifying the default
directory.
fsShowCmd Specifies whether the application window is to be
shown when the application is opened. This
parameter can be one of the following values:
Value Meaning
---------------------------------------------------------------------
0 Hides the window and passes activation to another
window.
1 Activates and displays a window. If the window is
minimized or maximized, Windows restores it to its
original size and position (same as 9).
2 Activates a window and displays it as an icon.
3 Activates a window and displays it as a maximized
window.
4 Displays a window in its most recent size and
position. The window that is currently active remains
active.
5 Activates a window and displays it in its current
size and position.
6 Minimizes the specified window and activates the
top-level window in the system's list.
7 Displays a window as an icon. The window that is
currently active remains active.
8 Displays a window in its current state. The window
that is currently active remains active.
9 Activates and displays a window. If the window is
minimized or maximized, Windows restores it to its
original size and position (same as 1).
Vrátenie tovaru
Vrátená hodnota je stupňa rukoväť aplikácia otvorí alebo vytlačí, ak je funkcia úspešné. (Popisovač môže byť rukoväť serverová aplikácia DDE.) Vrátená hodnota menšia alebo rovná 32 určuje chyba.
Chyby
ShellExecute() funkcia vráti hodnotu 31, ak chýba Priradenie typu zadaného súboru, alebo ak chýba priradenie pre zadanú akciu typu súboru. Ďalšie chybové hodnoty sú nasledovné:
Value Meaning
---------------------------------------------------------------------------
0 System was out of memory, executable file was corrupt, or
relocations were invalid.
2 File was not found.
3 Path was not found.
5 Attempt was made to dynamically link to a task, or there
was a sharing or network-protection error.
6 Library required separate data segments for each task.
8 There was insufficient memory to start the application.
10 Windows version was incorrect.
11 Executable file was invalid. Either it was not a Windows
application, or there was an error in the .exe image.
12 Application was designed for a different operating system.
13 Application was designed for MS-DOS 4.0.
14 Type of executable file was unknown.
15 Attempt was made to load a real-mode application
(developed for an earlier version of Windows).
16 Attempt was made to load a second instance of an
executable file containing multiple data segments that
were not marked read-only.
19 Attempt was made to load a compressed executable file. The
file must be decompressed before it can be loaded.
20 Dynamic-link library (DLL) file was invalid. One of the
DLLs required to run this application was corrupt.
21 Application requires Microsoft Windows 32-bit extensions.
Komentáre
Súbor podľa zadaného parametra lpszFile môže byť súboru dokumentu alebo spustiteľný súbor. Ak je súbor dokumentu, táto funkcia otvorí alebo tlačí ho v závislosti od hodnota parametra lpszOp. Ak je spustiteľný súbor, táto funkcia otvorí, aj keď reťazec "tlačiť" smeruje na základe lpszOp.
Odkazy
Ďalšie informácie o používaní vzorky kód v tomto článku, po kliknutí na nasledovné číslo článku publikovaného v databáze Microsoft Knowledge Base:
212536 OFF2000: ako spustiť vzorového kódu z článkov databázy Knowledge Base
Ďalšie informácie o získanie Pomocníka programu Visual Basic for Applications, prečítajte si nasledujúci článok databázy Microsoft Knowledge Base:
226118 OFF2000: Programovací zdroje pre Visual Basic for Applications
Microsoft Windows SDK "programátora referencie, Volume 2: funkcie" stránky 901-904
