Access 2003是由微软发布的关联式数据库管理系统。它结合了 Microsoft Jet Database Engine 和图形用户界面两项特点，是 Microsoft Office 的系统程式之一。

Access 2003系统简介：

Access 2003是微软把数据库引擎的图形用户界面和软件开发工具结合在一起的一个数据库管理系统。Access 2003是微软OFFICE的一个成员, 在包括专业版和更高版本的office版本里面被单独出售。

MS ACCESS以它自己的格式将数据存储在基于Access Jet的数据库引擎里。它还能够直接导入或者链接数据(这些数据存储在其他应用程序和数据库)。

软件开发人员和数据架构师能够使用Access 2003开发应用软件,“高级用户”能够使用它来构建软件应用程序。和其他办公应用程序一样，ACCESS支持Visual Basic宏语言,它是一个面向对象的编程语言,能够引用各种对象，包括DAO(数据访问对象),ActiveX数据对象,以及许多其他的ActiveX组件。可视对象用于显示表和报表，他们的方法和属性是在VBA编程环境下，VBA代码模块能够声明和调用Windows操作系统函数。

Access 2003功能：

Access 2003在很多地方得到广泛使用，例如小型企业，大公司的部门。  

Access 2003的功能体现在两个方面：

一、用于进行数据分析： 

access有强大的数据处理、统计分析能力，利用access的查询功能，能够方便地进行各类汇总、平均等统计。并可灵活设置统计的条件。比如在统计分析上万条记录、十几万条记录及以上的数据时速度快且操作方便，这一点是Excel无法与之相比的。 这一点体现在：会用access，提高了工作效率和工作能力。

二、用于开发软件： 

access用于开发软件，比如生产管理、销售管理、库存管理等各类企业管理软件，其最大的优点是：易学！非计算机专业的人员，也能学会。低成本地满足了那些从事企业管理工作的人员的管理需要，通过软件来规范同事、下属的行为，推行其管理思想。（VB、.net、 C语言等开发工具对于非计算机专业人员来说太难了，而access则很容易）。 这一点体现在：实现了管理人员（非计算机专业毕业）开发出软件的“梦想”，从而转型为“懂管理+会编程”的复合型人才。

另外，在开发一些小型网站WEB应用程序时，用于存储数据。例如ASP+Access。这些应用程序都利用ASP技术在InternetInformation Services运行．比较复杂的WEB应用程序则使用PHP/MySQL或者ASP/Microsoft SQL Server．

Access 2003优势：

Access 2003 Basic提供了一个丰富的开发环境。这个开发环境给你足够的灵活性和对Microsoft Windows应用程序接口的控制，同时保护你使你免遭用高级或低级语言开发环境开发时所碰到的各种麻烦。不过，许多优化、有效数据和模块化方面只能是应用程序设计者才能使用。开发者应致力于谨慎地使用算法。除了一般的程序设计概念，还有一些特别的存储空间的管理技术，正确使用这些技术能够提高应用程序的执行速度，减少应用程序所消耗的存储资源。 

提高速度和减少代码量

你能够用几种技巧来提高你的编码速度，但是却找不到有效的算法的替代者。接下来的这几点建议能够提高你的编码速度同时又减少你的应用程序消耗的存储空间。 

用整形数进行数学运算

即使Access 2003 会使用一个联合处理器来处理浮点型算术，整型数算术也总是要快一些。当你的计算不含有小数，尽量使用整型或长整型而不是变量或双整型。整型除法同样也要比浮点除法要快。在使用其他一些有效的数据类型时会警告：没有任何东西能够替换有效的运算法则。 

避免使用过程调用

避免在循环体中使用子程序或函数调用。每一次调用都因额外的工作和时间而给编码增大了负担。每一次调用都要求把函数的局部变量和参数压栈，而栈的大小是固定的，不能随便加大，并且同时还要于Access 2003共享。 

谨慎使用不定长数据类型

不定长数据类型提供了更大的灵活性，比如说许可正确处理空值和自动处理溢出。另外这种数据类型比传统的数据类型要大并消耗更多的存储空间。前面还曾经提到过，不定长数据类型的变量在数学计算中比较慢。 

用变量存放属性

对变量进行查找和设置都比对属性进行这些操作要快。假如你要得到或查阅一个属性值许多次，那么把这个属性分配给一个变量，并用这个变量来代替属性，那么你的代码将要运行快得多。例如，在一个循环中，你查阅某表格中得一个控制的属性，那么在循环外把属性分配给一个变量，然后在循环中用查询一个变量来代替查阅一个属性的方法要比较快。 

预载表格

当你的应用程序启动并且把它们的可见属性设置位‘false’时，假如你安装了你所有的表格，那么你的应用程序的性能会让你感觉挺快。当你需要显示一个表格时，你只需要把该表格的可见属性设置为‘true’，这要比安装一个表格要快得多。需要记住的是，为你安装的每个表格，你都要从应用程序的全局堆中消耗存储空间。

Access 2003使用方法：

通过使用Access Basic能够增加应用程序的执行速度，减少编码量，同时也减少在为Microsoft Windows应用程序接口编程时、在开发应用程序中遇到的问题的技术。谨慎地使用变量和它所占用的存储空间能有效地减少一个应用程序所消耗的资源，同时也全面提高了它的性能。 不正确地调用Windows应用程序接口也许会产生一些意想不到的副作用，以及潜在地对一个应用程序的代码及数据段的破坏。因此正确地使用一个空的32位指针在Access 2003 中是十分必要的。 

当对表格和报表进行操作时，Access 2003有一个无正式文本的特性。这个特性许可你从设计视窗性质sheet window中进行过程调用，调用的方法时同时按下shift和F2键。

使用唯一的别名

在Access Basic中，假如你知道入口点（动态链接库中函数的名字），你能够调用动态链接库中的外部函数。不过，使用这一方法的限制性在于你只能声明外部函数一次。假如你安装了调用了你的模块调用的相同的Windows应用程序接口，你不会得到一个不为人所知的错误：试图用相同的函数定义安装模块。 

你尝试安装的模块要么是包含有相同的函数名，要么是包含在已存在的模块中有的过程名。删除这些过程，在EDIT菜单中使用FIND命令找到重复的过程名，要解决这一问题，你需要使用一种叫做“别名使用“的技术。这种技术许可你给你的过程一个独一无二的名字。但是，你选择的别名也有也许不是独一无二的，所以要使你取的名字唯一，你能够用初始值和下划线优先声明你所有从动态链接库中调用的过程，比如，声明getActiveWindow为： 

Declare bcb_GetActiveWindow Lib "Kernel" Alias "GetActiveWindow" () As Integer.

传递空指针给动态库

一个空的32位指针是有效的或是为一些动态链接库要求具有参数。要指定一个空值，使用0&。当你的函数调用一个过程并传递一个表达式0&，“&”指定一个32位的空指针，在函数声明中，一个AS ANY参数指示Access Basic对那个参数不进行类型检查，同时把值传递到被调用的函数。 

下面的编码示范了一个正确的方法，告诉你如何声明一个给动态链接库中的过程传递一个空指针参数的Access Basic函数。这段声明了WriteProfileString应用程序接口函数。这个函数来自于外部Windows动态链接库“kernel”。 

Declare Function WriteProfileString Lib "Kernel" 

(ByVal lpApplicationName As Any, ByVal lpKeyName As Any, ByVal lpString As Any)

接下来的函数调用了一个外部过程，为每个参数指定一个空值。这将使WriteProfileString充满它的内部高速缓冲区，并且WIN.INI的任何变化写到磁盘上。 

重要的对这个函数不正确的使用会引起一般性的保护故障或修改你的WIN.INI文件。 

Function nFlushIniCache() 

nFlushIniCache = WriteProfileString (0&, 0&, 0&) 

End Function

动态库调用无符号整数

常常有这样一种情况，要从外部动态链接库调用的过程中返回一个两个字节长的无符号整型数。然而Access Basic不支持这种数据类型。正确地计算这种数据类型需要把它从一个无符号整型数转换程Access Basic长数据类型。 

Access Basic整型数的范围使从-32768到32767。一个无符号整型数的范围是从0到65535。Access Basic用最明显的一位来放置数值的符号位，所以当数值超过32767，第16位将被置成负数符号。要计算一个无符号整型数，你必须人工调整第16位。 

从无符号整型数转换到Access Basic长整型数或从Access Basic的长整型转换成无符号整型数有两种方法。第一种方法用到了最基本的数学运算（65535被无符号整型值加或减）。第二种方法使用Bitwise操作。实际上，算术方法和Bitwise方法工作起来效果一样，只不过，算术方法也许可读性更强一些，而Bitwise方法在执行时也许更快一些。

算术方法

下面的lArithUintToInt (nUint)和lArithIntToUnint(lBytes)过程示范了如何使用转换无符号整型数的算术方法。第一个函数读进一个无符号整型数同时返回一个已经转变位长整型的值。第二个函数读入一个长整型值，然后返回一个转变成无符号整型的值。 

Function lArithUintToInt (nUint As Integer) 

If nUint < 0 Then 

lArithUintToInt = nUint + 65536 

Else 

lArithUintToInt = nUint 

End If 

End Function 

Function nArithIntToUnint (lBytes As Long) 

If lBytes > 32767 Then 

nArithIntToUnint = lBytes - 65536 

Else 

nArithIntToUnint = lBytes 

End If 

End Function

按位操作方法

下面的nBWUintToInt(lBytes) 和 lBWIntToUint(nUint)过程示范了如何使用Bitwise方法转换无符号整型数。第一个函数读进一个无符号整型数，然后返回一个已经转换成长整型的值。第二个函数读入一个长整型值，然后返回一个已经转换的无符号整型值。第二个函数中使用了提示框的语句是为了防范当传递到函数的值大于64KB时会出现溢出信息。

1 0 1 0 0 0 1 1 11 10 00 00 (41952) 

The functions follow: 

Function lBWIntToUint(nUint As Integer) 

lBWIntToUint = nUint And &HFFFF& 

End Function 

Function nBWUintToInt(lBytes As Long) 

Dim nTemp As Integer 

If lBytes > 65535 Then 

MsgBox "You passed a value larger than 65535" 

Exit Function 

End If 

nTemp = lBytes And &H7FFF 

nBWUintToInt = nTemp Or -(lBytes And &H8000) 

End Function

注意：&HFFFF&要求“&amp;”在16进制数的末尾。这样能保证32位的16进制数通过16位的值表示出来。

Access Basic中的技巧

在Access 2003 中有一些以前无正式文本的特性，它们许可你指定过程，这个过程是从一个from或report的属性工作表窗中调用的。要进入最小窗口，只需要同时按下SHIFT和F2键。

BUILDER FORM函数

假如在一个模块中一个函数的定义是以“Builderr Form”开始同时包含一个类似于Onclose属性或事件标识符，按下SHIFT和F2键就能够调用这个过程。例如，当你在一个form的设计窗口中，而当前的光标落在属性窗口中的Onclose事件的编辑控制上，按下SHIFT和F2键将能调用BuilderFormOnclose函数。这使用于form和reports的大部分属性和所有事件。下面的代码将说明函数的格式： 

Function BuilderFormOnClose (szFormName As String,

szControlName As String, szCurrentValue As String, szReserved As String) 

If szCurrentValue = "" Then 

DoCmd SelectObject A_MACRO, "", True 

SendKeys "%n%fs" & &quot;New Macro" & "{Enter}" 

Forms(szFormName).OnClose = "New Macro" 

Else 

DoCmd SelectObject A_MACRO, szCurrentValue, True 

SendKeys "%d" 

End If End Function

参数szFormName, szControlName, szCurrentValue, 和 szReserved必须声明，即使你从不使用它们。当你的函数被调用时，这些参数总是要被传递的。假如它们没有被声明，那么Access 2003将不会调用你的函数。假如有一个参数被分配到Onclose事件上，那么前面的过程将打开一个宏，假如编辑控制是空，那么代码产生一个名为“New Macro”的新宏，同时把编辑控制值设置为“New Macro”。诚然，前面的例子并不是非常完美，但它的确说明了要产生一个完美而有效的程序所必须的条件。

ASP中连接字符串应用

"Driver={Access 2003 driver(*.mdb)};dbq=*.mdb;uid=admin;pwd=pass;" 

dim conn

set conn = server.createobject("adodb.connection")

conn.open "provider=Microsoft.ACE.OLEDB.12.0;" & "data source = " & server.mappath("bbs.mdb")