Access a SQL database from a console application

I am trying to create a console application to run robocopy and copy a folder structure and still keep the permissions.

I have most of it working except for accessing the data for the new folder names.  Which can either reside in a sql database or in an access database.

Examples of how to get this working would be great.  here is what i have so far.

Module Module1

    Sub Main()

        Dim MyDatabase As OleDb.OleDbConnection
        Dim ConnectToMyDatabase As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
             "Data Source=\\SERVER\Database.mdb"
        MyDatabase = New OleDb.OleDbConnection(ConnectToMyDatabase)
        MyDatabase.Open()
        Dim stringx As String
        stringx = MyDatabase.Table

        Dim file As String
        file = "robocopy.exe"

        Dim args As String
        args = "C:\test C:\test2 *.* /copyall /mir"

        Dim username As String
        username = "Username"

        Dim pass As SecureString
        pass = Secure()

        Dim Dom As String
        Dom = "DOMAIN"
        Stop

        'Process.Start(file, args, username, pass, Dom)


    End Sub

    Public Function Start(fileName As String, arguments As String, userName As String, password As SecureString, domain As String) As Process
    End Function

    Public Function Secure() As SecureString
        Dim pass As String
        pass = "password"
        Dim str As New SecureString
        For x As Integer = 0 To pass.Length - 1
            str.AppendChar(pass.Substring(x, 1))
        Next

        Return str
    End Function

End Module

Open in new window

mjelecAsked:
Who is Participating?
 
DhaestConnect With a Mentor Commented:
Visual Basic 6 ADO Tutorial - reading mdb file
http://www.timesheetsmts.com/adotutorial.htm

 How to connect to a SQL server using Visual Basic 6.0
http://www.dreamincode.net/forums/topic/24677-connecting-to-a-sql-server-database-using-adodb/
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.