<%@ Language=VBScript %> <% ' Use admin connection because it needs to have permission to execute ' store procedires to view pdf file. IDEAConn.Open strIDEAConn pdfGUID = CleanNumericString(Request.QueryString("id")) 'Response.Write(pdfGUID) If pdfGUID = "" Then Response.Redirect "somepage.asp" 'CHANGE TO SOME DEFAULT PAGE End If Set cmd = Server.CreateObject("ADODB.Command") cmd.ActiveConnection = IDEAConn cmd.CommandType = adCmdStoredProc cmd.CommandText = "sp_get_pdf" cmd.Parameters.Append cmd.CreateParameter("@pdfGUID", adGUID, adParamInput, 16, pdfGUID) Set rs = cmd.Execute If Not rs.EOF Then pdfData = rs("pdfData") End If rs.Close Set rs = Nothing Set cmd = Nothing IDEAConn.Close Set IDEAConn = Nothing ' response.write(VarType(pdfData)) If VarType(pdfData) = 8209 Then '8209 IS A BYTE ARRAY Response.Buffer = TRUE Response.ContentType = "application/pdf" Response.BinaryWrite pdfData Else response.redirect("pdferror.asp?mytype=pdferror") 'CHANGE TO SOME DEFAULT PAGE End If Response.End %>