'MacroName:DeleteExportFile

Sub Main

   strFile$ = "C:\Program Files (x86)\OCLC\Connexion\Program\0.dat" 
   If strFile$ <> "" Then Kill strFile$
   'msgbox (strFile$ & " deleted.")
   
End Sub