Quantcast
Channel: Programming Forums
Viewing all articles
Browse latest Browse all 51036

screenshots of entire form and save to access db.

$
0
0
i was trying to make a screen shot of my working place only but it gets my whole desktop
Sub takescreenshot()
        Try
            Dim Img As New Bitmap(Screen.PrimaryScreen.WorkingArea.Width, Screen.PrimaryScreen.WorkingArea.Height)

            Dim g As Graphics = Graphics.FromImage(Img)
            g.CopyFromScreen(0, 0, 0, 0, Img.Size)
            g.Dispose()
             MsgBox("done!")
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try
    End Sub



and i save it to my desktop only using this code
Img.Save("D:\Documents and Settings\Rhy\Desktop\screenshots\myimage.jpg", Imaging.ImageFormat.Jpeg)



i dont know if it is able to insert to my access database?

Viewing all articles
Browse latest Browse all 51036

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>