ник: osmor
Re: Помогите. Как вывести на экран окно поиска файлов Windows при помощи VB? Private 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
Function OpenFind()
Call ShellExecute(Application.hWndAccessApp, "find", _
"C:common", _
vbNullString, _
vbNullString, _
0)
End Function
Как добавить строку поиска не знаю