VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2007/02/22(Thu) 10:17
投稿者Blue
Eメール
URL
タイトルRe: ネットワークドライブの接続先を知りたい。

FileSystemObjectのDrivesから列挙されるDirveオブジェクトの
ShareNameプロパティを確認する。

Sample)
    Dim objFSO   As Object
    Dim objDrive As Object
    Dim targetPath As String
    
    targetPath = "\\192.168.1.1\TMP"
    
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    For Each objDrive In objFSO.Drives
        ' ネットワーク ドライブか
        If objDrive.DriveType = 3 Then
          If targetPath = objDrive.ShareName Then
            MsgBox objDrive.Path
            Exit For
          End If
        End If
    Next
    Set objFSO = Nothing


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

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -