Show Posts
This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.
16
Web Server - Ask For Help / World time server with SOAP/REST
« on: December 15, 2016, 04:49:44 AM »
Cannot find if question is asked before. Is it any example of some word time server to "catch" real time?
Thanks in advance, Oggy.
Thanks in advance, Oggy.
17
Web Server - Ask For Help / Web server with POST-ing
« on: September 28, 2016, 12:41:22 AM »
I have some pretty old Web service, online for years now. Now I decide to put some rudimental POST function(s) to the same service. I know how to do that, thanks to SOAP example from xFiles (of course). Now, my question is: when I use AsyncOpenUse (net.AsyncOpenUse (net.AsyncOpenUse = 1), the service
did not "catch" any data that I send ?!?. However, if AsyncOpenUse is off, all works well. But, if AsyncOpenUse is off and server-service is also off, the client must wait about 1,5-2 seconds to abort sending of data. This means for every single request to the server, when server is offline, delay to abort is way too long.
How to speed up aborting of sending data to offline server?
Clarion 10, Nettalk 7.40
Code example with AsyncOpenUse = 1, that is no-go version:
net.HeaderOnly = 1 ! Cijelu stranu, dodano novo
net.SetAllHeadersDefault()
net.Pragma_ = 'No-Cache'
net.CacheControl = 'No-Cache'
net.ContentType = 'text/xml' !
net.ContentLength = len(clip(PostString)) !
net.AsyncOpenTimeOut = 300
net.InActiveTimeout = 1200
net.CanUseProxy = 1
net.ConnectionKeepAlive = 0
net.AcceptEncoding = 'win-1250'
net.ContentLength = Len(Clip(PostString))
PacketSent = PostString
PutanjaSOAP = 'http://' &clip(MPB:OPIS9)&clip(':')& Clip(Left(Format(MPB:DATUM3,@n_5))) & '/getInfo'
net.Post(Clip(PutanjaSOAP) , Clip(PostString))
did not "catch" any data that I send ?!?. However, if AsyncOpenUse is off, all works well. But, if AsyncOpenUse is off and server-service is also off, the client must wait about 1,5-2 seconds to abort sending of data. This means for every single request to the server, when server is offline, delay to abort is way too long.
How to speed up aborting of sending data to offline server?
Clarion 10, Nettalk 7.40
Code example with AsyncOpenUse = 1, that is no-go version:
net.HeaderOnly = 1 ! Cijelu stranu, dodano novo
net.SetAllHeadersDefault()
net.Pragma_ = 'No-Cache'
net.CacheControl = 'No-Cache'
net.ContentType = 'text/xml' !
net.ContentLength = len(clip(PostString)) !
net.AsyncOpenTimeOut = 300
net.InActiveTimeout = 1200
net.CanUseProxy = 1
net.ConnectionKeepAlive = 0
net.AcceptEncoding = 'win-1250'
net.ContentLength = Len(Clip(PostString))
PacketSent = PostString
PutanjaSOAP = 'http://' &clip(MPB:OPIS9)&clip(':')& Clip(Left(Format(MPB:DATUM3,@n_5))) & '/getInfo'
net.Post(Clip(PutanjaSOAP) , Clip(PostString))
18
Web Server - Ask For Help / HTTP Request (get and post)
« on: March 29, 2016, 02:24:15 AM »
I know that post is not exactly related to web server, but I have no one to ask...
Problem: I have request from some clients to connect to web shop to send some data (xml). That site has digest authentication. In Nettalk example there is procedure that is related to my problem - question (TestWebClient). But... I cannot achieve to pass the authentication level on web shop. Using Fiddler to "catch" headers and authentication response from web shop I realize that in my (Nettalk) example, the response string isnt the same as that in Fiddler.
For example: in Fiddler I have something like this: Digest realm="Restricted area",qop="auth",nonce="56fb56f3a5f6c",opaque="adce87ac95a1435d74df7acbf41c9ce0",... but in Nettalk example response string isnt right, for example: the realm is empty, the nonce is empty,... and the web shop rejected me from login.
Is it any one here to help me with this problem because I am short in time on this one.
Nettalk 7.70
Regards, Oggy
Problem: I have request from some clients to connect to web shop to send some data (xml). That site has digest authentication. In Nettalk example there is procedure that is related to my problem - question (TestWebClient). But... I cannot achieve to pass the authentication level on web shop. Using Fiddler to "catch" headers and authentication response from web shop I realize that in my (Nettalk) example, the response string isnt the same as that in Fiddler.
For example: in Fiddler I have something like this: Digest realm="Restricted area",qop="auth",nonce="56fb56f3a5f6c",opaque="adce87ac95a1435d74df7acbf41c9ce0",... but in Nettalk example response string isnt right, for example: the realm is empty, the nonce is empty,... and the web shop rejected me from login.
Is it any one here to help me with this problem because I am short in time on this one.
Nettalk 7.70
Regards, Oggy
19
Web Server - Ask For Help / Offtopic, sort of - false virus alarm with NT
« on: December 08, 2015, 03:54:23 AM »
I have a very strange problem. On site on server our old client informed us some days ago that IT personal found virus (viruses) and that he found that our service based on Nettalk, back to version 4, installed over a six years ago, is source of viruses that compressed and encrypted all doc, jpg, pdf.... files (famous ransomware viruse). Now we are in deep .... you know what, because clients lawyer send mail to us that we will be charged for spreading viruses to theirs server. We are 100 % sure that our program(s) never and nowhere spread any kind of viruses, but how to convince their IT personal in that?
Is anyone have any kind od that problems...
Regards, Oggy
Is anyone have any kind od that problems...
Regards, Oggy
20
Web Server - Ask For Help / Change popup header
« on: April 10, 2015, 03:35:33 AM »
Little help please. I want to change header of popup "window" on wrong entered information on login page. For now it is "alert". How to change to for example: "warning" ....
My code to call popup is:
loc:alert = 'Warning, login information is NOT correct.'
p_web.Popup(loc:alert,0)
Nettalk 7.40
[attachment deleted by admin]
My code to call popup is:
loc:alert = 'Warning, login information is NOT correct.'
p_web.Popup(loc:alert,0)
Nettalk 7.40
[attachment deleted by admin]
21
Web Server - Ask For Help / Strange characher above browse
« on: November 18, 2014, 02:51:15 AM »
In some browses above table I had some strange character (zero for example)?!?
Nettalk 7
[attachment deleted by admin]
Nettalk 7
[attachment deleted by admin]
22
Web Server - Ask For Help / MultiSite question
« on: November 07, 2014, 04:51:23 AM »
Hi guys. I need to add SOAP options for my old web server application.
Is it possible to simultaneously run one web server and, regarding the input port, choose what application module returns some value.
For example, on port 88 user see web application, and on port 995 web server act like a classic SOAP server to return some data/information?
How to determine which port is listened and how to "swich" to module (SOAP / web)
Nettalk 7, Clarion 8
Regards, Oggy.
Is it possible to simultaneously run one web server and, regarding the input port, choose what application module returns some value.
For example, on port 88 user see web application, and on port 995 web server act like a classic SOAP server to return some data/information?
How to determine which port is listened and how to "swich" to module (SOAP / web)
Nettalk 7, Clarion 8
Regards, Oggy.
23
Web Server - Ask For Help / Conditional coloring browse row(s)
« on: August 13, 2014, 05:15:53 AM »
Any help on how to, on some condition, to color browse row(s) and where to put code in which embed, SetQueueRecord ?!?
in example, on User:Id_Level = 1 I want to color that row in red....
Nettalk 7.39
Regards, Ozren.
in example, on User:Id_Level = 1 I want to color that row in red....
Nettalk 7.39
Regards, Ozren.
24
Web Server - Ask For Help / Geotagging examples/screenshots
« on: July 08, 2014, 09:02:34 AM »
Hi guys, anyone with some screenshots of geotagging examples to show?
Recently, I started one big application, and now I am tasked to do thad (geotagging), of some kind?
Any screenshot how it looks like in example,
Regards Oggy
Recently, I started one big application, and now I am tasked to do thad (geotagging), of some kind?
Any screenshot how it looks like in example,
Regards Oggy
25
Web Server - Ask For Help / Disabling popup window resize
« on: July 01, 2014, 11:37:39 PM »
Another question for more experienced folks...
Is ti possible to disable resizing of any popup window? I need to disable popup windows so the users always have exactly the same, predefined
windows height and widht?
Is ti possible to disable resizing of any popup window? I need to disable popup windows so the users always have exactly the same, predefined
windows height and widht?
26
Web Server - Ask For Help / Weird errors on 2 different computers
« on: June 30, 2014, 10:41:19 PM »
I have instalation of Nettalk 7.39 on one comptuer in office. On that computer, my application works well. but on laptop with exactly the same configuration of Clarion 9, and Nettalk 7.39, on compilation these errors appears, without any changes in code:
Unknown procedure label - D:\Web9\novo\Web_Roby002.clw:313,5
Field not found: _SENDFOOTER - D:\Web9\novo\Web_Roby002.clw:313,10
Unknown procedure label - D:\Web9\novo\Web_Roby002.clw:317,5
Field not found: _SENDFOOTER - D:\Web9\novo\Web_Roby002.clw:317,10
Unknown procedure label - D:\Web9\novo\Web_Roby002.clw:321,5
Field not found: _SENDFOOTER - D:\Web9\novo\Web_Roby002.clw:321,10
Unknown procedure label - D:\Web9\novo\Web_Roby002.clw:339,5
Field not found: _SENDFOOTER - D:\Web9\novo\Web_Roby002.clw:339,10
Unknown procedure label - D:\Web9\novo\Web_Roby002.clw:343,5
And much more
Thanks in advance...
Unknown procedure label - D:\Web9\novo\Web_Roby002.clw:313,5
Field not found: _SENDFOOTER - D:\Web9\novo\Web_Roby002.clw:313,10
Unknown procedure label - D:\Web9\novo\Web_Roby002.clw:317,5
Field not found: _SENDFOOTER - D:\Web9\novo\Web_Roby002.clw:317,10
Unknown procedure label - D:\Web9\novo\Web_Roby002.clw:321,5
Field not found: _SENDFOOTER - D:\Web9\novo\Web_Roby002.clw:321,10
Unknown procedure label - D:\Web9\novo\Web_Roby002.clw:339,5
Field not found: _SENDFOOTER - D:\Web9\novo\Web_Roby002.clw:339,10
Unknown procedure label - D:\Web9\novo\Web_Roby002.clw:343,5
And much more
Thanks in advance...
27
Web Server - Ask For Help / Dynamic size of locator placeholder
« on: March 17, 2014, 10:12:15 AM »
Is it possible to dynamically change size of locator placeholders, based on tab changing condition..... Or even better based on header sorting.?
Regard, Oggy
Regard, Oggy
28
Web Server - Ask For Help / Cla$Hook - errors
« on: March 11, 2014, 01:58:21 AM »
Recently these errors start to ruin my day(s), without no obvious reason, for me at last....
Error picture in attachment.
I use Clarion 9 + Nettalk 7.37, StringTheory 2, WinEvent, SelfService, templates...
Regards, Ozren.
[attachment deleted by admin]
Error picture in attachment.
I use Clarion 9 + Nettalk 7.37, StringTheory 2, WinEvent, SelfService, templates...
Regards, Ozren.
[attachment deleted by admin]
29
Web Server - Ask For Help / Error with nT7.36. and StringTheory 2
« on: March 07, 2014, 05:52:01 AM »
After downloading and installing new patch(s): 7.36 for NT and 2.00 For StringTheory i have got numerous errors Invalid use of PRIVATE data...
like this one in thise procedure...
! Flush all pending commands
NetImap.FlushCommands Procedure()
pn equate('NetImap.FlushCommands')
code
self.Log(pn, '')
self._bufferCommands = false
self.SendAllData(self._commandBuffer.value) error posted on this line
self._commandBuffer.Free()
?!?!?
like this one in thise procedure...
! Flush all pending commands
NetImap.FlushCommands Procedure()
pn equate('NetImap.FlushCommands')
code
self.Log(pn, '')
self._bufferCommands = false
self.SendAllData(self._commandBuffer.value) error posted on this line
self._commandBuffer.Free()
?!?!?
30
Web Server - Ask For Help / Some help with printing (again)
« on: February 20, 2014, 03:15:47 AM »
Hello, I need to solve this, lets say, problem... 
My question is how to "refresh" or reset browse row without clicking on "browse", lets say it that way... I have a browse with print button. Printing of particular document is well, but... I must first click on browse row, and then on print button... When I just click on print button which in NOT on selected browse row,
I got report that is not pointed on newly row, but an "old" one...
I have a screenshot of my browse to explain my problem.
I forgot: this is source of fetching data, and that code get good position in table, but only if I put this code on embed:User clicked on a row in the browse.
This code is NOT working on server side click on button print?!?!
----------------------------------------------------------------------------------------------
p_web.ssv('KeyComponent',p_web.GetValue('TRK:SIF_POD')&p_web.GetValue('TRK:GDOK')&p_web.GetValue('TRK:SIF_PJ')&p_web.GetValue('TRK:BR_KNJIGE')&p_web.GetValue('TRK:RBRS'))
TRK:SIF_POD = sub(p_web.gsv('KeyComponent'),1,3)
TRK:GDOK = sub(p_web.gsv('KeyComponent'),4,4)
TRK:SIF_PJ = sub(p_web.gsv('KeyComponent'),8,3)
TRK:BR_KNJIGE = sub(p_web.gsv('KeyComponent'),11,2)
TRK:RBRS = sub(p_web.gsv('KeyComponent'),13,6)
If Access:KNJ_TRG.TryFetch(TRK:poRbrs) = Level:Benign
p_web.Ssv('pSif_Dok',TRK:SIF_DOK)
p_web.Ssv('pSif_Pj',TRK:SIF_PJ)
p_web.Ssv('pSif_Odj',TRK:SIF_ODJ)
p_web.Ssv('pBR_Blg',TRK:BR_BLG)
p_web.Ssv('pBrdok',TRK:BRDOK)
p_web.Ssv('pSIF_STS','9')
END
! ---------------------------------------------------------------------------------------------------------
[attachment deleted by admin]
My question is how to "refresh" or reset browse row without clicking on "browse", lets say it that way... I have a browse with print button. Printing of particular document is well, but... I must first click on browse row, and then on print button... When I just click on print button which in NOT on selected browse row,
I got report that is not pointed on newly row, but an "old" one...
I have a screenshot of my browse to explain my problem.
I forgot: this is source of fetching data, and that code get good position in table, but only if I put this code on embed:User clicked on a row in the browse.
This code is NOT working on server side click on button print?!?!
----------------------------------------------------------------------------------------------
p_web.ssv('KeyComponent',p_web.GetValue('TRK:SIF_POD')&p_web.GetValue('TRK:GDOK')&p_web.GetValue('TRK:SIF_PJ')&p_web.GetValue('TRK:BR_KNJIGE')&p_web.GetValue('TRK:RBRS'))
TRK:SIF_POD = sub(p_web.gsv('KeyComponent'),1,3)
TRK:GDOK = sub(p_web.gsv('KeyComponent'),4,4)
TRK:SIF_PJ = sub(p_web.gsv('KeyComponent'),8,3)
TRK:BR_KNJIGE = sub(p_web.gsv('KeyComponent'),11,2)
TRK:RBRS = sub(p_web.gsv('KeyComponent'),13,6)
If Access:KNJ_TRG.TryFetch(TRK:poRbrs) = Level:Benign
p_web.Ssv('pSif_Dok',TRK:SIF_DOK)
p_web.Ssv('pSif_Pj',TRK:SIF_PJ)
p_web.Ssv('pSif_Odj',TRK:SIF_ODJ)
p_web.Ssv('pBR_Blg',TRK:BR_BLG)
p_web.Ssv('pBrdok',TRK:BRDOK)
p_web.Ssv('pSIF_STS','9')
END
! ---------------------------------------------------------------------------------------------------------
[attachment deleted by admin]