469,267 Members | 1,031 Online
Bytes | Developer Community
New Post

Home Posts Topics Members FAQ

Post your question to a community of 469,267 developers. It's quick & easy.

Open PDF in new window

Hi

I am developing my first asp appication (vbscript). I am storing
cheques scans (in pdf format) in the file system along with the db on
the server.

The following code is working without problem except that:-

I want to display the scan/pdf in a new window and keep the current
window at the current position within the application.

Thanks in advance if you can spare the time to show me the best way to
do this.

Paul

(peaton at franklin templeton d.o.t com (with no _))

<%@ Language="VBScript" %>
<% Option Explicit %>
<% response.buffer = true %>
<%
'On Error Resume Next
Const adTypeBinary = 1
Dim strFilePath

Dim RecID
Dim ImagePath
Dim strSecLevel
Dim strSecSubLevel
Dim objStream

ImagePath="e:\IncomingChequesScans\"
strSecLevel=session("seclevel")
strSecSubLevel=session("secsublevel")
RecID=Request.QueryString("id")

'Set the content type to the specific type that you are sending.
Response.ContentType = "seclevel/pdf"

strFilePath = ImagePath & RecID & ".pdf" 'This is the path to the file
on disk.

Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadFromFile strFilePath

Response.BinaryWrite objStream.Read

objStream.Close
Set objStream = Nothing
%>
Jul 19 '05 #1
4 32727
Add a target to your link on the first page

<a href="GetCheque.asp?RecID=2112" target="_new">View Cheque 2112</a>

OR, use the javascript window.open to specify formatting options

<script language=Javascript>
function OpenCheque(chequeNum)
{
window.open('GetCheque.asp?RecID=' + chequeNum,'newwin','height=200,
width=500, top=200, left=200');
}
</script>

<a href="javascript: OpenCheque('2112');">View Cheque 2112</a>
TomB

"Paul Eaton" <pe****@pt.lu> wrote in message
news:13**************************@posting.google.c om...
Hi

I am developing my first asp appication (vbscript). I am storing
cheques scans (in pdf format) in the file system along with the db on
the server.

The following code is working without problem except that:-

I want to display the scan/pdf in a new window and keep the current
window at the current position within the application.

Thanks in advance if you can spare the time to show me the best way to
do this.

Paul

(peaton at franklin templeton d.o.t com (with no _))

<%@ Language="VBScript" %>
<% Option Explicit %>
<% response.buffer = true %>
<%
'On Error Resume Next
Const adTypeBinary = 1
Dim strFilePath

Dim RecID
Dim ImagePath
Dim strSecLevel
Dim strSecSubLevel
Dim objStream

ImagePath="e:\IncomingChequesScans\"
strSecLevel=session("seclevel")
strSecSubLevel=session("secsublevel")
RecID=Request.QueryString("id")

'Set the content type to the specific type that you are sending.
Response.ContentType = "seclevel/pdf"

strFilePath = ImagePath & RecID & ".pdf" 'This is the path to the file
on disk.

Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadFromFile strFilePath

Response.BinaryWrite objStream.Read

objStream.Close
Set objStream = Nothing
%>

Jul 19 '05 #2
I guess you are clicking on something to pop this up? in that case, on this
link add the target="_Blank" line and javascript window.open call.

As ASP is server side, it can not open a new browser window on your users
machine.

Stuart Palmer

"Paul Eaton" <pe****@pt.lu> wrote in message
news:13**************************@posting.google.c om...
Hi

I am developing my first asp appication (vbscript). I am storing
cheques scans (in pdf format) in the file system along with the db on
the server.

The following code is working without problem except that:-

I want to display the scan/pdf in a new window and keep the current
window at the current position within the application.

Thanks in advance if you can spare the time to show me the best way to
do this.

Paul

(peaton at franklin templeton d.o.t com (with no _))

<%@ Language="VBScript" %>
<% Option Explicit %>
<% response.buffer = true %>
<%
'On Error Resume Next
Const adTypeBinary = 1
Dim strFilePath

Dim RecID
Dim ImagePath
Dim strSecLevel
Dim strSecSubLevel
Dim objStream

ImagePath="e:\IncomingChequesScans\"
strSecLevel=session("seclevel")
strSecSubLevel=session("secsublevel")
RecID=Request.QueryString("id")

'Set the content type to the specific type that you are sending.
Response.ContentType = "seclevel/pdf"

strFilePath = ImagePath & RecID & ".pdf" 'This is the path to the file
on disk.

Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadFromFile strFilePath

Response.BinaryWrite objStream.Read

objStream.Close
Set objStream = Nothing
%>

Jul 19 '05 #3
Thankyou for the responses

I have used the window.open version in a JScript function
'ViewImage':-

<input type=button value="View Image" name=Image1
onClick="ViewImage('<% =RecID %>')">
As I don't think I can put a 'target'in:-

<input type=button value="View Image" name=Image1
onClick="location.href='../GCS/GCSImageView.asp?id=<% =RecID
%>&mode=view'">

Regards
Paul


"Tom B" <sh*****@hotmail.com> wrote in message news:<#p**************@TK2MSFTNGP10.phx.gbl>...
Add a target to your link on the first page

<a href="GetCheque.asp?RecID=2112" target="_new">View Cheque 2112</a>

OR, use the javascript window.open to specify formatting options

<script language=Javascript>
function OpenCheque(chequeNum)
{
window.open('GetCheque.asp?RecID=' + chequeNum,'newwin','height=200,
width=500, top=200, left=200');
}
</script>

<a href="javascript: OpenCheque('2112');">View Cheque 2112</a>
TomB

"Paul Eaton" <pe****@pt.lu> wrote in message
news:13**************************@posting.google.c om...
Hi

I am developing my first asp appication (vbscript). I am storing
cheques scans (in pdf format) in the file system along with the db on
the server.

The following code is working without problem except that:-

I want to display the scan/pdf in a new window and keep the current
window at the current position within the application.

Thanks in advance if you can spare the time to show me the best way to
do this.

Paul

(peaton at franklin templeton d.o.t com (with no _))

<%@ Language="VBScript" %>
<% Option Explicit %>
<% response.buffer = true %>
<%
'On Error Resume Next
Const adTypeBinary = 1
Dim strFilePath

Dim RecID
Dim ImagePath
Dim strSecLevel
Dim strSecSubLevel
Dim objStream

ImagePath="e:\IncomingChequesScans\"
strSecLevel=session("seclevel")
strSecSubLevel=session("secsublevel")
RecID=Request.QueryString("id")

'Set the content type to the specific type that you are sending.
Response.ContentType = "seclevel/pdf"

strFilePath = ImagePath & RecID & ".pdf" 'This is the path to the file
on disk.

Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadFromFile strFilePath

Response.BinaryWrite objStream.Read

objStream.Close
Set objStream = Nothing
%>

Jul 19 '05 #4
Paul Eaton wrote on 09 jul 2003 in microsoft.public.inetserver.asp.general:
<input type=button value="View Image" name=Image1
onClick="location.href='../GCS/GCSImageView.asp?id=<% =RecID
%>&mode=view'">

<input type=button value="View Image"
onClick=
"window.open('../GCS/GCxxx.asp?id=<%=RecID%>&mode=view')">
--
Evertjan.
The Netherlands.
(Please change the x'es to dots in my emailaddress)
Jul 19 '05 #5

This discussion thread is closed

Replies have been disabled for this discussion.

Similar topics

3 posts views Thread by Ben | last post: by
29 posts views Thread by wayne | last post: by
3 posts views Thread by Grey | last post: by
1 post views Thread by Alejandro Vidal | last post: by
2 posts views Thread by Martin Mosbęk Christiansen | last post: by
1 post views Thread by hcoulange | last post: by
1 post views Thread by CARIGAR | last post: by
reply views Thread by suresh191 | last post: by
By using this site, you agree to our Privacy Policy and Terms of Use.