Attach to multiple w3wp processes

This is an update to a previous post as I am now working on a project that can have up to 3 w3wp processes running.

I've changed the following lines:

Dim proc2 As EnvDTE80.Process2 = dbg2.GetProcesses(trans, compName).Item("w3wp.exe")
proc2.Attach2(dbgeng)

with:

For Each proc2 As EnvDTE80.Process2 In dbg2.GetProcesses(trans, compName)
    If proc2.Name.Contains("w3wp.exe") Then
        proc2.Attach2(dbgeng)
    End If
Next