BackgroundWorke r Problem

[Chris]

I would like to be able to pass the BackgroundWorke r object and DoWork Event
Args to a second function (third function?) and be able to still report the
progress.

I'm getting the following exception when trying to access
BackgroundWorke r.CancellationP ending or e.Cancel

An unhandled exception of type 'System.Reflect ion.TargetInvoc ationException'
occurred in mscorlib.dll
Additional information: Exception has been thrown by the target of an
invocation.

The problem is I can't stuff everything into the DoWork event to accomplish
what I want, but need to call another function which inturn calls a third
function.

I'm sure a code example would better explain:

main()

Dim bw as new BackgroundWorke r

'Set bw properties (reports progress/support cancelation and call
DoWorkAsynch

End main
Sub bw_DoWork(sende r As Object, e As DoWorkEventArgs ) handles bw.DoWork

'Get the BackgroundWorke r object that raised this event.
Dim worker as BackgroundWorke r = cType(sender, BackgroundWorke r)

'I have multiple arguments to pass
Dim args As EncryptFileArgs = cType(e.Argumen t, EncryptFileArgs )

e.Result = mEncryptFile(ar gs.fileIn, args.fileOut, args.keySize, _
args.password, args.fileExpire Time, worker, e)

End sub

Function mEncryptFile( fileIn, fileOut,keySize , _
password, bworker as BackgroundWorke r, e as
DoWorkEventArgs ) as Boolean

'I need to do some pre-processing here

return EncryptFile(key s.IV, keys.KQ,
keySize, fileIn,
ref fsOut, bworker, e)

End Function
'The actual encryption/work goes here
EncryptFile(key s.IV, keys.KQ,
keySize, fileIn,
ref fsOut, bworker, e)

'Report Progress
bw.ReportProgre ss(percent)

'Check if user canceled 'This line throws the exception
If bw.Cancellation Pending Then
e.Cancel = true

End Function

Thanks in advance for any help,

Chris