Apr 16, 2001 #1 unit512 MIS Mar 12, 1999 233 US We have a VF 6 program. We want a specific button to 1. open the browser 2. go to a web site 3. load a pdf file We got the first 2 (except the browser opens minimized), but cannot get the 3rd part. Can anyone help? GA
We have a VF 6 program. We want a specific button to 1. open the browser 2. go to a web site 3. load a pdf file We got the first 2 (except the browser opens minimized), but cannot get the 3rd part. Can anyone help? GA
Apr 16, 2001 #2 Guest_imported New member Jan 1, 1970 0 What url are you using? You should be using something like this: http://www.mysite.com/whatever.pdf This should load the pdf in the browser as long as the client pc has the pdf viewer installed. Upvote 0 Downvote
What url are you using? You should be using something like this: http://www.mysite.com/whatever.pdf This should load the pdf in the browser as long as the client pc has the pdf viewer installed.
Apr 17, 2001 Thread starter #3 unit512 MIS Mar 12, 1999 233 US Thanks, but we did try that. Abelson Upvote 0 Downvote
Apr 17, 2001 #4 OldBitByter Programmer Mar 12, 2001 16 US Let us see a code sample. Upvote 0 Downvote
Apr 17, 2001 Thread starter #5 unit512 MIS Mar 12, 1999 233 US * Show SM4 MANUAL *++++* *++++*SAK - 04/13/2001 Abelson WEB *clUrl = SYS(2003) + "\SM4 Manual.PDF" clUrl = "http://www.abelson.com/manuals/"*----* *----*End *Opening the Browser Example (VFP6) *Function GoURL(tcUrl, tcAction) *tcUrl = iif(type("tcUrl"="C",tcUrl,"http://homepages.msn.com/WindowsWay/bmassi/")*tcAction = iif(type("tcAction"="C",tcAction,"Open" if !empty(clUrl) cAction = "Open" wait window "Loading Browser..." nowait clUrl = clUrl declare integer ShellExecute; in SHELL32.dll ; integer nWinHandle, ; string cOperation, ; string cFileName, ; string cParameters, ; string cDirectory, ; integer nShowWindow declare integer FindWindow ; in WIN32API ; string cNull, string cWinName return ShellExecute(FindWindow(0,_screen.caption),; cAction, clUrl, "", sys(2023), 1) Endif && empty(clUrl) Upvote 0 Downvote
* Show SM4 MANUAL *++++* *++++*SAK - 04/13/2001 Abelson WEB *clUrl = SYS(2003) + "\SM4 Manual.PDF" clUrl = "http://www.abelson.com/manuals/"*----* *----*End *Opening the Browser Example (VFP6) *Function GoURL(tcUrl, tcAction) *tcUrl = iif(type("tcUrl"="C",tcUrl,"http://homepages.msn.com/WindowsWay/bmassi/")*tcAction = iif(type("tcAction"="C",tcAction,"Open" if !empty(clUrl) cAction = "Open" wait window "Loading Browser..." nowait clUrl = clUrl declare integer ShellExecute; in SHELL32.dll ; integer nWinHandle, ; string cOperation, ; string cFileName, ; string cParameters, ; string cDirectory, ; integer nShowWindow declare integer FindWindow ; in WIN32API ; string cNull, string cWinName return ShellExecute(FindWindow(0,_screen.caption),; cAction, clUrl, "", sys(2023), 1) Endif && empty(clUrl)
Apr 17, 2001 #6 jonscott8 Programmer May 12, 2000 1,317 US According to your code, it will be opening the following URL: http://www.abelson.com/manuals/ IMO, it appears your code isnt specifying the PDF to open. Try changing clUrl to: clUrl = "http://www.abelson.com/manuals/SM4 Manual.PDF" Then, to test: oShell=CreateObject('Shell.Application') oShell.Open(clUrl) Jon Hawkins The World Is Headed For Mutiny, When All We Want Is Unity. - Creed Upvote 0 Downvote
According to your code, it will be opening the following URL: http://www.abelson.com/manuals/ IMO, it appears your code isnt specifying the PDF to open. Try changing clUrl to: clUrl = "http://www.abelson.com/manuals/SM4 Manual.PDF" Then, to test: oShell=CreateObject('Shell.Application') oShell.Open(clUrl) Jon Hawkins The World Is Headed For Mutiny, When All We Want Is Unity. - Creed
Apr 17, 2001 Thread starter #7 unit512 MIS Mar 12, 1999 233 US You pointed us the right way. What actually worked was clUrl = "http://www.abelson.com/manuals/SM4 Manual.PDF" Thanks, Glenn Upvote 0 Downvote
You pointed us the right way. What actually worked was clUrl = "http://www.abelson.com/manuals/SM4 Manual.PDF" Thanks, Glenn