asp и ms-access db – как импортировать данные из файла xls

Я хочу разрешить пользователю загружать файл xls с 9 столбцами и неограниченным количеством строк. я буду запускать каждую строку и вставлять данные в db

как я могу прочитать файл xls?

Вы можете прочитать XLS, открыв набор записей ADO, который извлекает данные электронной таблицы.

В этом примере читаются данные из электронной таблицы с названием Billing Summary, которая включает имена столбцов в первой строке.

Public Sub ReadSpreadsheet() Const cstrFolder As String = "C:\Access\webforums" Const cstrFile As String = "ExampleFinance.xls" Dim strConnect As String Dim strSql As String Dim cn As Object Dim rs As Object Set cn = CreateObject("ADODB.Connection") Set rs = CreateObject("ADODB.Recordset") strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _ cstrFolder & Chr(92) & cstrFile & _ ";Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1"";" cn.Open strConnect strSql = "SELECT * FROM [Billing Summary$] WHERE SomeField Is Not Null;" rs.Open strSql, cn Do While Not rs.EOF '* do something with each row of data *' 'Debug.Print rs!SomeField ' rs.MoveNext Loop rs.Close Set rs = Nothing cn.Close Set cn = Nothing End Sub 

Если эта конкретная строка подключения не работает для вас, посмотрите на другие примеры строк подключения Excel в строке подключения для Excel

Изменить : этот пример работает в Access. Но вы сказали ASP. Я думаю, что он тоже будет работать, если вы отбросите типы данных из переменных и константных объявлений: Dim strSql вместо Dim strSql As String

Пример использования инструкции SQL для обновления Access из Excel.

 Set cn = CreateObject("ADODB.Connection") scn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\docs\dbto.mdb" cn.Open scn sSQL = "SELECT * INTO NewTable FROM " sSQL = sSQL & "[Excel 8.0;HDR=YES;IMEX=2;DATABASE=C:\Docs\From.xls].[Sheet1$]" cn.Execute sSQL, recs MsgBox recs 

В C # мне пришлось загрузить таблицу Excel в DataSet – это привело меня туда …

Пример проекта кода

Я использовал вариант 1 – предпочтительный метод! Надеюсь это поможет…

Майк

  • Excel Функция поиска одного и того же адреса электронной почты и сравнения значения другой соответствующей ячейки
  • почему ADODB вставляет значения NULL при обновлении?
  • Excel связан с доступом, связанным со 2-мя замками Excel, которые Excel
  • Поставщик не найден, возможно, неправильно установлен Ошибка
  • Накопление ежедневных данных на еженедельной основе
  • Как сравнить формат текста между Excel и Access (например, цвет, жирный шрифт и т. Д.)
  • Перемещение данных из Word в Access легко
  • подключение к базе данных доступа и запись в таблицу
  • Процедура VBA возвращает результаты только до определенной даты
  • Запускать запрос доступа из параметров excel и pass к запросу
  • Таблица Excel для доступа к запросу, слишком мало параметров. ожидаемый 1
  • Давайте будем гением компьютера.