Hjælp til ændring af delete script

Hej - jeg har dette script til at slette brugere med - det virker fint - men nu har brugerne mulighed for at uploade 2 billeder, hvor billed 2 hedder brugernavn2.jpg
Så jeg søger hjælp til at få scriptet ændret så begge billeder bliver slettet ved sletning af bruger!!

/// dette sletter brugernavn1.jpg

PATHNAME = Server.MapPath(""&pfbilleduploadpath&brugernavn&"1.jpg")

IF SHOW("okbilled_1") = "True" THEN
Dim objFSO
On Error Resume Next
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFile pathname
END IF