主题:  如何让ODBC中的DSN自动添加??

amstar

职务:普通成员
等级:1
金币:0.0
发贴:14
#12002/4/10 11:26:23
--------------------------------------------------------------------------------
用AW作好了一个课件即将发布,现在有个问题需要解决:课件中使用了ODBC连接,但如何让用户在不需要执行安装程序(比如VB制作的安装程序)的情况下,由AW自。动将DSN添加



燕云

职务:普通成员
等级:2
金币:10.0
发贴:600
#22002/4/12 9:14:33
tMsDSN.u32中有这个函数


云网媒体【YZCNET.COM】云网媒体开展软件技术、互联网技术、电子商务技术、多媒体设计等服务; 其中包括 :软件开发、网站建设、手机服务、多媒体设计、 图片及演示文稿服务等;

东亚

职务:普通成员
等级:1
金币:0.0
发贴:3
#32002/4/12 15:08:55
:eekbReqType:=4

dbType:="Microsoft Access Driver (*.mdb)"
--数据库是Access类型
dbList:="DSN=CollegeDSN;"
--定义数据源名为CollegeDSN
dbList:=dbList^"Description=ODBC DSN;"

dbList:=dbList^"FIL=MS Access;"

dbList:=dbList^"DBQ="^FileLocation^"college.mdb"
--数据库的路径
result:=tMsDBRegister(dbReqType,dbType,dbList)
DatabaseName:="collegeDSN"
SQLString:="Select 姓名,专业,学号 From 学员表 "
ODBChandle:=ODBCOpen(WindowHandle,"ODBCError",DatabaseName,"","")
odbcdata:=ODBCExecute(ODBChandle,SQLString)
ODBCClose(ODBChandle)

如果需要远程许:QQ 59899129