急急!哪位大侠可以发一份现成的自动建立access数据源的源程序过来?急用。高分相赠!

foxmx 2002-12-20 12:00:51
PB7以上版本.
最好是win98/2000通用。
谢了谢了!!!!
...全文
16 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
foxmx 2002-12-20
  • 打赏
  • 举报
回复
发过来后请在这里留言,以便赠分!
foxmx 2002-12-20
  • 打赏
  • 举报
回复
忘了告诉各位邮件地址:foxmx@etang.com
谢谢了!
loafer78 2002-12-20
  • 打赏
  • 举报
回复
//在程序中建立odbc数据源
if(RegistryGet( "HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\wssp", "Title", RegString!, 字符串变量)= - 1) then

li_rtn=RegistrySet( "HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\wssp", "Title", RegString!, "wssp")

li_rtn=RegistrySet( "HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\wssp", &
"Driver",RegString!,数据库驱动路径+'\dbodbc7.dll')
li_rtn=RegistrySet( "HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\wssp" ,&
"DatabaseFile",RegString!,数据文件路径+'\wssp.db')
li_rtn=RegistrySet( "HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\wssp" ,&
"start",RegString!,数据库驱动路径+'\dbeng7.exe -c8m')

li_rtn=RegistrySet( "HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\wssp" ,&
"AutoStop",RegString!,'Yes')
li_rtn=RegistrySet( "HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\WSSP" ,&
"Integrated",RegString!,'NO')
end if


是asa数据库的 wssp是 odbc 数据源名称
access的只是数据库驱动不同,还可以看看注册表中access数据原的格式改一下。
YewPu 2002-12-20
  • 打赏
  • 举报
回复
哈哈!我没有。

1,072

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 相关问题讨论
社区管理员
  • 基础类社区
  • WorldMobile
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧