VFP 愛用者社區

jp215 · 註冊時間: 2006-02-12 文章: 29 第 1 樓

我用ADO在不带密码的数据库中加入了数据但不知怎样在带密码的ACCESS数据库中加入数据,请各位指教,不甚感激!!!

jp215 · 註冊時間: 2006-02-12 文章: 29 第 2 樓

我已解决了此问题,谢谢大家

行者孙 · 註冊時間: 2006-03-11 文章: 43 第 3 樓

如果妳知道密碼ADO可以直接操作ACCESS如果不知道密碼，可以先寫斷代碼破解密碼
如有需要我可以公佈我寫得破解ACCESS所有版本密碼得算法！

VFP001 · 註冊時間: 2006-08-16 文章: 8 來自: 中国江苏 第 4 樓

两位大师好：
　　与二位相与，小弟太无知了，甭说带密码了，就是不带密码，我也无法实现将Access数据读入BDF，将DBF中数据写成Access。
　　请大师指点一下，这个问题到哪查找资料。

VFP001 · 發表於: 星期四八月 17, 2006 9:35 am 文章主題:

jp215
您好！您能将“在ACCESS数据库中加入数据的源代码”让我学习学习吗，我将不甚感激!!!我急需解决此事。

jp215 · 註冊時間: 2006-02-12 文章: 29 第 6 樓

LOCAL oConn AS ADODB.Connection,cStrung AS Character,oRs AS ADODB.RecordSet
*@0,0 CLEA
*gfl1=GETFILE("mdb","新生代数据库","OPEN",1)
*GFL=ALLTRIM(GFL1)
cString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="-"&GFL"-";jet oledb:database password=10"
oConn=CREATEOBJECT("ADODB.Connection") &&建立连接对象
oConn.Open(cString) &&打开连接
oRs=CREATEOBJECT("ADODB.RecordSet") &&建立记录集合对象
oRs.Open("SELECT * FROM cdsj",oConn,1,3,1) &&读取数据，建立游标

VFP001 · 發表於: 星期四八月 17, 2006 7:13 pm 文章主題:

首先非常感谢您向我提供如此详细的代码。
不知怎么，在运行到下面语句时出现错误，
oConn.Open(cString) && 打开连接
错误提示是“OLE IDispath 异常代码 0 出自 Microsoft JET Database Engine:?????? c:\cg\xx_g.mdb”。..

另外，小弟还想请教一下：
oRs.Open("SELECT * FROM cdsj",oConn,1,3,1) && 读取数据，建立游标

这个函数中的后三个参数各是什么含义。
小弟不知在什么地方看过“cursor”的解释，它是 current set of recorts缩写，大概意思是“当前记录集”——临时数据集。

jp215 · 註冊時間: 2006-02-12 文章: 29 第 8 樓

在爱用者里可查找得到