Chinaunix首页 | 论坛 | 博客
  • 博客访问: 572170
  • 博文数量: 208
  • 博客积分: 3286
  • 博客等级: 中校
  • 技术积分: 1780
  • 用 户 组: 普通用户
  • 注册时间: 2007-09-24 20:38
文章分类

全部博文(208)

文章存档

2012年(7)

2011年(28)

2010年(21)

2009年(76)

2008年(65)

2007年(11)

我的朋友

分类: 数据库开发技术

2009-03-26 10:59:41

这个例子是判断用户是否已安装Microsoft SQL Server或MSDE!如果没有安装则给出提示,提示用户必须要先安装并退出安装程序!

//---------------------------------------------------------------------------
// OnBegin
//
// The OnBegin event is called directly by the framework after the setup
// initializes.
//---------------------------------------------------------------------------
function OnBegin()
STRING szMsg;
STRING  sKey, sValue, sData;
    NUMBER  nType, nSize;
    NUMBER  nResult;
begin
// TO DO: you may change default non-UI setting, for example
//
// You may also perform your custom initialization steps, check requirements, etc.
if !MAINTENANCE then
   // 判断系统是否安装Microsoft SQL Server或MSDE
  sKey = "Software\\Microsoft\\Microsoft SQL Server"; 
     sValue = "InstalledInstances";
     szMsg = "Micorsoft SQL Server or MSDE was not found on this machine. This installation was designed to run only on the server machine.";
  RegDBSetDefaultRoot(HKEY_LOCAL_MACHINE);
  nResult = RegDBGetKeyValueEx ( sKey, sValue, nType, sData, nSize );
  if ( nResult < 0 )then
   // SQL Server registry key is missing
   SetDialogTitle ( DLG_MSG_INFORMATION, "Information" );
      MessageBox (szMsg,INFORMATION);
   abort;
  endif;
endif;
end;

阅读(1244) | 评论(0) | 转发(0) |
0

上一篇:msde启动

下一篇:installshield 8 脚本说明

给主人留下些什么吧!~~