connstr="DBQ="+server.mappath("webserve.asp")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
Set conn=Server.CreateObject("ADODB.connection")
conn.Open connstr
set objRS=server.CreateObject("ADODB.Recordset")
objSQL="select logo from art where id='4'"
objRS.open objSQL,conn,0,1,1
Response.BinaryWrite objRS("logo")