Fråga : Hur man registrerar regsrv32 DLLs i avlägsen machi, genom att använda det delphi 7 programet

Förmiddag som I skapar en frigörarAutomation, bearbetar för mitt projekterar utplacering. Detta bearbetar kan vara kompetent att frigöra projektera från en bearbetar med maskin till mulitplefjärrkontrollen bearbetar med maskin. Få säkerhetskopia som applicerar det nytt, sparar och att registrera all DLLEN in i COM+-gruppen. Nu jag önskar att inkludera funktionsdugligheten till regisitering av något system krävde DLL in i regsrv32 delar upp för varje avlägsen dator. kan du hjälpa mig att registrera DLLEN in till fjärrkontrollen bearbetar med maskin, genom att använda Delphi Program.

Here kodifiera för registrering av DLL regsrv32 i lokalen machine.

Procedure TDeployAssistant.Registerwindowdll (WinPath: Stränga);
type
TRegFunc = fungerar: HResult; stdcall;
var
  ARegFunc : TRegFunc; aHandle för
: THandle;
begin
 try
//  ocxPath := ExtractFilePath (Application.ExeName) + ”Flash.ocx”; aHandle för
: = LoadLibrary (PChar (WinPath) );
, om begin
ARegFunc för then
för aHandle<> 0: = GetProcAddress (aHandle, ”DllRegisterServer”);
om tilldelad begin
/> frmDeploy.ExecAndWait (”regsvr32”, ”/s” + WinPath);
avslutar;
FreeLibrary (aHandle);
avslutar; except
ShowMessage för
(formatera (”Unable som registrerar %s”, [WinPath]));
avslutar;

end;
function TfrmDeploy.ExecAndWait (const ExecuteFile, ParamString: stränga): boolean;
var
  SEInfo: TShellExecuteInfo;
ExitCode: DWORD;
begin
FillChar (SEInfo, SizeOf (SEInfo), 0);
SEInfo.cbSize: = SizeOf (TShellExecuteInfo);
med SEInfo gör fMask för begin
: = SEE_MASK_NOCLOSEPROCESS;
Wnd: = Application.Handle; lpFile
: = PChar (ExecuteFile); lpParameters för
: = PChar (ParamString); nShow för
: = SW_HIDE;
avslutar;
om repeat
Application.ProcessMessages för begin
för ShellExecuteEx (@SEInfo) then
;
GetExitCodeProcess (SEInfo.hProcess, ExitCode);
till (ExitCode <> STILL_ACTIVE) eller Application.Terminated; Resultat för
: =True; resultat för end
för
annat: =False;
end; " klar "

Svar : Hur man registrerar regsrv32 DLLs i avlägsen machi, genom att använda det delphi 7 programet

Om du önskar att utföra, kodifiera på ANOTHER bearbetar med maskin dig behov, som en fjärrkontroll beskjuter av något sorterar. Om du söker för ”, utför kodifierar fjärrkontroll bearbetar med maskin” dig ska ser en raddadiskussion härom.

WMI är ännu en plattform som du kan haka in i.

http://blogs.technet.com/b/heyscriptingguy/archive/2005/07/01/how-can-i-launch-two-applications-wait-until-one-program-ends-and-then-close-the-other.aspx