検索などを起動するには？

解決

---

すみませんが、検索とネットワークコンピュータの起動方法を
おしえてください。

編集    削除

---

VBのサンプルでなくてDelphiのサンプルになります。（＾＾；
あとはご自分で編集して下さい。言語はにているから大丈夫でしょう。

※usesにShlObjを追加

function SHFindFiles(pidlRoot: PItemIDList; pidlSavedSearch: PItemIDList): Boolean;
 stdcall; external 'Shell32.dll' index 90;

function SHFindComputer(pidlRoot: PItemIDList; pidlSavedSearch: PItemIDList): Boolean;
 stdcall; external 'Shell32.dll' index 91;


procedure TForm1.Button1Click(Sender: TObject);
begin
 //検索  
 SHFindFiles(nil,nil);
 //コンピュータの検索
 SHFindComputer(nil,nil);
end;

編集    削除

---

ここまでは理解できました。

Call Shell("RUNDLL32.EXE SHELL32.DLL,*******_RunDLL")

しかし、*******のところに検索を起動する
エントリがあるのですが、そのエントリが見つかりません。
ご教授お願いします。

編集    削除

---

VBでのサンプルがあるサイトをみつけました。

http://hello.to/my2project/

編集    削除

---

ちゃんと起動しました。
どうもありがとうございました。

報告が送れてすみません。

編集    削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。