[求助]adodb.stream 读取图片文件并显示 出问题了
img = Request.QueryString("file_thing")
If img <> "" Then
Set Objstream = Server.Createobject("ADODB.Stream")
Objstream.Type = 1
Objstream.Mode = 3
Objstream.Open
Objstream.LoadFromFile(img)
content = Objstream.read
Response.ContentType = "image\*"
Response.BinaryWrite content
End If
If img <> "" Then
Set Objstream = Server.Createobject("ADODB.Stream")
Objstream.Type = 1
Objstream.Mode = 3
Objstream.Open
Objstream.LoadFromFile(img)
content = Objstream.read
Response.ContentType = "image\*"
Response.BinaryWrite content
End If
显示乱码 哪里有写错吗？？
[此贴子已经被作者于2006-4-1 19:52:34编辑过]
