Detect ASPNET AJAX Extensions

//===========================================================================
//
//  Topic:    ASP.NET AJAX Extensions
//
//  Description: 
//
//  My Name    : 
//
//===========================================================================
function  ASPNETAJAXExtensions()
      NUMBER nType,nvSize;
      STRING sPathRegitrySetup,svValue;
      STRING szKeyRoot,szKey;
      
 begin

		//nType = REGDB_STRING;
		//RegDBSetDefaultRoot (HKEY_LOCAL_MACHINE);
		//HKEY_CURRENT_USER\Software\Microsoft\ASP.NET\ASP.NET 2.0 AJAX Extensions 
		//HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\.NETFramework\v2.0.50727\AssemblyFoldersEx\ASP.NET AJAX Extensions
		//sPathRegitrySetup = "SOFTWARE\\Microsoft\\.NETFramework\\v2.0.50727\\AssemblyFoldersEx\\ASP.NET AJAX Extensions";
		//RegDBGetKeyValueEx (sPathRegitrySetup, "", nType,svValue, nvSize ); 
		//if(svValue=="")  then
			//if (AskYesNo("ASP.NET AJAX Extensions or later version was not installed in your system.\n\n Would you like to install it now?", YES ) = YES) then        
		     // if (LaunchAppAndWait("msiexec.exe","/i \""^SRCDIR^"Asp.net Ajax Extenstion\\ASPAJAXExtSetup.msi\"", LAAW_OPTION_WAIT) == 0) then 
		      	//MessageBox( " Thanh cong ASP",WARNING);
		      //else
		      	//MessageBox( "Khong Thanh cong ASP1",WARNING);     
		       // InformFinishASPNETAJAX();
		     // endif;
		   // endif; 
		// endif; 
		 //if(CheckCloseASPNETAJAX()==FALSE) then
		      // MessageBox("ASP.NET AJAX Extensions installation is not completed",WARNING);
		       //InformFinishASPNETAJAX();
		// endif;
		nType = REGDB_STRING;
		RegDBSetDefaultRoot (HKEY_CURRENT_USER);
		
		 szKeyRoot="Software\\Microsoft\\ASP.NET\\ASP.NET 2.0 AJAX Extensions";
		
		
		if (RegDBKeyExist (szKeyRoot) == 1) then
     		  
     		  else
     		  
     		  	if (AskYesNo("ASP.NET AJAX Extensions or later version was not installed in your system.\n\n Would you like to install it now?", YES ) = YES) then
     		  	 	if (LaunchAppAndWait("msiexec.exe","/i \""^SRCDIR^"Asp.net Ajax Extenstion\\ASPAJAXExtSetup.msi\"", LAAW_OPTION_WAIT|LAAW_OPTION_HIDDEN) == 0) then 
		      			//MessageBox( " Thanh cong ASP",WARNING);
		      		else
		      			//MessageBox( "Khong Thanh cong ASP1",WARNING);     
		       			 InformFinishASPNETAJAX();
		     		endif;
     		  endif;       
    	
     		//SprintfBox (INFORMATION, TITLE_TEXT, "%s exists.", szKey);
    	endif;
     
		 
		 
		 
end;  


//===========================================================================
//
//  Topic:    InformFinishASPNETAJAX
//
//  Description: 
//
//  My Name    : 
//
//===========================================================================



function InformFinishASPNETAJAX()
	 number  nResult, nLevel, nSize, nSetupType;
    string  szTitle, szMsg, szOpt1, szOpt2, szLicenseFile;
    string  szName, szCompany, szTargetPath, szDir, szFeatures;
    BOOL    bLicenseAccepted;	
    
    STRING   szProductName;

    STRING   szMsg1, szMsg2;

    BOOL     bvOpt1, bvOpt2;

    NUMBER   nReturn;
                        
    number	 nType, nMediaFlags;
    string	szIgnore,svOldPath;
    STRING szKey, szNumName, szNumValue, svNumValue;  
    
begin
	   	szTitle =@PRODUCT_NAME + "  Installation is not Completed.";

   
        szMsg1 = "ASP.NET AJAX  installation is not completed";
            

    	szMsg2  = "Click Finish to complete %P Setup.";
    
		SdFinish (szTitle, szMsg1, szMsg2, szOpt1, szOpt2, bvOpt1, bvOpt2);

 abort;
 

end;

Leave a Reply

Please log in using one of these methods to post your comment:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

%d bloggers like this: