P Pedda Medlem sedan juni 2000 6 031 inlägg Frågan 7 sep. 2009 08:30 #1 Har denna kod i ASP.NET men behöver den i klassisk ASP istället.
Någon som har tid o lust att hjälpa mig?
protected void Page_Load(object sender, EventArgs e)
{
string method = Request.QueryString["method"];
string name = Request.QueryString["name"];
byte[] data = Request.BinaryRead(Request.TotalBytes);
Response.ContentType = "application/pdf";
Response.AddHeader("Content-Length", data.Length.ToString());
Response.AddHeader("Content-disposition", method + "; filename=" + name);
Response.BinaryWrite(data);
Response.End();
}
L l-boy Medlem sedan juli 2003 221 inlägg Använder du någon PDF-komponent? Isåfall vilken?
Har gjort motsvarande konvertering med ABCPDF fast ifrån ASP -> .NET och har således fungerande kod för ABCPDF och ASP.
L l-boy Medlem sedan juli 2003 221 inlägg PDFdata = theDoc.GetData()
Response.ContentType = "application/pdf"
Response.AddHeader "content-length", UBound(PDFdata) - LBound(PDFdata) + 1
Response.AddHeader "content-disposition", "attachment; filename=MyPDF.PDF"
Response.BinaryWrite PDFdata
Detta kanske kan vara till hjälp oavsett. Bör ju vara samma förutom GetData()-biten om det är någon annan komponent.
P Pedda Medlem sedan juni 2000 6 031 inlägg Använder AlivePDF i en Flash applikation som skickar en byte stream till aspx sidan för att presentera pdf'en.
P Pedda Medlem sedan juni 2000 6 031 inlägg Ser detta rätt ut? Kan inte testa förräns imorgon.
<%
If(Request.TotalBytes > 0) Then
Response.Clear()
Response.ContentType = "application/pdf"
Response.AddHeader "Content-Disposition", Request("method") + ";filename=" + Request("filename")
Dim data
data = Request.BinaryRead(Request.TotalBytes)
Response.BinaryWrite data
End If
%>
P Pedda Medlem sedan juni 2000 6 031 inlägg Testade koden nu på morgonen och det funkade fint.
