tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re: フォルダ共有のチェック
投稿日: 2010/01/19(Tue) 22:21
投稿者魔界の仮面弁士
> フォルダが共有されているかをチェックしたいので
> 色々探したのですが、VB.NETで書いた物しかみつかりませんでした。

これでどうでしょう。

Private Sub Command1_Click()
    Dim shareList As Object
    Set shareList = GetObject("winmgmts:").ExecQuery( _
        "SELECT * FROM Win32_Share WHERE Type=0")
    Dim share As Object
    For Each share In shareList
        Debug.Print share.Path, share.Name, share.Description, share.Status
    Next
End Sub

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。