Open PDF in new window

[Paul Eaton]

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="VBScr ipt" %>
<% 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:\I ncomingChequesS cans\"
strSecLevel=ses sion("seclevel" )
strSecSubLevel= session("secsub level")
RecID=Request.Q ueryString("id" )

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

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

Set objStream = Server.CreateOb ject("ADODB.Str eam")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadF romFile strFilePath

Response.Binary Write objStream.Read

objStream.Close
Set objStream = Nothing
%>

[Tom B]

Add a target to your link on the first page

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

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

<script language=Javasc ript>
function OpenCheque(cheq ueNum)
{
window.open('Ge tCheque.asp?Rec ID=' + chequeNum,'neww in','height=200 ,
width=500, top=200, left=200');
}
</script>

<a href="Javascrip t: OpenCheque('211 2');">View Cheque 2112</a>
TomB

"Paul Eaton" <pe****@pt.lu > wrote in message
news:13******** *************** ***@posting.goo gle.com...

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="VBScr ipt" %>
<% 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:\I ncomingChequesS cans\"
strSecLevel=ses sion("seclevel" )
strSecSubLevel= session("secsub level")
RecID=Request.Q ueryString("id" )

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

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

Set objStream = Server.CreateOb ject("ADODB.Str eam")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadF romFile strFilePath

Response.Binary Write objStream.Read

objStream.Close
Set objStream = Nothing
%>

[Stuart Palmer]

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.goo gle.com...

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="VBScr ipt" %>
<% 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:\I ncomingChequesS cans\"
strSecLevel=ses sion("seclevel" )
strSecSubLevel= session("secsub level")
RecID=Request.Q ueryString("id" )

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

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

Set objStream = Server.CreateOb ject("ADODB.Str eam")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadF romFile strFilePath

Response.Binary Write objStream.Read

objStream.Close
Set objStream = Nothing
%>

[Paul Eaton]

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="ViewIm age('<% =RecID %>')">
As I don't think I can put a 'target'in:-

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

Regards
Paul


"Tom B" <sh*****@hotmai l.com> wrote in message news:<#p******* *******@TK2MSFT NGP10.phx.gbl>. ..

Add a target to your link on the first page

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

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

<script language=Javasc ript>
function OpenCheque(cheq ueNum)
{
window.open('Ge tCheque.asp?Rec ID=' + chequeNum,'neww in','height=200 ,
width=500, top=200, left=200');
}
</script>

<a href="Javascrip t: OpenCheque('211 2');">View Cheque 2112</a>
TomB

"Paul Eaton" <pe****@pt.lu > wrote in message
news:13******** *************** ***@posting.goo gle.com...

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="VBScr ipt" %>
<% 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:\I ncomingChequesS cans\"
strSecLevel=ses sion("seclevel" )
strSecSubLevel= session("secsub level")
RecID=Request.Q ueryString("id" )

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

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

Set objStream = Server.CreateOb ject("ADODB.Str eam")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadF romFile strFilePath

Response.Binary Write objStream.Read

objStream.Close
Set objStream = Nothing
%>

[Evertjan.]

Paul Eaton wrote on 09 jul 2003 in microsoft.publi c.inetserver.as p.general:

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

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