ASP高手进 高分哦

帮忙解释一下这个程序..是文件上传的
他就是没告诉怎么设置数据库里的东西。
数据库里都要有什么字段的啊?

<%
Response.Expires=0
Function f_Bin2Str(ByVal sBin)
Dim iI, iLen, iChr, iRe
iRe = ""
If Not IsNull(sBin) Then
iLen = LenB(sBin)
For iI = 1 To iLen
iChr = MidB(sBin, iI, 1)
If AscB(iChr) > 127 Then
iRe = iRe & Chr(AscW(MidB(sBin, iI + 1, 1) & iChr))
iI = iI + 1
Else
iRe = iRe & Chr(AscB(iChr))
End If
Next
End If
f_Bin2Str = iRe
End Function
iConcStr = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False" & _
";Data Source=" & server.mappath("zj.mdb")
iSql="tb_img"
set iRe=Server.CreateObject("ADODB.Recordset")
iRe.Open iSql,iConcStr,1,3
iLen=Request.TotalBytes
sBin=Request.BinaryRead(iLen)
iCrlf1 = ChrB(13) & ChrB(10)
iCrlf2 = iCrlf1 & iCrlf1
iLen = InStrB(1, sBin, iCrlf1)

ASP高手进 高分哦 ASP高手进(高分) [高分]ASP源码+系统高手进 asp+access高手进，高分悬赏！！！ 急!!!高分求教:ASP高手............... 高分请ASP高手进```````成功会加分````在线等 高分请高手!懂asp和Access数据库的进! 高分求ASP小偷程序高手 Asp程序高手请讲,高分奖励 高分：请asp高手来看看！谢谢！