Search found 500 matches

by Tonton Luc
6 Dec 2014 21:44
Forum: Visual Prolog
Topic: Media Player ocx - nedd help
Replies: 6
Views: 2764

Hi, I'm not sure to understand what I need to do (sorry). So I've just created a new class named " wmpEvents " in my project : class wmpEvents : iWMPEvents_native open core predicates classInfo : core::classInfo. % @short Class information predicate. % @detail This predicate represents information p...
by Tonton Luc
28 Nov 2014 22:04
Forum: Visual Prolog
Topic: Media Player ocx - nedd help
Replies: 6
Views: 2764

Hi, How to create a WMP PositionChange event ? The following code generate an error : _Rep_status = ctl_principal:queryInterface(iWMPEvents_native::iid,IUnk_events), Cctl_events = uncheckedConvert(iWMPEvents_native,IUnk_events), % Cctl_events:positionChange(Old,New), error c603: The flow pattern '(o...
by Tonton Luc
26 Nov 2014 14:38
Forum: Visual Prolog
Topic: Start JScript
Replies: 7
Views: 2169

Hi,

Your code doesn't works (maybee for security reasons), but it's nothing because I've a solution with added "curl.exe" file in the same folder of my application.

Many tks to you.
:wink:
by Tonton Luc
26 Nov 2014 11:21
Forum: Visual Prolog
Topic: Start JScript
Replies: 7
Views: 2169

Hi, Tks for your help. This following code works fine but only if I add " curl.exe " file in the same folder of my application : constants fic_result = "result.txt". clauses onFileNew(_Source, _MenuTag):- Fic_url = "url.txt", if file::existFile(Fic_url) then try file5x::file_str(Fic_url,URL), Syntax...
by Tonton Luc
25 Nov 2014 13:28
Forum: Visual Prolog
Topic: Start JScript
Replies: 7
Views: 2169

Hi, When I start manually (double-clic) a bat file with : curl -k -o result.txt https://www.toernooiklapper.nl/tools/index.php all works fine - I recover the contain of this page in result.txt file. Using this VP7 following code, any result file is created, any error message, a Dos window opened and...
by Tonton Luc
25 Nov 2014 10:14
Forum: Visual Prolog
Topic: Curl and SSL
Replies: 10
Views: 2784

Hi,

Your code works fine too in my machine with VP 7.3 an the VPcURL revised.

But, when I test using my URL ("https://www.chevrolet.fr/la-gamme/aveo-5portes/") => I've the following error (with any number) :
SSL connect error
:?:
by Tonton Luc
24 Nov 2014 15:53
Forum: Visual Prolog
Topic: Start JScript
Replies: 7
Views: 2169

Start JScript

Hi,

My JScript :

Code: Select all

curl -k -o result.txt https://www.google.fr
When I put it in a bat file (or js file or cmd file) and start it manually => works fine.
But when I start it programmatically using platformSupport5x::system or shell_native::shellExecute or useExe => doesn't works.
:?:
by Tonton Luc
24 Nov 2014 9:37
Forum: Visual Prolog
Topic: Curl and SSL
Replies: 10
Views: 2784

Hi,

If the latest version of VPcURL works with VP 7.3, where do I found it ?
by Tonton Luc
21 Nov 2014 9:54
Forum: Visual Prolog
Topic: Curl and SSL
Replies: 10
Views: 2784

I add "cURLOPT_SSL_VERIFYPEER = 00064." in VPcURL.i and add the following line in my code : _ = Connection:curl_easy_setopt(vPcURL::cURLOPT_SSL_VERIFYPEER, vPcURL::i(0)), but I've always the same error 35. I just need to recover programmatically the contain of html pages like : https://www.chevrolet...
by Tonton Luc
21 Nov 2014 7:49
Forum: Visual Prolog
Topic: Curl and SSL
Replies: 10
Views: 2784

Hi,


Thanks for your help. Using command line version, I need to add -k option with HTTPS.
But I don't know which constant I need to use to reproduce this option (in VPcURL.i) ?
by Tonton Luc
18 Nov 2014 10:46
Forum: Visual Prolog
Topic: Curl and SSL
Replies: 10
Views: 2784

Curl and SSL

Hi, The following VP 7.3 code generate an error 35 when the URL start by http s ://... startCase(Action,URL) :- Action = 1, try ResultStream = outputStream_String::new(), Connection = vPcURL::new(ResultStream, caseCompletion, Action), _ = Connection:curl_easy_setopt(vPcURL::cURLOPT_HTTPGET, vPcURL::...
by Tonton Luc
15 Nov 2014 0:05
Forum: Visual Prolog
Topic: Displaying a Dialog from a dLL
Replies: 1
Views: 1612

Displaying a Dialog from a dLL

Hi, Is it possible to display a Dialog from a dLL ? I've tryed this without success : Hdl = uncheckedConvert(window,vpi::getattrval(vpiDomains::attr_screen_window)), % Hdl = uncheckedConvert(window,vpi::getattrval(vpiDomains::attr_win_mdi_client_hwnd)), % Hdl = uncheckedConvert(window,vpi::getattrva...
by Tonton Luc
13 Nov 2014 16:37
Forum: Visual Prolog
Topic: scrollWindow vertically
Replies: 0
Views: 2395

scrollWindow vertically

Hi, I need to scroll vertically a window of an other application and with the following code, the result is not correct : Rect = gui_api::getClientRect(Hdl), NullRct = uncheckedConvert(vpiDomains::rct, 0), Vertival_Diff = 50, R_scrollWindow = gui_native::scrollWindow(Hdl,0,Vertival_Diff,NullRct,Rect...
by Tonton Luc
11 Nov 2014 21:52
Forum: Visual Prolog
Topic: Media Player ocx - nedd help
Replies: 6
Views: 2764

I've found the good code : _Rep_Core = Obj:queryInterface(iWMPCore_native::iid,IUnk_Core), Core = uncheckedConvert(iWMPCore_native,IUnk_Core), _ = Core:set_url("C:\\My_file.MP3"), _Rep = Obj:queryInterface(iWMPControls_native::iid,IUnk), Ctl_controls = uncheckedConvert(iWMPControls_native,IUnk), _ =...
by Tonton Luc
11 Nov 2014 14:00
Forum: Visual Prolog
Topic: Media Player ocx - nedd help
Replies: 6
Views: 2764

Hi, I create a new COM object from wmp.dll and start to write the following code (VP 7.2) : constants idc_wmp_ctl = 1000. predicates onShow : window::showListener. clauses onShow(_Source, _Data):- Rct = vpi::winGetClientRect(This:getVpiWindow()), Rct = rct(Gauch,Haut,Droit,Bas), New_rct = rct(Gauch,...