Search file in C drive w/o admin?[Solved]

Is there a way to search files in C drive w/o admin because i can only browse the files in locations w/o admin

I don't understand, what do you want to do? List all files? See if a file exists?

yah like list all of the files in C drive.

Originally Posted by ppl2pass

yah like list all of the files in C drive.

Code:

    Public Function searchDir(ByVal path As String) As List(Of String)
        Dim paths As New Stack(Of String)
        Dim files As New List(Of String)

        paths.Push(path)

        While paths.Count > 0
            Dim dir As String = paths.Pop

            Try
                files.AddRange(IO.Directory.GetFiles(dir))
            Catch ex As Exception
            End Try

            Try
                For Each s As String In IO.Directory.GetDirectories(dir)
                    paths.Push(s)
                Next
            Catch ex As Exception
            End Try
        End While

        Return files
    End Function

Code:

for each file as string in searchdir("C:")
listbox1.items.add(file)

@Blubb

thanks for the code but it doesnt work.

it only shows like 4 files of the windows application of vb.net

For Each f As String In searchDir("C:\")
ListBox1.Items.Add(f)
Next

This does take some shit load of time. You will have to go into multithreading. HF :P

Do you really need to list ALL FILES from the WHOLE device?

Basically all i want is to search for a specific file and list to listbox.

Code:

Option Strict On
Option Explicit On 

Imports System.IO

    Public Class FileSearch

        Private Const DefaultFileMask As String = "*.*"
        Private Const DefaultDirectoryMask As String = "*"

#Region " Member Variables "

        Private _InitialDirectory As DirectoryInfo
        Private _DirectoryMask As String
        Private _FileMask As String

        '
        Private _Directories As New ArrayList
        Private _Files As New ArrayList

#End Region

#Region " Properites "

        Public Property InitialDirectory() As DirectoryInfo
            Get
                Return _InitialDirectory
            End Get
            Set(ByVal Value As DirectoryInfo)
                _InitialDirectory = Value
            End Set
        End Property
        Public Property DirectoryMask() As String
            Get
                Return _DirectoryMask
            End Get
            Set(ByVal Value As String)
                _DirectoryMask = Value
            End Set
        End Property
        Public Property FileMask() As String
            Get
                Return _FileMask
            End Get
            Set(ByVal Value As String)
                _FileMask = Value
            End Set
        End Property

        Public ReadOnly Property Directories() As ArrayList
            Get
                Return _Directories
            End Get
        End Property
        Public ReadOnly Property Files() As ArrayList
            Get
                Return _Files
            End Get
        End Property



#End Region

#Region " Constructors "

        Public Sub New()

        End Sub

        Public Sub New( _
            ByVal BaseDirectory As String, _
            Optional ByVal FileMask As String = DefaultFileMask, _
            Optional ByVal DirectoryMask As String = DefaultDirectoryMask)

            Me.New(New IO.DirectoryInfo(BaseDirectory), FileMask, DirectoryMask)

        End Sub

        Public Sub New( _
            ByVal BaseDirectory As DirectoryInfo, _
            Optional ByVal FileMask As String = DefaultFileMask, _
            Optional ByVal DirectoryMask As String = DefaultDirectoryMask)

            _InitialDirectory = BaseDirectory
            _FileMask = FileMask
            _DirectoryMask = DirectoryMask

        End Sub

#End Region

        Protected Overrides Sub Finalize()
            _Files = Nothing
            _Directories = Nothing
            MyBase.Finalize()
        End Sub


        Public Sub Search( _
            Optional ByVal BaseDirectory As DirectoryInfo = Nothing, _
            Optional ByVal FileMask As String = Nothing, _
            Optional ByVal DirectoryMask As String = Nothing)

            If Not IsNothing(BaseDirectory) Then
                _InitialDirectory = BaseDirectory
            End If

            If IsNothing(_InitialDirectory) Then
                Throw New ArgumentException("A Directory Must be specified!", "Directory")
            End If

            If IsNothing(FileMask) Then
                _FileMask = DefaultFileMask
            Else
                _FileMask = FileMask
            End If


            If IsNothing(DirectoryMask) Then
                _DirectoryMask = DefaultDirectoryMask
            Else
                _DirectoryMask = DirectoryMask
            End If

            DoSearch(_InitialDirectory)
        End Sub

        Private Sub DoSearch(ByVal BaseDirectory As DirectoryInfo)

            Try
                _Files.AddRange(BaseDirectory.GetFiles(_FileMask))
            Catch u As UnauthorizedAccessException
                'Siliently Ignore this error, there isnt any simple
                'way to avoid this error.

            End Try

            Try
                Dim Directories() As DirectoryInfo = BaseDirectory.GetDirectories(_DirectoryMask)
                _Directories.AddRange(Directories)

                For Each di As DirectoryInfo In Directories
                    DoSearch(di)
                Next

            Catch u As UnauthorizedAccessException
                'Siliently Ignore this error, there isnt any simple
                'way to avoid this error.

            End Try

        End Sub

    End Class

Code:

Dim x As New FileSearch(New IO.DirectoryInfo("d:\Media\"), "*.nfo")

        *****arch()

Edit the *.nfo.

Looks solved.

Marked solved, don't post for >7 days unless completely necessary.

One more question blubb.
how can you search for a specific file name?

Blubbs code is standard MSDN, So if you need to research it more and get more help on the matter, you should read the documentation.

"blubbs" msdnn code is recursive searching,

for single file searching as long as you know the directory to search in (like windows search C:\ or specific file etc)

MSDN

[php]
Dim DirectoryI as New DirectoryInfo("Path")

Dim fileI as New FileInfo

for each filei in directoryi.GetFiles
com

x.Items.Add(fileI.Fullname)
next
[/php]

Really easy and straight forward

Search file in C drive w/o admin?[Solved]

Similar Threads

Tags for this Thread