access文档中心

在SQL Server 内查询Access 数据, 并将数据保存到SQL Server
'Jet OLEDB:Database Password=; /*Access 密码*/
Data Source=C:\temp\Test.mdb; /*Access 数据库路径*/
Password=;/*Access工作组密码*/
1. 查询Access 表内所有数据
SELECT *
from OPENDATASOURCE
('Microsoft.Jet.OLEDB.4.0',
'Jet OLEDB:Database Password=;
Data Source=C:\temp\Test.mdb;
Password=;
Provider="Microsoft.Jet.OLEDB.4.0"')...[AccessTableName]
2. 查询Access 表内 [ID] 在10 到 20 的所有数据
SELECT *
from OPENDATASOURCE
('Microsoft.Jet.OLEDB.4.0',
'Jet OLEDB:Database Password=;
Data Source=C:\temp\Test.mdb;
Password=;
Provider="Microsoft.Jet.OLEDB.4.0"')...[AccessTableName]
where [ID] BETWEEN 10 AND 20
3. 查询Access 表内所有数据, 并将表(表结构和数据)保存到SQL Server 表A内(SQL Server 内不存在表A)
SELECT *
into A
from OPENDATASOURCE
('Microsoft.Jet.OLEDB.4.0',
'Jet OLEDB:Database Password=;
Data Source=C:\temp\Test.mdb;
Password=;
Provider="Microsoft.Jet.OLEDB.4.0"')...[AccessTableName]
4. 查询Access 表� ......

在SQL Server 内查询Access 数据, 并将数据保存到SQL Server
-- OPENROWSET ACCESS 不能有密码, 有密码用OPENDATASOURCE
SELECT *
from OPENROWSET ('Microsoft.Jet.OLEDB.4.0',
'C:\temp\Test.mdb'; /*Access 数据库路径*/
'admin'; /*Access工作组密码*/
'',/*Access工作组密码*/
[AccessTableName])
1. 查询Access 表内所有数据
SELECT *
from OPENROWSET ('Microsoft.Jet.OLEDB.4.0',
'C:\temp\Test.mdb';
'admin';
'',
[AccessTableName])
2. 查询Access 表内 [ID] 在10 到 20 的所有数据
SELECT *
from OPENROWSET ('Microsoft.Jet.OLEDB.4.0',
'C:\temp\Test.mdb';
'admin';
'',
[AccessTableName])
where [ID] BETWEEN 10 AND 20
3. 查询Access 表内所有数据, 并将表(表结构和数据)保存到SQL Server 表A内(SQL Server 内不存在表A)
SELECT *
into C
from OPENROWSET ('Microsoft.Jet.OLEDB.4.0',
'C:\temp\Test.mdb';
'admin';
'',
[AccessTableName])
4. 查询Access 表头, 并将表保存到SQL Server 表D内(SQL Server 内不存在表D)
SELECT top(0)*
into D
from OPENROWSET ('Microsoft.Jet.OLEDB.4.0',
'C:\temp\Test.mdb';
' ......

'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 & "]." & s ......

access中case替代方法
2009-12-26 14:01
SELECT
UserPassportID as PassportID,
UserID,
GrantorID,
Case ObjectTypeID
When 1 then ObjectID
End
as TerminalID,
Type, Flag, GrantDate, Validate, Invalidate
from UserPassport
在SQL里能执行,但在Access里总提示语法错误(操作符丢失).在查询表达式'Case ObjectTypeID
When 1 then ObjectID
End'中?
Sql:
select bb,cc,case aa when '一星级' then '*'
when '二星级' then '** '
when '三星级' then '*** '
when '四星级' then '**** '
when '五星级' then '***** '
end
from aaa
Access：
select bb,cc,iif(aa='一星级','*',iif(aa='二星级','**',iif(aa='三星级','***',iif(aa='四星级','****',iif(aa='五星级','*****')))))
from aaa;
Access中Switch和Choose关键字的用法Access中程序流程函数有三个，Iif ，Switch
Switch关键字
Access中没有Case When的用法，所以对于某些筛选比较就显得很吃力。不过还好，Access中有一个Switch可以解决这个问题。Switch 的语法是：SWITCH( case_1, result_1[, case_2, result_2...])。Switch的计算顺序为从左到右，将返回第一个为true的 ......

本文介绍javascript连接access数据库的方法。这段代码在本地可以正常运行，在线则需要足够的权限。由于采用Access数据库，所以并不使用标准的SQL语法使用时。需要注意。
这几天费了挺大力气在网上查找javascript连接access数据库的方法，经过整理总结，终于写出一段能够有效执行的代码。
但是这段代码在本地可以正常运行，一旦放到免费个人空间上就没法执行了，主要原因就是操作权限不够，由于只支持静态页面的免费空间多数都
作了非常严格的限制，所以无论是用mdb的方式，还是读写纯文本文件的方式都没办法通过，而由页面报出js错误。国外的一些免费空间，直接就禁止mdb这样扩展名的文件上传。
虽然没希望在纯静态页面的免费空间上作自己的计数器或是留言版，但是这段程序也许还是对一些朋友有用处，写出来供各位研究一下。
文件构成：
Access数据库名为 MyData.Mdb，里面建了一个名为count的表，表由两个字段组成： ID和COUNT，表里有一条数据： ('count','100')。
文本文件名为 count.txt，里面随便写入一个数字。
静态页面名为Cnt.htm。
以上3个文件都放在同一目录下。
由于采用Access数据库，而它采用非标准SQL语法，所以要注意在表名和字段名上需要加方括� ......

Access保留字&变量名列表，建表时应避免使用这些词汇和符号。
-A
ADD
ALL
Alphanumeric
ALTER
AND
ANY
Application
AS
ASC
Assistant
AUTOINCREMENT
Avg
-B
BETWEEN
BINARY
BIT
BOOLEAN
BY
BYTE
-C
CHAR, CHARACTER
COLUMN
CompactDatabase
CONSTRAINT
Container
Count
COUNTER
CREATE
CreateDatabase
CreateField
CreateGroup
CreateIndex
CreateObject
CreateProperty
CreateRelation
CreateTableDef
CreateUser
CreateWorkspace
CURRENCY
CurrentUser
-D
DATABASE
DATE
DATETIME
DELETE
DESC
Description
DISALLOW
DISTINCT
DISTINCTROW
Document
DOUBLE
DROP
-E
Echo
Else
End
Eqv
Error
EXISTS
Exit
-F
FALSE
Field, Fields
FillCache
FLOAT, FLOAT4, FLOAT8
FOREIGN
Form, Forms
from
Full
FUNCTION
-G
GENERAL
GetObject
GetOption
GotoPage
GROUP
GROUP BY
GUID
-H
HAVING
-I
Idle
IEEEDOUBLE, IEEESINGLE
If
IGNORE
Imp
IN
INDEX
Index, Indexes
INNER
INSERT
InsertText
INT, INTEGER, INTEGER1, INTEGER2, INTEGER4
INTO
IS
-J
JOIN
-K
KEY
-L
LastM ......

using OPENDATASOURCE Select Access Data Base data

using OPENROWSET Select Access Data Base Data

文摘《'excel导入access》

access中case替代方法

用Javascript连接Access数据库的方法

用Javascript连接Access数据库的方法

Access保留字