我想在VBscript中创建ADODB.Stream对象。这是函数:无法创建对象:ADODB.Stream
Function ByteArray2Text(varByteArray)
'Convert byte array into a string with ADODB.Stream
'Data should be real plain text because binary data will be mangled
Dim byt
Const adTypeText = 2
Const adTypeBinary = 1
Set byt = CreateObject("ADODB.Stream")
byt.Type = adTypeBinary
byt.Open
byt.Write varByteArray
byt.Position = 0
byt.Type = adTypeText
byt.CharSet = "us-ascii"
ByteArray2Text = byt.ReadText
byt.Close
Set byt = Nothing
End Function
当我尝试运行这个功能我得到的错误:
Microsoft VBScript runtime error: ActiveX component can't create object: 'ADODB.Stream'
我需要做什么,创建这个ADODB.Stream对象?
可能感兴趣的:禁用流对象http://support.microsoft .com/kb/870669 – Fionnuala 2010-01-29 13:35:43