installshield 注册dll

function OnFirstUIAfter()
    STRING szTitle, szMsg1, szMsg2, szOpt1, szOpt2;
    NUMBER bOpt1, bOpt2;
begin
	Disable(STATUSEX);

	bOpt1   = FALSE;
    bOpt2   = FALSE;    

    if ( BATCH_INSTALL ) then
    	SdFinishReboot ( szTitle , szMsg1 , SYS_BOOTMACHINE , szMsg2 , 0 );
    else
	    SdFinish ( szTitle , szMsg1 , szMsg2 , szOpt1 , szOpt2 , bOpt1 , bOpt2 );
	endif;  
	CopyFile(INSTALLDIR^"CloudClient.dll", WINDIR ^ "Microsoft.NET\\Framework\\v4.0.30319\\CloudClient.dll");
	CopyFile(INSTALLDIR^"HtmlAgilityPack.dll", WINDIR ^ "Microsoft.NET\\Framework\\v4.0.30319\\HtmlAgilityPack.dll");
	CopyFile(INSTALLDIR^"Newtonsoft.Json.dll", WINDIR ^ "Microsoft.NET\\Framework\\v4.0.30319\\Newtonsoft.Json.dll");
	LaunchAppAndWait(WINDIR ^ "Microsoft.NET\\Framework\\v4.0.30319\\RegAsm.exe", "CloudClient.dll", WAIT);
	MessageBox("注册成功", INFORMATION);     
end;

  

posted @ 2014-05-08 17:35  红鲤鱼与驴与绿鲤鱼  阅读(593)  评论(0编辑  收藏  举报