Visual studio : How to quickly attach asp.net process

I do this by creating the following macro:

Sub AttachToAspNET()
        Try
            Dim dbg2 As EnvDTE80.Debugger2 = DTE.Debugger
            Dim trans As EnvDTE80.Transport = dbg2.Transports.Item("Default")
            Dim compName As String = WindowsIdentity.GetCurrent().Name
            compName = compName.Substring(0, compName.IndexOf("\"))
            Dim proc2 As EnvDTE80.Process2 = dbg2.GetProcesses(trans, compName).Item("w3wp.exe")
            proc2.Attach() '(dbg2)
        Catch ex As System.Exception
            MsgBox(ex.Message)
        End Try
    End Sub

Then I assign a keyboard shortcut (CTRL+ALT+K) to it via the “Tools\Option\Keyboard” menu.

You can find a more complete explanation here, but its code is not working:

http://blog.lavablast.com/post/2008/01/Attach-to-Process-with-one-shortcut.aspx