Remove and Add Database Icons on Workspace with Program

I saw many postings in forums for code to remove database icons from the workspace. There is no way to completely remove the icons programmetically with out the user interaction, but I came up with the following code to do this. Only drawback to this code is it prompts user to confirm before removing each icon.

Download this free guide

Download: IT Certifications 101

Inside this exclusive essential guide, our independent experts break down which IT certifications are worth your time and effort, and how to get started obtaining them to further your career— including specific certifications that any cloud or desktop pro should seriously consider.

Start Download

• Corporate E-mail Address:

  You forgot to provide an Email Address.

  This email address doesn’t appear to be valid.

  This email address is already registered. Please login.

  You have exceeded the maximum character limit.

  Please provide a Corporate E-mail Address.

By submitting my Email address I confirm that I have read and accepted the Terms of Use and Declaration of Consent.

By submitting your personal information, you agree that TechTarget and its partners may contact you regarding relevant content, products and special offers.

You also agree that your personal information may be transferred and processed in the United States, and that you have read and agree to the Terms of Use and the Privacy Policy.

Button: Remove and Add database Icons

REM " To remove the first database Icon"
REM"Use AddDatabase, File opendatabase,WindowNext and closewindow to select the existing icon on workspace"
@PostedCommand([AddDatabase]; "Develop":"Dev\Testing\icontesting.nsf");
@PostedCommand([FileOpenDatabase]; "Develop":"Dev\Testing\icontesting.nsf");
@PostedCommand([FileCloseWindow]);
@PostedCommand([WindowNext]) ;
REM" use file database Remove to remove the selected the icon. this will prompt user to confirm before removing the icon"
@PostedCommand([FileDatabaseRemove]);
REM " To remove the second database Icon"
@PostedCommand([AddDatabase]; "Develop":"Dev\Testing\icontesting2.nsf");
@PostedCommand([FileOpenDatabase]; "Develop":"Dev\Testing\icontesting2.nsf");
@PostedCommand([FileCloseWindow]);
@PostedCommand([FileDatabaseRemove]);
REM " To add database Icons"
@PostedCommand([AddDatabase]; "Develop"::"Dev\Testing\icontesting.nsf");
@PostedCommand([AddDatabase]; "Develop":"Dev\Testing\icontesting2.nsf")

You can remove as many database icons you want from workspace by adding similar code as "To remove the second database icon" in above code

You can add as many database icons as you want by adding similar code as " To add database Icons" in the above code.