PDA

Click to See Complete Forum and Search --> : Picture to File..Very Ver y Urgent


venkatraman_r
Nov 10th, 1999, 11:28 AM
Hi eveyone,

Dim filesys As New FileSystemObject
Dim file1 As TextStream
Dim fileobj As File

Set file1 = filesys.CreateTextFile("c:\test.bmp", True)

Clipboard.Clear
Clipboard.SetData PicFinal.Image, vbCFBitmap

file1.WriteLine Clipboard.GetData
file1.Close

**

I am trying to copy a file in the picture box to a bitmap file. It didnt work..can anyone please rectify this error.

Thanx in advance.

:) Venkat.

Keiko
Nov 10th, 1999, 12:14 PM
Hi, venkatraman_r

Actually, you can use SavePicture command.

SavePicture imgObject.Picture, "c:\windows\desktop\a.bmp"

Does it help ?

Regards

XxEvilxX
Nov 10th, 1999, 12:17 PM
well to like take a picture from the clipboard to a picture box that easy just do this
Picture1.Picture = Clipboard.GetData

venkatraman_r
Nov 10th, 1999, 01:00 PM
thanx guys,

savepicture turned out well.

:) :)

Venkat.