Solved

Access a SQL database from a console application

Posted on 2012-04-09
1
234 Views
Last Modified: 2012-04-10
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

0
Comment
Question by:mjelec
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
1 Comment
 
LVL 53

Accepted Solution

by:
Dhaest earned 500 total points
ID: 37826709
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

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
IF ELSE Statement in Excel Macro VBA 16 102
RUNRMTCMD from AS/400 13 129
VBA: copy range dynamically based on config sheet v3 6 53
can this macro be converted to sub procedure 4 33
Have you ever wanted to restrict the users input in a textbox to numbers, and while doing that make sure that they can't 'cheat' by pasting in non-numeric text? Of course you can do that with code you write yourself but it's tedious and error-prone …
Since upgrading to Office 2013 or higher installing the Smart Indenter addin will fail. This article will explain how to install it so it will work regardless of the Office version installed.
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…

738 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question