recordset中的字段怎么放到一个byte数组中去？

[milp]

Dim conn As New Connection
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\Demo.mdb"
Dim rs As New ADODB.Recordset
rs.Open "select id,title,flag,updatetime,content from t_content where id='1022'", conn, 1, 1
Dim ByteData() As Byte
ByteData() = rs("content").GetChunk(rs("content").ActualSize)
MsgBox UBound(ByteData)
rs.Close
conn.Close

这段VB代码怎么转换成ASP代码
Dim ByteData()
ByteData() = rs("content").GetChunk(rs("content").ActualSize)
老是报错

[Struggling]

下面是一个例子，你参考一下吧
sub getConst()
sql = "select top 1 * from adminvar"
set rs = server.CreateObject ("adodb.recordset")
rs.open sql,conn,1,3
arrRow=rs.getrows
rs.close : set rs=nothing
NetName = arrRow(0,0)
NetUrl = arrRow(1,0)
Smtp = arrRow(2,0)
Email = arrRow(3,0)
EmailFlag = arrRow(4,0)
PageCount = arrRow(5,0)
BodyVar = arrRow(6,0)
Tablebackcolor = arrRow(7,0)
Tablebodycolor = arrRow(8,0)
Tablebody1color = arrRow(9,0)
Logo = arrRow(10,0)
Ads = arrRow(11,0)
BigAds = arrRow(12,0)
end sub

[milp]

我指的是如何把一个二进制字段放到一个数组中去，有谁用过么？