Blog信息 |
blog名称:注册会计师(注会)练习软件 日志总数:398 评论数量:116 留言数量:27 访问次数:3268916 建立时间:2005年6月6日 |

| |
[delpih编程]动态建立数据库,找不到可安装的ISAM 的解决 软件技术
吕向阳 发表于 2009/6/13 21:16:40 |
找不到可安装的ISAM ,特别要注意大小写。varstr, filename: string;CreateAccess: OleVariant;beginstr := formatdatetime('yyyymmdd', now);filename := extractfilepath(application.ExeName);if lastpos('\', filename) = length(filename) thenfilename := filename + str + '.md'elsefilename := filename + '\' + str + '.md';filename := stringreplace(filename, '\', '+', [rfreplaceall]);filename := stringreplace(filename, '+', '\\', [rfreplaceall]);CreateAccess := CreateOleObject('ADOX.Catalog');CreateAccess.Create('Provider=Microsoft.Jet.Oledb.4.0;Data Source=' + filename);CreateAccess := Unassigned;end;这里已改正确了一直提示找不到可安装的ISAM ===========问题出在这。'Provider=Microsoft.Jet.Oledb.4.0;Data Source=' + filename);仔细的检查看了一下数据链接字符串,改为正确大小写就可以了,分号也不能漏。 |
|
|