After deleting files from computer, you may think that these files have disappeared permanently. However, most of time, the fact is not like what you think. Here, in this article, we will expose what actually happens when you delete files.  

It is very common that you accidentally delete a file from your computer at times by either “Delete” or “Shift + Delete” key button. After a while, if you discover that the deleted file is still useful, you must be going to regret and would like to bring it back. Actually, you don’t need to be afraid of losing it forever. Most of time, the deleted files do not disappear from your PC permanently. Now, in the followings, we will tell you what really happens when a file is deleted from your computer.

What Really Happens When Files Are Deleted from Your PC?

Move to Trash/Recycle Bin

If you delete a file simply by pressing the “Delete” key or choosing the “Delete” option from the file’s right clicking menu, generally speaking, this file is virtually moved to the “Trash” or “Recycle Bin”, instead of being deleted. Therefore, if you accidentally delete a file, you should firstly check the “Trash” or “Recycle Bin”. It’s very likely that the file is over there.

Delete File Records Only

Yet, if you delete a file by pressing the shortcut – “Shift + Delete” key or a file is deleted after you cut it but fail to paste, you will not be able to find it in “Trash” or “Recycle Bin”. But, it doesn’t mean that it has vanished into air forever. In reality, only its file record has been removed from the original unit in the computer hard drive and this unit is marked as empty for availability. The file itself will be kept in the drive until new data gets written to this unit. Hence, before that, you still can use relevant professional data recovery software to recover the deleted file, like using PST recovery tool to recover PST data.

Permanently Erase Data

To ensure that a file is truly deleted from your computer, you can have two options, as follow:

1. Data Overwrite

As mentioned in the 2rd part above, the deleted files can be cleared thoroughly until overwrite. Thereby, to completely delete files, you can first delete them and then rewrite over the old files with new data over and over again. As a matter of fact, there are a lot of such tools available in today’s market.

2. Physical Destruction

If you hope to give away a hard drive, you need to erase the disk data fully. In this scenario, you can just destroy the drive physically to your utmost. For instance, it is a good idea to knock the hard drive with hammer heavily until it gets into fragments. Only in this way, you needn’t fear your data being leaked.

Author Introduction:

Shirley Zhang is a data recovery expert in DataNumen, Inc., which is the world leader in data recovery technologies, including mdf fix and outlook repair software products. For more information visit www.datanumen.com

Be the first to comment
             

When checking all the tasks linked or assigned to a specific contact, you may want to print them as well. Now, in this article, we will share you a method to batch print such tasks.

To check the tasks linked or assigned to a contact, you can open this contact and access its “Activities” page, in which all such tasks are gathered here. But, if you’d like to print these tasks, you need to open them and then print one by one. Thus, obviously, it is a bit troublesome. Now, in the followings, we will introduce a way to batch print these tasks.

Contact Activities

Batch Print All Tasks Linked or Assigned to a Specific Contact

  1. At the very outset, select a contact that you want.
  2. Then, access Outlook VBA editor by referring to “How to Run VBA Code in Your Outlook“.
  3. Next, copy the following VBA code into a module.
Dim objContact As ContactItem

Sub PrintTasksLinkedOrAssignedToSpecificContact()
    Dim objStore As Outlook.Store
    Dim objOutlookFile As Outlook.Folder
    Dim objFolder As Outlook.Folder
 
    'Get the selected contact
    Set objContact = Outlook.Application.ActiveExplorer.Selection.Item(1)
 
    For Each objStore In Application.Session.Stores
        Set objOutlookFile = objStore.GetRootFolder
        For Each objFolder In objOutlookFile.Folders
            If objFolder.DefaultItemType = olTaskItem Then
               Call ProcessFolders(objFolder)
            End If
        Next
    Next
End Sub

Sub ProcessFolders(ByVal objCurFolder As Outlook.Folder)
    Dim objTask As Outlook.TaskItem
    Dim objSubfolder As Outlook.Folder
 
    For Each objTask In objCurFolder.Items
        'Print linked tasks to the contact
        If objTask.Links.Count > 0 Then
           i = 0
           Do Until i = objTask.Links.Count
              i = i + 1
              If objTask.Links(i).Name = objContact.FullName Then
                 objTask.PrintOut
                 Exit Do
              End If
           Loop
         'Print assigned tasks to the contact
         ElseIf (objTask.Owner = objContact.FullName) Or (objTask.Owner = objContact.Email1DisplayName) Or (objTask.Owner = objContact.Email1Address) Or (objTask.Owner = objContact.Email2DisplayName) Or (objTask.Owner = objContact.Email2Address) Or (objTask.Owner = objContact.Email3DisplayName) Or (objTask.Owner = objContact.Email3Address) Then
           objTask.PrintOut
         End If
    Next
 
    If objCurFolder.Folders.Count > 0 Then
       For Each objSubfolder In objCurFolder.Folders
           Call ProcessFolders(objSubfolder)
       Next
    End If
End Sub

VBA Code - Batch Print All Tasks Linked or Assigned to a Specific Contact

  1. After that, click into the first subroutine.
  2. Later, click “Run” icon in toolbar to run this macro right now.
  3. When macro finishes, all the tasks linked or assigned to the selected contact will be printed out, as shown in the following screenshot.Printed Tasks

Prevent Outlook Data Loss

When it comes to avoiding data loss, undoubtedly, regular data backups must be the first and foremost measure. The same holds true for Outlook data. That is to say, if you are not ready to lose your Outlook data, you have to make Outlook data backups on a regular basis. Besides, in order to get immediate rescue in the event of Outlook corruption, you are better off keeping a potent and credible PST repair tool, like DataNumen Outlook Repair, which is well-versed in recovering corrupt Outlook file.

Author Introduction:

Shirley Zhang is a data recovery expert in DataNumen, Inc., which is the world leader in data recovery technologies, including sql corruption and outlook repair software products. For more information visit www.datanumen.com

Be the first to comment
             

If you need to extract all the contacts’ phone numbers and print them in list, you can use the method introduced in this article. It can let you achieve this in one go.

Perhaps you have input phone numbers to all contacts in your Outlook. Then, you may wish to create and print a phone book from Outlook. That refers to getting the list of all contacts’ phone numbers and printing this list. Now, thereinafter, we will introduce a quick method. It can save you from manually extracting contacts’ phone numbers one by one.

Quickly Print a List of All Contacts’ Phone Numbers

  1. First off, trigger Outlook VBA editor according to “How to Run VBA Code in Your Outlook“.
  2. Then, in the new window, activate the reference to “MS Excel Object Library” by reading “How to Add an Object Library Reference in VBA“.
  3. Next, put the following VBA code into a module.
Dim objExcelApp As Excel.Application
Dim objExcelWorkbook As Excel.Workbook
Dim objExcelWorksheet As Excel.Worksheet

Sub PrintListPhoneNumbers()
    Dim objStore As Outlook.Store
 
    Set objExcelApp = CreateObject("Excel.Application")
    Set objExcelWorkbook = objExcelApp.Workbooks.Add
    Set objExcelWorksheet = objExcelWorkbook.Sheets(1)
    objExcelApp.Visible = True
 
    With objExcelWorksheet
         .Cells(1, 1) = "Contact"
         .Cells(1, 1).Font.Bold = True
         .Cells(1, 2) = "Business"
         .Cells(1, 2).Font.Bold = True
         .Cells(1, 3) = "Home"
         .Cells(1, 3).Font.Bold = True
         .Cells(1, 4) = "Other"
         .Cells(1, 4).Font.Bold = True
    End With
 
    For Each objStore In Application.Session.Stores
        Call ProcessFolders(objStore.GetRootFolder.Folders)
    Next
 
    objExcelWorksheet.Columns("A:D").AutoFit
    objExcelWorksheet.PrintOut
    objExcelWorkbook.Close False
    objExcelApp.Quit
End Sub

Sub ProcessFolders(ByVal objFolders As Outlook.Folders)
    Dim objFolder As Outlook.Folder
    Dim i As Long
    Dim objContact As Outlook.ContactItem
    Dim nLastRow As Integer
    Dim objSubfolder As Outlook.Folder
 
    For Each objFolder In objFolders
        If objFolder.DefaultItemType = olContactItem Then
           For i = objFolder.Items.Count To 1 Step -1
               If objFolder.Items(i).Class = olContact Then
                  Set objContact = objFolder.Items(i)
 
                  If objContact.BusinessTelephoneNumber <> "" Or objContact.HomeTelephoneNumber <> "" Or objContact.OtherTelephoneNumber <> "" Then
                     nLastRow = objExcelWorksheet.Range("A" & objExcelWorksheet.Rows.Count).End(xlUp).Row + 1
 
                     With objExcelWorksheet
                          .Range("A" & nLastRow) = objContact.FullName
                          .Range("B" & nLastRow) = objContact.BusinessTelephoneNumber
                          .Range("C" & nLastRow) = objContact.HomeTelephoneNumber
                          .Range("D" & nLastRow) = objContact.OtherTelephoneNumber
                     End With
                  End If
              End If
           Next
 
          If objFolder.Folders.Count > 0 Then
             Call ProcessFolders(objFolder.Folders)
          End If
       End If
    Next
End Sub

VBA Code - Quickly Print a List of All Contacts' Phone Numbers

  1. After that, click into the first subroutine and press “F5” key button.
  2. At once, a list of all your contacts’ phone numbers will be printed, as shown in the following screenshot.Printed List of All Contacts' Phone Numbers

Take Care of Your Outlook Well

As we all know, it is a bit hard to predicate and evade Outlook errors. Therefore, what we can do is to make some precautions in advance. Simply put, you ought to make data backups for Outlook periodically. Plus, you should look out for all the hidden viruses or malware in emails. Last but not least, you had better get hold of a powerful and reliable Outlook fix tool, like DataNumen Outlook Repair. It is able to repair Outlook file in a jiffy.

Author Introduction:

Shirley Zhang is a data recovery expert in DataNumen, Inc., which is the world leader in data recovery technologies, including recover mdf and outlook repair software products. For more information visit www.datanumen.com

Be the first to comment