Picture to File..Very Ver y Urgent

[venkatraman_r]

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]

Hi, venkatraman_r

Actually, you can use SavePicture command.

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

Does it help ?

Regards

[XxEvilxX]

well to like take a picture from the clipboard to a picture box that easy just do this
Picture1.Picture = Clipboard.GetData

[venkatraman_r]

thanx guys,

savepicture turned out well.



Venkat.