用VFP列出ACCESS所有表的字段结构，含标题。
set safety off
local oo,lcStr,lcMdbFile,i,x,lnFields,lcTableName,lnFieldtype,lcCurdir
lcCurdir = sys(5) + curdir()
lcNowdir = getdir()
cd (lcNowdir)
oo = NEWOBJECT('Access.Application')
oo.AutomationSecurity = 1
oo.UserControl = .F.
lcMdbFile = getFile('mdb')
if not empty(lcMDBFile)
oo.OpenCurrentDatabase(lcMDBFile)
lnTables = oo.CurrentDb.TableDefs.Count
for i = 5 to lnTables - 1
lcStr = ''
lnFields = oo.CurrentDb.TableDefs(i).fields.count
*lcTableName = JUSTSTEM(lcMDBFile) + '_' + oo.CurrentDb.TableDefs(i).Name
lcTableName = oo.CurrentDb.TableDefs(i).Name
*use
if i = 5
* create Table (lcTableName) (字段名 char(10),类型 char(10),宽度 char(4),小数位 char(4),标题 char(50),对应字段 char(20))
create Table blank (字段名 char(9),类型 char(10),宽度 char(2),小数位 char(4),标题 char(24),对应字段 char(20),表名 char(10))
相关文档：
项目中用到了此功能。把大概做法跟大家共享下，希望对大家有所帮助。也给自己总结一下，激励自己再接再厉。下面中部分代码被汉字替换了，主要考虑到公司的产品权，希望谅解。
/// <summary>
......
using System;
using System.IO;
using System.Runtime.InteropServices;
using System.Threading;
using System.Windows.Forms;
using Microsoft.Win32;
using Access = Microsoft.Office.Interop.Access;
namespace ImageAccess
{
static class Program
{
......
ACCESS远程备份一直是个令人头疼的问题 看到一个不错的备份方法 分享下：
原文地址：http://www.cnblogs.com/catcat811/archive/2009/12/31/1637186.html
网站又关了~~~关得很突然，数据也来不及备份。因为公司有个仓库的系统在租用服务器上，如果停了就得重新点仓，那是很累人的事。最近网站时常关，真让人头痛。为了避� ......
前几天为制作一个网站，需要从ACCESS转至SQLSERVER，从网站上查看了很多的资料，但觉得没有一个能够全面覆盖要点的，所以我总结一下，顺便
给出一些经验。
首先如果一开始就需要制作SQLSERVER的网站，那么最好将你的爱机装上WINDOWS2000或者2003这样的SERVER版，这样的版本是支持
SQLSERVER正式 ......
