在install shield 中如何配置odbc

[bearly]

请问有那位高手知道在install shield 中如何
配置sql anywhere5 的数据源
多谢！

[softdoctor]

Install shield 允许调用动态库，动态库中的函数有一定要求

动态库函数原形
用VC编译
#include <windows.h>
#include <sql.h>
#include <ODBCINST.H>
#include <sqlext.h>
#include <sqltypes.h>

BOOL ConfigDSN( HWND hWnd,long lRet,LPCTSTR szValue)
{
LPSTR szDataSourceName, szFileName;
szDataSourceName = (LPTSTR)szValue;

szFileName = strstr(szValue,",");
if(szFileName)
{
*(szFileName)='\0';
szFileName++;
}
else
return FALSE;
char szDSN[200],*pszTemp;
strcpy( szDSN, "DSN=" );
strcat( szDSN, szDataSourceName );

pszTemp = szDSN+strlen(szDSN)+1;
strcpy( pszTemp, "DBQ=" );
strcpy( pszTemp+strlen(pszTemp), szFileName );
strcpy( pszTemp+strlen(pszTemp)+1, "\0" );

//这里以Access为例 您只需替换 "Microsoft Access Driver (*.mdb)"
if( !SQLConfigDataSource( NULL, ODBC_ADD_DSN, "Microsoft Access Driver (*.mdb)", szDSN ) )
{
return FALSE;
}
return TRUE;
}

在SetupRegistry中调用动态库函数

// 假设该动态库为 Register.dll
szRegPath = TARGETDIR^"\Bin\\Register.dll";
szDBPath = "GridDemo,"+TARGETDIR^"\Demo\\DemoDB\\ybzy.mdb";
CallDLLFx ( szRegPath, "ConfigDSN" , lRet ,szDBPath );