Convertir un control WebBrowser y su contenido en BMP

[seba123neo]

Hola, la verdad que feo no poder cambiar de versión y actualizarte a la ultima.pero ningun ejemplo te funciona? por ejemplo vi que el webbrowser tiene un metodo llamado DrawToBitmap pero dicen que esta funcion no esta soportada y que no funciona en algunas paginas dependiendo del javascript.viendo un poco mas me encontre con un ejemplo que funciona muy bien, lo hace con la api BitBtl, lo arme porque no venia con la api.

Código vbnet:

Public Class Form1
 
    Private Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Integer, ByVal X As Integer, ByVal Y As Integer, ByVal nWidth As Integer, ByVal nHeight As Integer, ByVal hSrcDC As Integer, ByVal xSrc As Integer, ByVal ySrc As Integer, ByVal dwRop As Integer) As Integer
 
    Public Enum TernaryRasterOperations
        SRCCOPY = &HCC0020
        SRCPAINT = &HEE0086
        SRCAND = &H8800C6
        SRCINVERT = &H660046
        SRCERASE = &H440328
        NOTSRCCOPY = &H330008
        NOTSRCERASE = &H1100A6
        MERGECOPY = &HC000CA
        MERGEPAINT = &HBB0226
        PATCOPY = &HF00021
        PATPAINT = &HFB0A09
        PATINVERT = &H5A0049
        DSTINVERT = &H550009
        BLACKNESS = &H42
        WHITENESS = &HFF0062
    End Enum
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        WebBrowser1.Navigate("http://www.google.com.ar")
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim srcGraphics As Graphics = WebBrowser1.CreateGraphics
        Try
            Dim destGraphics As Graphics = PictureBox1.CreateGraphics
            Try
                Dim hdcDest As IntPtr = destGraphics.GetHdc
                Dim hdcSrc As IntPtr = srcGraphics.GetHdc
                BitBlt(hdcDest, 0, 0, WebBrowser1.ClientRectangle.Width, WebBrowser1.ClientRectangle.Height, hdcSrc, 0, 0, CType(TernaryRasterOperations.SRCCOPY, Integer))
                srcGraphics.ReleaseHdc(hdcSrc)
                destGraphics.ReleaseHdc(hdcDest)
            Finally
                CType(destGraphics, IDisposable).Dispose()
            End Try
        Finally
            CType(srcGraphics, IDisposable).Dispose()
        End Try
    End Sub
End Class
 

ojala te funcione con el framework 1.1

saludos.