开发学院软件开发 VC 用 InstallShield6.22 制作带 ODBC 安装软件阅读

用 InstallShield6.22 制作带 ODBC 安装软件

　2007-03-17 21:27:31　来源：WEB开发网　闂傚倷绶氬ḿ褍螞閹绢喖绠柨鐕傛嫹

闂傚倷绀侀幉锟犲垂閻㈠灚宕查柟鎵閸庡秵銇勯幒鎴濃偓鐢稿磻閹炬枼妲堟繛鍡楃С濞岊亞绱撻崒姘扁枌闁瑰嚖鎷�

婵犵數濮幏鍐川椤撴繄鎹曢梻渚€娼уú銈吤洪妸鈺佺劦妞ゆ帊鑳堕埊鏇㈡煏閸モ晛浠х紒杈╁仱閺佹捇鏁撻敓锟�闂傚倷绶氬ḿ褍螞閹绢喖绠柨鐕傛嫹　　闂傚倷鑳舵灙缂佺粯顨呴埢宥夊即閵忕姵鐎梺缁樺姇閻忔氨鈧凹鍓熷娲垂椤曞懎鍓伴梺閫炲苯澧紒澶婄秺瀵濡歌閸嬫捇妫冨☉娆忔殘闂佷紮缍€娴滎剟鍩€椤掑倹鏆柛瀣躬瀹曚即寮借閺嗭箓鏌ㄩ悤鍌涘

核心提示： ......//注册表注册RegDBSetDefaultRoot ( HKEY_CURRENT_USER );if(RegDBKeyExist("Software\ODBC\ODBC.INI\oil")<0) thenif(RegDBKeyExist("

......//注册表注册
RegDBSetDefaultRoot ( HKEY_CURRENT_USER );
if(RegDBKeyExist("Software\ODBC\ODBC.INI\oil")<0) then
　　if(RegDBKeyExist("Software\ODBC\ODBC.INI")<0) then
　　　　if(RegDBKeyExist("Software\ODBC")<0) then
　　　　　　RegDBCreateKeyEx ("Software\ODBC","");
　　　　endif;
　　　　RegDBCreateKeyEx ("Software\ODBC\ODBC.INI","");
　　endif;
　　RegDBCreateKeyEx ("Software\ODBC\ODBC.INI\oil","");
else
　　RegDBDeleteKey ("Software\ODBC\ODBC.INI\oil");
　　RegDBCreateKeyEx ("Software\ODBC\ODBC.INI\oil","");
endif;
if(RegDBKeyExist("Software\ODBC\ODBC.INI\ODBC Data Sources")<0) then
　　RegDBCreateKeyEx ("Software\ODBC\ODBC.INI\ODBC Data Sources","");
endif;
RegDBSetKeyValueEx ( "Software\ODBC\ODBC.INI\oil", "DBQ" , REGDB_STRING ,　
TARGETDIR+"\data\se.mdb" , -1);
　
RegDBSetKeyValueEx ( "Software\ODBC\ODBC.INI\oil", "Driver" ,
　　　　　　　　　　　　　　　　　 REGDB_STRING , WINSYSDIR+"\odbcjt32.DLL" , -1);
RegDBSetKeyValueEx ( "Software\ODBC\ODBC.INI\oil", "FIL" , REGDB_STRING , "MS Access;" , -1);
RegDBSetKeyValueEx ( "Software\ODBC\ODBC.INI\oil", "UID" , REGDB_STRING ,"" , -1);
RegDBSetKeyValueEx ( "Software\ODBC\ODBC.INI\oil", "DriverID" , REGDB_NUMBER ,"25" , -1);
RegDBSetKeyValueEx ( "Software\ODBC\ODBC.INI\oil", "SafeTransactions" , REGDB_NUMBER ,"0" , -1);
RegDBSetKeyValueEx ( "Software\ODBC\ODBC.INI\ODBC Data Sources", "oil" ,
　　　　　　　　　　　　　　　　　 REGDB_STRING ,"Driver do Microsoft Access (*.mdb) " , -1);
......

呵呵，剩下的就是在桌面上创建一个快捷方式了我们在Onfirstuibefore函数里面加入：

//创建快捷方式
if(SprintfBox(OK|CANCEL,"请选择","%S","您想在桌面上创建快捷方式？")) then
　 AddFolderIcon(FOLDER_DESKTOP,"**软件",TARGETDIR+"OIL.exe",
　　　　　　　　　　　　　　　TARGETDIR,TARGETDIR+"\media\GREEN.ICO",0,"",REPLACE);
endif;
AddFolderIcon(FOLDER_PROGRAMS,"**软件",TARGETDIR+"oil.exe",
　　　　　　　　　TARGETDIR,TARGETDIR+"\media\Applications HotSync.ico",0,"",REPLACE);
return 0;

结束语：

其实不一定是ODBC数据库，其他的如sql、oracle等等数据库都可以先手动创建一个数据源然后看一下注册表的变化，我们就知道怎样用程序来添加数据源了，大家可以举一反三。最后感谢vc知识库，他给了我很大的帮助，里面有很多同道中朋友的精诚奉献。

上一页 1 2 3 4