【转载 / 源码】MVPS.COM的Access源码集

LucasLynn

这是MVPS.ORG上所有的Access源码下载清单，我将在今后几天内陆续将其翻译成中文。

» API

<OL>

[显示对话框] 调用系统“文件打开/保存”对话框

[显示对话框] 调用系统“浏览文件夹”对话框

[显示对话框] 调用系统“打印”对话框”

[显示对话框] 调用系统“图片载入中”对话框”

[显示对话框] 调用系统“颜色选择”对话框

[显示对话框] 调用系统“字体选择”对话框

[显示对话框] 改变打开文件对话框上的按钮文字

[文件操作] 获取一个序列中特定的文件名

[文件操作] 获取本地和网络磁盘列表

[文件操作] 获取临时、系统、安装文件夹路径

[文件操作] 获取长/短文件名

[文件操作] 获取临时的特定文件名

[文件操作] 查找文件

[文件操作] 获取特殊文件夹路经

[文件操作] 获取打开指定数据文件的EXE程序的路径

[鼠标] 监视IntelliMouse鼠标滚轮

[鼠标] 显示自定义鼠标图标

[鼠标] 编辑时改变鼠标

[鼠标] 从浏览器中拖放

[操作系统] 调用操作系统并等待完成

[操作系统] 播放MIDI/AVI/WAV文件

[操作系统] 关闭计算机

[操作系统] 列举系统字体

[操作系统] 测试可用的显示分辨率

[操作系统] 读取注册表中的键值

[操作系统] 从代码中读写Internet Explorer地址

[系统信息] 获取当前Windows登录用户名

[系统信息] 获取当前Windows登陆用户全名

[系统信息] 获取当前计算机名

[系统信息] 获取当前操作系统名

[系统信息] 获取当前的NT服务器时间

[系统信息] 获取当前用户的NT域名

<a href="http://www.mvps.org/access/api/api0012.htm" target="_blank" >[系统信息] 获取当前Windows环境

LucasLynn

&raquo; Forms

<OL start=127>

Use Variables in SQL behind forms

Find out if a form is open

Cycle through controls with common names

Enumerate all controls on a form

Have the form move to the record selected in List/Combo box

Return Strings from Option Groups

Use Multi-Select List boxes as query parameters

Grab what the user has typed in a control (uncommitted value)

Fill Fields automatically on form based on a control's value

Detect new record in a form

Move cursor to the end of text in a textbox

Carry current value of a control to new records

Form doesn't open as Modal even though Modal property is set to true

Suspend code until a popup form is closed

Add item to combo box using OnNotinList event

Disable PgUp/PgDown keys in a form

Determine name of parent form

Resolve #Name error in a formeport

Use ControlTipText to display textbox value

Make a label flash

Delete current record

#Error when the Subform has no records

Cannot ApplyFilter on SubForm

Colors and Continuous forms

Refer to Controls on a tabbed form

Duplicate "Record x of y"

Ask before saving record

Limit content of combo/list boxes

Hide a subform if no records present

Handle/Display images in forms/database

Refer to Form and Subform properties and controls

Create a clock on a form

Determine selected records in datasheet view

<a href="http://www.mvps.org/access/forms/frm0034.htm" target

LucasLynn

  

&raquo; Modules

<OL start=223>

Convert Currency ($500) into words (Five Hundred Dollars)

Use variables to call functions

Read Word Document Properties (Author, Last Print Date etc.)

Return a concatenated list of sub-record values

Opening another database in the same instance

Sample Excel Automation

Run Excel Macros through Automation

Concatenate fields in same table

Check to see if a File or Directory exists

Filter a recordset

Disable Shift key

Domain Aggregate Functions Replacements

Use Class modules to return Dir and File names

Check if an object exists in the database

Use FTP

Conquer RunCommand Constants

VB Switchboard Utility

Import Outlook 98 messages

Send Email using CDO/Outlook 98

VB5 Compact Database utility (Access 97)

Maintain a history of changes

References Wizard

Class Builder Wizard

Compile Project

PrivDBEngine and Startup Properties

Forms Wizard

Bill Of Materials

Using WithEvents to get saved filenames

Access Downsizer

Access 97 Compactor Addin

Code Comment Builder Wizard

Class Information Wizard

TSI Synchronizer

Creating a reference to a Class in a Library database

<a href="http://www.mvps.org/access/modules/mdl0035.htm" target="_blank" >Transferring Records to Excel with Automation

LucasLynn

&raquo; Tables

• How to find out if a table exists in a database
  
• "Too many fields defined" error message
  
• Referential Integrity between databases
  
• Hide a table in Database Window
  
• Have Autonumber field start from a value different from 1
  
• How to perform Seek on Linked Tables
  
• Retrieve linked database namepath
  
• Create Hyperlink Field from code
  
• Relink Access tables from code
  
• Relink ODBC tables from code
  
• Oracle Synonyms
  
• Relink tables from different datasources
  
• Sub-classing Entities
  
• Creating DSNs from code
  
• Synchronization without Replication
  
• Creating an AutoNumber field from code
  
• Lookup Table Manager
  
• Recover records from a corrupt table

lanchong

哪个有空做个完整包好吗？一点点下很累啊？

LucasLynn

以下是引用lanchong在2005-9-29 13:02:00的发言：

哪个有空做个完整包好吗？一点点下很累啊？

做完整包未必比分开下载好。这些源码你不可能都用到，只需要有一张便于查找的清单，需要的时候下载自己所需的即可。

另外链接指向的页面也包含了这个源码的重要信息，如果要下载使用某个源码，这个页面也是必须要看的。

[此贴子已经被作者于2005-9-29 13:12:05编辑过]

lanchong

以下是引用LucasLynn在2005-9-29 13:09:00的发言：









做完整包未必比分开下载好。这些源码你不可能都用到，只需要有一张便于查找的清单，需要的时候下载自己所需的即可。

另外链接指向的页面也包含了这个源码的重要信息，如果要下载使用某个源码，这个页面也是必须要看的。

LucasLynn

以下是引用lanchong在2005-9-29 14:29:00的发言：

呵呵，那你就动手做一个吧，记得发一份给我。

Trynew

这是binbow_z整理的MVPS网站的精华源码，使用zhuyiwen推荐的elib软件制作的电子书：

http://www.office-cn.net/upload/software/mvps.exe

下面是MVPS网站自带的仿Web页的MDB程序，既是一个打包文件，又是一个经典的源码例程：





不过，LucasLynn 花费大量时间和精力所作并作了翻译的分类链接，使用查找起来非常方便，前提是你要有宽带网。

LucasLynn

以下是引用Trynew在2005-9-29 14:45:00的发言：



这是binbow_z整理的MVPS网站的精华源码，使用zhuyiwen推荐的elib软件制作的电子书：

http://www.office-cn.net/upload/software/mvps.exe

下面是MVPS网站自带的仿Web页的MDB程序，既是一个打包文件，又是一个经典的源码例程：





不过，LucasLynn 花费大量时间和精力所作并作了翻译的分类链接，使用查找起来非常方便，前提是你要有宽带网。

是的，我主要的目的并不是转贴这些源码，否则我只需要把那个列表网页的地址转贴过来就行了，我的想法是在今后几天内将标题全部翻译成中文，并进行更加详细的分类，便于要用的时候快速查到。

其实那些源码都不大，真的需要的时候，花几分钟下载的时间，还不够看完源码的说明呢。