* --------------------------------------------
* 程序: 创建.压缩access数据库并修改密码演示 【程序编程相关:MFC入门】 【推荐阅读:DataGrid中单元格的比较】* 设计: 红雨 【扩展信息:从 .NET 开发人员的角度理解 Exc】 * -------------------------------------------- local lcmdbfile, lcretustr lcmdbfile = [c:\temp\testcreamdbfile.mdb] lcpswd1 = [test1] lcpswd2 = [test2] lcpswd3 = [test3] lcretustr = [创建.压缩access数据库并修改密码演示:] + chr(13)if createmdb( lcmdbfile, lcpswd1)
lcretustr = lcretustr + chr(13) + [1.创建数据库成功 - 密码: ] + lcpswd1 if compactmdb( lcmdbfile, lcpswd1, lcpswd2 ) lcretustr = lcretustr + chr(13) + [2.压缩并修改密码成功 - 密码: ] + lcpswd2 if changemdbpassword( lcmdbfile, lcpswd2, lcpswd3 ) lcretustr = lcretustr + chr(13) + [3.单独修改数据库密码成功 - 密码: ] + lcpswd3 else lcretustr = lcretustr + chr(13) + [3.单独修改数据库密码失败] endif else lcretustr = lcretustr + chr(13) + [2.压缩并修改密码失败] endif else ... 下一页