读取*.db数据库文件的软件

读取*.db数据库文件的软件,第1张

.dat和.db直接用记事本就可以打开,打开后可以看见里面的内容,但排列不规律,你必须得知道读取数据的方法才可以正确读取,(比如第一个字段要读取多少个字节,或者第一个字段需要从哪个位置开始读),如果使用程序读取的话,直接使用文件名.db就可以了.

你缺少自动连接数据库的语句.你是用ASA数据库吧.得用到以下语句在你源程序的Application的open事件中:

//其中dsn_name为你所建立的数据源名字

gs_curpath = space(100)

GetCurrentDirectoryA(100,gs_curpath)//获得程序路径

gs_curpath = trim(gs_curpath)

if right(gs_curpath,1)<>'\' then

gs_curpath = gs_curpath+"\"

end if

RegistryDelete ("HKEY_CURRENT_USER\software\odbc\odbc.ini\odbc data sources", dsn_name )

RegistryDelete ("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name, "" )

//如果没有此句,odbc中无此数据源名称,但可以用

registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\odbc data sources",dsn_name,regstring!,"Adaptive Server Anywhere 8.0")

registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name,"AutoStop",regstring!,"Yes")

registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name,"DatabaseFile",regstring!,gs_curpath + db_filename)//db_filename为你数据库名字

// registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name,"Debug",regstring!,"NO")

// registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name,"DisableMultiRowFetch",regstring!,"NO")

registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name,"Driver",regstring!,gs_curpath+"dbodbc8.dll")

registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name,"Integrated",regstring!,"NO")

registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name,"PWD",regstring!,"sql")

registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name,"UID",regstring!,"dba")

registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name,"Start",regstring!,gs_curpath+"dbeng8.exe -q -cl 32m")

// registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name,"Start",regstring!,gs_curpath+"dbeng8.exe -d -qp -cl 8m")

//registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name,"ServerName",regstring!,gs_curpath+"dbsrv8.exe")

//registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name,"DataBaseName",regstring!,"HTCTS1.0")

// registryset("HKEY_CURRENT_USER\software\odbc\odbc.ini\" + dsn_name,"Start",regstring!,gs_curpath+"dbeng8.exe -Q ")

//用户名和口令不注册,以保安全,下面连接时输入正确的用户名和口令即可。end if

SQLCA.DBMS = "ODBC"

SQLCA.DBParm = "ConnectString='DSN=" + dsn_name + "UID=dbaPWD=sql'"

SQLCA.AutoCommit = False

connect

//还需要一些文件 你从网上down就行了


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/sjk/6734559.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-03-27
下一篇 2023-03-27

发表评论

登录后才能评论

评论列表(0条)

保存