Microsoft Access数据库引擎无法打开或写入该文件

时间:2018-06-18 02:17:01

标签: vb.net csv oledbdataadapter

我有以下功能:

Public Function OleDBCSVToDataTable(directory As String, tableName As String, fileName As String, Optional start As Long = 0) As DataTable
    Dim CnStr = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & directory & ";Extended Properties='Excel 8.0;HDR=YES'"
    Dim dt As DataTable = GetTableSchema(tableName)
    Using Adp As New OleDbDataAdapter("select * from [" & fileName & "]", CnStr)
        Adp.Fill(start, 1000, dt)
    End Using

    Return dt
End Function

该函数旨在使用OLEDB将CSV读入数据表以导入SQL,但是我收到此错误:

  

“Microsoft Access数据库引擎无法打开或写入该文件   'C:\ TEST'。它已经由其他用户或您独家打开   需要获得查看和写入数据的权限。“

我尝试过this解决方案。已授予所有权限(权限是跨用户的完全控制权):

enter image description here

我也看到了this解决方案,但是OLEDB以外的建议选项是似乎不适用于CSV的解决方案。此外,我想有本土图书馆。

我愿意接受更好的方法来实现这一目标,但是,基于要求 - 大型CSV,数据验证 - 这似乎是最好的,假设我能够使其正常工作。

1 个答案:

答案 0 :(得分:0)

如何将CSV文件导入DataGridView,然后从该对象导出到MS Access?

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using System.IO;
using System.Globalization;
using System.Configuration;
using System.Data.OleDb;

namespace WindowsFormsApplication1
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

         public void button1_Click(object sender, EventArgs e)
         {
         string delimiter = ",";
         string tablename = "medTable";
         DataSet dataset = new DataSet();
         OpenFileDialog openFileDialog1 = new OpenFileDialog();
         openFileDialog1.Filter = "CSV Files (*.csv)|*.csv|All Files (*.*)|*.*";
         openFileDialog1.FilterIndex = 1;
         if (openFileDialog1.ShowDialog() == DialogResult.OK)
         {
         if (MessageBox.Show("Are you sure you want to import the data from \n " + openFileDialog1.FileName + "?", "Are you sure?", MessageBoxButtons.YesNo) == DialogResult.Yes)
         {
         filename = openFileDialog1.FileName;
         StreamReader sr = new StreamReader(filename);
         string csv = File.ReadAllText(openFileDialog1.FileName);
         dataset.Tables.Add(tablename);
         dataset.Tables[tablename].Columns.Add("Order ID");
         dataset.Tables[tablename].Columns.Add("Product");
         dataset.Tables[tablename].Columns.Add("Unit Price");
         dataset.Tables[tablename].Columns.Add("Quantity");
         dataset.Tables[tablename].Columns.Add("Discount");

         string allData = sr.ReadToEnd();
         string[] rows = allData.Split("\r".ToCharArray());

         foreach (string r in rows)
         {
         string[] items = r.Split(delimiter.ToCharArray());
         dataset.Tables[tablename].Rows.Add(items);
         }
         this.dataGridView1.DataSource = dataset.Tables[0].DefaultView;
         MessageBox.Show(filename + " was successfully imported. \n Please review all data before sending it to the database.", "Success!", MessageBoxButtons.OK);
         }
         else
         {
         this.Close();
         }
         }
         }

         public string filename { get; set; }


         private void openFileDialog1_FileOk(object sender, CancelEventArgs e)
         {

         }

         private void Import_Load(object sender, EventArgs e)
         {

         }

         private void button4_Click(object sender, EventArgs e)
         {
         Application.Exit();

         }

         private void button2_Click(object sender, EventArgs e)
         {
         this.Close();
         }

         private void button3_Click(object sender, EventArgs e)

         //remove the semicolon, and add brackets below after line
         { 
         //create the connection string
             string connString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\\Users\\Ryan\\Desktop\\Coding\\Microsoft Access\\Northwind_2012.mdb";

             //create the database query
         string query = "SELECT * FROM [OrderDetailsTest]";

             //create an OleDbDataAdapter to execute the query
         OleDbDataAdapter dAdapter = new OleDbDataAdapter(query, connString);

             //create a command builder
         OleDbCommandBuilder cBuilder = new OleDbCommandBuilder(dAdapter);

             //create a DataTable to hold the query results
         DataTable dTable = new DataTable();

             //fill the DataTable
         dAdapter.Fill(dTable);

             //the DataGridView
         DataGridView dataGridView1 = new DataGridView();

             //BindingSource to sync DataTable and DataGridView
         BindingSource bSource = new BindingSource();

             //set the BindingSource DataSource
         bSource.DataSource = dTable;

             //set the DataGridView DataSource
         dataGridView1.DataSource = bSource;

             // An update function to get the changes back into the database.
         dAdapter.Update(dTable);
         }
    }
 }

enter image description here