1,01.zipCalling Stored Procedures调用存储过程(8KB)2,02.zipCreate Access data source name dynamically动态创建Access的数据源名(5KB)3,03.zipUsing DAO to read data sources other than MS Acc ess使用DAO读MS Access以外的数据源(6KB)4,04.zipHow to use RecordSets without using the A
Imports System.IO Imports System.Data.SqlClient Public Class image Shared Sub Main() '读入文件数据 Dim fs = New FileStream("c:\1.jpg", IO.FileMode.Open, IO.FileAccess.Read) Dim imgData(fs.Length - 1) As Byte fs.Read(imgData, 0, fs.Length - 1) fs.close() D
做大创过程中需要将大量Excel数据读入SQLite数据库，百度了很多，但并没有解决我的问题，摸索了一天，想出了一个稍显复杂的办法：
第一步：将xlsx或者xls文件另存为csv文件（注意不能直接修改后缀），如果文件有很多，可以用Excel的宏来批量转换，代码如下：
Sub SaveToCSVs()
Dim fDir As String
Dim wB As Workbook
Dim wS As Worksheet
Dim fPath As String
D
