vb stream设置position不起作用
Set iStm = New ADODB.Stream

If iStm.State = adStateClosed Then
iStm.Open
End If

iStm.Type = adTypeBinary
iStm.LoadFromFile App.Path + "\13.bmp"

iStm.Position = 0

ds.fields(nodeRow.nodeName) = iStm.Read

语句执行到iStm.Read这句就出现问题,读取值为空

其实图片已经装载进去,但是由于装载后position位置移到最后一个字节
因此,导致iStm.Read为空,

因此想设置Position值

但是设置后不起作用

请各位高手帮忙看看？
[解决办法]
http://download.csdn.net/detail/veron_04/1483930