如何在VB.NET中使用ADO.NET上传文件到数据库中..

最新推荐文章于 2021-02-22 06:31:55 发布

哆嘛.net

最新推荐文章于 2021-02-22 06:31:55 发布

阅读量546

点赞数 2

分类专栏： vb.net 文章标签：数据库 vb.net access ado.net

本文链接：https://blog.csdn.net/m0_53168509/article/details/110825299

版权

vb.net 专栏收录该内容

8 篇文章 0 订阅

订阅专栏

本文档介绍了如何在VB.NET中利用ADO.NET将文件内容以二进制形式上传到ACCESS数据库。作者通过填充数据表，新增列并更新数据的方式实现了上传，虽然效率较低，但能成功运行。主要步骤包括读取文件，创建数据集，新增列并添加数据，最后更新数据库。

摘要由CSDN通过智能技术生成

提示：文章写完后，目录可以自动生成，如何生成可参考右边的帮助文档

文章目录

前言
一、在VB.NET中使用ADO.NET上传文件到数据库中..
二、使用步骤
- 1.读取数据表原有数据
- 2.新增table的列并在新增的列中添加数据并上传
总结

前言

新手上路VB.NET .虽然这个办法真的很慢.很慢…但是我真的没有其他办法了…希望大佬们留言告诉我速度快一点的方法

一、在VB.NET中使用ADO.NET上传文件到数据库中…

直接用insert into 无论如何本菜鸟都没法导进二进制数据到ACCESS 中,后来借鉴了ADODB的一些步骤,先fill到table中,添加数据后在UPDATE上传到数据库.居然真的跑通了…虽然很慢.

二、使用步骤

1.读取数据表原有数据

Dim fs As FileStream = File.Open(path, FileMode.Open, FileAccess.Read)
Dim bt(fs.Length) As Byte
fs.Read(bt, 0, fs.Length)
sql = "select  * from name"
adp = New OleDbDataAdapter(sql, Con)
Dim cb As New OleDbCommandBuilder(adp)
ds = New DataSet
adp.Fill(ds, "tablename")

2.新增table的列并在新增的列中添加数据并上传

这里字段 a 是存放数据的Ole格式

ds.Tables("tablename").Rows.Add(ds.Tables("tablename").Rows.Count - 1)
ds.Tables("tablename").Rows(ds.Tables("tablename").Rows.Count - 1).Item("a") = bt 
ds.Tables("tablename").Rows(ds.Tables("tablename").Rows.Count - 1).Item("b") = b
ds.Tables("tablename").Rows(ds.Tables("tablename").Rows.Count - 1).Item("c") = c
ds.Tables("tablename").Rows(ds.Tables("tablename").Rows.Count - 1).Item("d") = d
ds.Tables("tablename").Rows(ds.Tables("tablename").Rows.Count - 1).Item("e") = e
adp.Update(ds, "tablename")