请大家看看,为什么出错(我想POST一个STREAM)其实是要将一个图象转成流格式,再POST???Set HttpRequest = CreateObject("Msxml2.XMLHTTP") 
' Declare variable  to hold the IXMLHTTPRequest Object reference.
Set myImage = CreateObject("VIMAS.Image") 
' Declare variable to hold the IVimasImage Object reference.
Set NewImage = imageView.image Set myStream = CreateObject("ADODB.Stream")
myStream.open
‘将NewImage 中的图形保存在一个流中myStream
Call NewImage.save(myStream,"gif","Compression=40;Color=-50;Subsampling=None;")

Call HttpRequest.Open("POST", "http://www.medjetco.com/hkclnd/prewImage.asp?flag=1", false)

Call HttpRequest.setRequestHeader("Content-type", "image/html")

‘******************************************************
Call HttpRequest.Send(imageContent) 'myStream
        出错!!提示不能读写
’*******************************************************
myStream.close