Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Installshield
Message
 
 
Information générale
Forum:
Visual Basic
Catégorie:
Produits tierce partie
Titre:
Divers
Thread ID:
00358919
Message ID:
00358927
Vues:
11
OK!! Again for the benefit of the whole group I post the fix. Windows helped me name my link. By that I mean it named it "Setup Visual Basic Runtime.lnk.lnk" so I fixed the link name and low and behold it works now. Somebody else can make some mistakes now. I've done mine for today. :)

>I have the following function for my cleanup. The problem is it doesn't 'find' the desktop link. I have copy and pasted the name of the link into the svLinkFile assignment. I have also tried making it 8.3 compliant. I dont know why it does not work. Any suggestions?
>
>
>function CleanUpInstall()
>  STRING svDesktopLink, svResult, svLinkFile, svOldTargetDir;
>  begin
>
>  if (bInstallAborted) then
>      return 0;
>  endif;
>
>  // The link file on the desktop
>  svLinkFile = "Setup Visual Basic Runtime.lnk";
>  svDesktopLink = FOLDER_DESKTOP + svLinkFile;
>
>  // If our link file is found on the desktop...
>  if ( FindFile( FOLDER_DESKTOP, svLinkFile, svResult) = 0) then
>    // Convert the long path
>    LongPathToQuote(svDesktopLink,TRUE);
>    // Save the old target directory since DeleteFile() uses TARGETDIR
>    svOldTargetDir = TARGETDIR;
>    // Set TARGETDIR to the desktop since that's where the link is
>    TARGETDIR = FOLDER_DESKTOP;
>    // Delete the file
>    DeleteFile(svLinkFile);
>    TARGETDIR = svOldTargetDir;
>  endif;
>
>  DialogShowSdFinishReboot();
>
>  if (BATCH_INSTALL) then // ensure locked files are properly written
>      CommitSharedFiles(0);
>  endif;
>
>  return 0;
> end;
>
~Joe Johnston USA

"If ye love wealth better than liberty, the tranquility of servitude better than the animated contest of freedom, go home from us in peace. We ask not your counsel or arms. Crouch down and lick the hands which feed you. May your chains set lightly upon you, and may posterity forget that ye were our countrymen."
~Samuel Adams

Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform