<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include virtual="/Connections/INDOORSKI_READER.asp"-->
<%
	Connect = MM_INDOORSKI_READER_STRING '"Provider=SQLOLEDB;Server=193.93.174.47,1433;Database=wsdb_137;UID=sqluser137;PWD=O3zCDl!37E"
	Set db = Server.CreateObject("ADODB.Connection")
	db.Open Connect

	SQL = "SELECT * FROM TABEL_IMAGES where id = " & Request("id")
	Set rs = db.Execute( SQL )
	If rs.EOF Then Response.End
	Response.ContentType = "application/octet-stream"
	'Response.AddHeader "Content-Disposition", "attachment;filename=" & Trim(rs("filename"))
	'Response.AddHeader "Content-Length", CStr(rs("filesize"))
	Response.BinaryWrite rs("original_image")
	
%>