文摘《'excel导入access》
'excel导入access ,引用ADO
Private Sub Command1_Click()
Dim conn As ADODB.Connection
Set conn = New ADODB.Connection
On Error Resume Next
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\dbemp.mdb;" & "Persist Security Info=False"
conn.Open
conn.Execute "Drop Table [Emptable]"
conn.Close
ExportExcelSheetToAccess "Sheet1", "D:\Test.xls", "Emptable", "D:\dbemp.mdb"
End Sub
Private Sub ExportExcelSheetToAccess(sSheetName As String, sExcelPath As String, sAccessTable As String, sAccessDBPath As String)
Dim db As Database
Dim rs As Recordset
Set db = OpenDatabase(sExcelPath, True, False, "Excel 8.0")
Call db.Execute("Select * into [;database=" & sAccessDBPath & "]." & sAccessTable & " from [" & sSheetName & "$]")
MsgBox "导入成功！", vbInformation, "提示"
'ReShow
End Sub
本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/asftrhgjhkjlkttttttt/archive/2009/12/01/4914132.aspx
相关文档：
昨天弄了一个比较棘手的问题。从网上下载了一个软件，他的数据库是access的，打开看了一下，感觉不错，适合我现在项目的需求，大部分能够满足我的项目需要，就想拿来主义。可是我们项目的数据库一直都是用的sqlserver，于是，就在网上疯狂的，找关于access转换为sqlserver的资料在这里我想说一下有关的注意事项：
数据库升 ......
Oracle,MySQL,MSSQL Server和Access数据库的统计函数
我们在编程中常用的统计函数有计数,求和,求最大值,求最小值,求平均,方差和标准差.
方差(Variance)
方差是标准偏差的平方。组中的值，与它们平均值之间偏离程度的度量。
标准偏差(Standard Deviation)
一个参数，指出一种方式，一个概率函数以这种方式分布在平均值� ......
一、Access从Excel中导入数据
1.用到的Excel表的格式及内容
实现
OleDbConnection con = new OleDbConnection();
try
{
OpenFileDialog openFile = new OpenFileDialog();//打开文件对话框。
openFile.Filter = ("Excel 文件(*.xls)|*.xls") ......
access日期和时间函数
access日期和时间函数
------------------------------------------------
设置当前日期或时间。 Date ,Now, Time
计算日期: DateAdd, DateDiff, DatePart
返回日期: DateSerial, DateValue
返回时间: TimeSerial, TimeValue
设置日期或时间: Date, Time
计时: Timer
在帮助 ......
最近整理出来的.如果不完全的话希望大家补充.
在access中，转换为大写的sql函数是ucase，在sqlserver中，转换为大写的函数是upper；在access中，转换为小写的函数是lcase，在sqlserver中，转换为小写的函数是lower；在access中，取当前时间的函数是now，另外还有一个取日期函数date，在sqlserver中，取当前的函数是getdate ......
