Åbne fx en PDF fil, selvom filen allerede er åben

Jeg har brug for at åbne en PDF fil selvom den pågældende fil allerde er åben. Hvordan kan man gøre det ?

Jeg har brugt følgende kode, men hvis først man har åbnet denén gang, sker der ingenting næste gang koden køres:

Declare Function ShellExecute Lib "shell32.dll" Alias _
  "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation _
  As String, ByVal lpFile As String, ByVal lpParameters _
  As String, ByVal lpDirectory As String, ByVal nShowCmd _
  As Long) As Long

Sub ShellExecuteExample(sti)

  startpdf = ShellExecute(hwnd, "open", sti, "", _
      "C:\", SW_SHOWNORMAL)
End Sub