Here's what i did to accomplish what you are talking about...
dim uploadcount = 0
Private Sub Uploader_FileUploaded(ByVal sender As Object, ByVal args As UploaderEventArgs)
uploadcount += 1
If uploadcount = 1 Then
Email()
End If
'Response.Write(Uploader1.Items.Count)
End Sub