Apri Access da .NET

' Apre una form in un db di AccessForm, passando la WhereCondition
Private Sub ApriAccess()

Try
        Console.WriteLine("premi un tasto per aprire access...")
        Console.ReadKey()

        Dim a As New Access.Application

        a.OpenCurrentDatabase("d:\pippo.mdb")
        a.DoCmd.OpenForm("Form1", , , " Nome='C' ")
        a.Visible = True

        Console.WriteLine("premi un tasto per chiudere access...")
    	Console.ReadKey()
    	
        a.CloseCurrentDatabase()
    Catch ex As Exception

    End Try

    a = Nothing

End Sub