<%@ Language=VBScript %> <%if session("webcam")="1" then%> <% Response.Expires = 0 Response.ContentType = "image/jpeg" strFileName = "images/123456.jpg" strMyPath = Server.MapPath("./") & "\" & strFileName set oFileSys = Server.CreateObject("Scripting.Filesystemobject") set oFile = oFileSys.GetFile(strMyPath) FileSize = oFile.Size set oFile = nothing set oFile = oFileSys.OpenTextFile(strMyPath,1, false, -1) Response.BinaryWrite(oFile.Read(FileSize)) set oFile = nothing set oFileSys = nothing %><%end if%>