کمک فوری در نرم افزار

[alimvhd]

سلام من یک کد نوشتم که از اسکرین یه عکس میگیره و بعد ارسال میکنه

سوال1 : میخوام عکس و با حجم کم ذخیره کنه و سایزش کمتر بشه یا حتی رزولیشنش

سوال 2: بعضی اوقات خطای
the underlying connection was closed vb.net
میده میخوام این خطارو نده یا رد کنه
خواهش میکنم سریع کمک کنید


Form2.Show()
Dim area As Rectangle
Dim capture As System.Drawing.Bitmap
Dim graph As Graphics
Dim a As Integer
area = Form2.Bounds
capture = New System.Drawing.Bitmap(area.Width, area.Height, System.Drawing.Imaging.PixelFormat.Format32bppArgb )
graph = Graphics.FromImage(capture)
graph.CopyFromScreen(area.X, area.Y, 0, 0, area.Size, CopyPixelOperation.SourceCopy)
PictureBox1.Image = capture
PictureBox1.Image.Save("c:\intel\D-SENE-002-014.png")


Dim clsRequest As System.Net.FtpWebRequest =
DirectCast(System.Net.WebRequest.Create("ftp://51.255.238.145/public_html/img/D-SENE-002-014.png"), System.Net.FtpWebRequest)
clsRequest.Credentials = New System.Net.NetworkCredential("*****", "*****")
clsRequest.Method = System.Net.WebRequestMethods.Ftp.UploadFile


' read in file...
Dim bFile() As Byte = System.IO.File.ReadAllBytes("C:\intel\D-SENE-002-014.png")


' upload file...
Dim clsStream As System.IO.Stream =
clsRequest.GetRequestStream()
clsStream.Write(bFile, 0, bFile.Length)
clsStream.Close()
clsStream.Dispose()

[336699]

سلام

شما به جای این کد
PictureBox1.Image.Save("c:\intel\D-SENE-002-014.png")

.
.
.
.
.
از این کد استفاده کنید


capture.Save("c:\intel\D-SENE-002-014.jpg", ImageFormat.Jpeg)