asp 保存二进制图片文件，帮忙看下，多谢

 
img_temp = Split(img_ascii,"-")
redim buf(ubound(img_temp))
For i=0 to Ubound(img_temp)
  buf(i)=cbyte(img_temp(i))
   ' decode = decode & ChrB(img_temp(i))
Next
WriteBinary server.MapPath("header.jpg"), buf
response.write "OK"