NetTalk Central

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.


Messages - rjolda

Pages: [1] 2 3 ... 31
1
HI Jane,
I did re-look at DNS stuff. Indeed, it is the FULL API for DNSSIMPLE.  However, DNS Simple has  their own lightweight Dynamic DNS (DDNS) implementation, available at ddns.horse.
They provide a Curl example:  Here is an example using curl: curl -i "https://ddns.horse/nic/update?hostname=example.com&myip=1.2.3.4&myipv6=2001:db8::8a2e:370:7334" -u "accountid:token"
On capesoft I got the conversion
  net.Start()
  net.Authorization = net.CreateAuthorizationString ('accountid','token', Net:WebBasicAuthentication,true)
  net.Get('https://ddns.horse/nic/update?hostname=example.com&myip=1.2.3.4&myipv6=2001:db8::8a2e:370:7334')
I am using my Account ID for the authorization string "accountid"  and my OAuthToken for the 'token' part of it.

However, I am getting authorization failure. 
So, I can't get past the authorization with my credentials.  I did double check my credentials and they are correct. 
That is where I am at,
Ron

2
Web Server - Ask For Help / NT CLient for updating DDNS for DNSSIMPLE
« on: August 13, 2026, 11:13:12 AM »
Hi,
I have a DNSSIMPLE account for my DNS resolution.  My ISP gives me a Dynamic IP address.  DNSSIMPLE has an API to update DNS records when your HOST IP address changes.
Anyone with NetWebClient code to update DNS record when the host IP address changes. 
I have set up an OAUTH token on my DNSSIMPLE account.
They have an API but I have not got it working.
Anyone have working code that they can share? 
Thanks,
Ron

3
Web Server - Ask For Help / Re: How to translate C# API call to NT
« on: August 13, 2026, 07:53:52 AM »
HI,
THe code above was AI Generated and did NOT WORK!

However, I massaged the code to get this to work:

 URL =('https://vpic.nhtsa.dot.gov/api/vehicles/DecodeVIN/' & VINData & '?format=xml')
 
 net.contentType = 'application/x-www-form-urlencoded'
 net.SetAccept('json')
 net.Get(url) 


And, As Bruce said, the return is in the  .PageReceived  where I trap errors and then parse the return message:

log = clip(log) & '<13,10>------<13,10>' & self.ThisPage.GetValue()
st4.SetValue(log)  ! put the log into st object
do Extract_it   ( routine to extract out the fields.)

Ron

4
Web Server - Ask For Help / Re: Syslog 'Server'
« on: August 12, 2026, 07:39:10 AM »
Hi Paul,
Not sure what you are really trying to do.  Do you want to take log entries from your NT server and filter them and send an SMS text to your phone with the ones you want?
Ron

5
Web Server - Ask For Help / Re: form refreshes and shows from the top
« on: August 12, 2026, 07:36:53 AM »
Ooooh, that hurts.   If you don't have one procedure per module, then reset your app with one procedure per module.  If that doesn't help, then maybe you need to re-visit your very large table?
Ron

6
Web Server - Ask For Help / Re: Update field/variable on lose focus?
« on: August 11, 2026, 10:53:10 AM »
Hi Johan,
I did separate top menu items for Reset Password and for Create New User Account.  They do not have to be logged into the app to use these.  For password resets, they just enter their E mail address and press the Send Button - My code checks the e-mail and if it is a registered E mail I send them a link for Password reset.  That is a separate form from the login page - got too messy trying to do logins and password resets on same memform.  I allow new users to fill in a form and they need to enter their mobile phone number and their email ( their e mail address is their login).  I then send them a text with pin code and the link to use pin code to sign in and get new password.
I am not sure that you can trap the "Save" button on a memform. 
Ron

7
Web Server - Ask For Help / Re: Update field/variable on lose focus?
« on: August 10, 2026, 10:33:27 AM »
HI Johann,
I have seen the same issue.  In those cases I put a button on the form that says something like 'Press to Validate your entry'.  That way, they are told to do something. SO, if they complain that "they put in a value and it didn't work" then you can ask them if they pressed the "Validate button" - and it becomes your chance to educate them!
I am not sure if there is a $Script command that you can trigger before the form is closed but then it may not have the value they entered because they did not acknowledge it with a Tab or Enter.
Ron

8
Hi,
After lots of testing, I figured out that I really don't want the customer to INSERT records ( they are inserted in another procedure - so they only need to VIEW/Update the record.  So, just disabling the INSERT button in the Child Form solves my problem. 
Ron

9
Web Server - Ask For Help / Re: form refreshes and shows from the top
« on: August 09, 2026, 03:13:09 PM »
HI Mike,
Having difficulty figuring out exactly what you are doing?  Do you have multiple embedded Memory Forms?  Why don't you have one form with multiple tabs to update the file? 
Ron

10
Hi,
I have a MemForm with 2 Tabs.
Tab1 has a Browse on Auto File and calls Child procedure ?See Keys? based on AUTO:GUID as a Filter.
Tab2 Has a Browse on JoinedAuto File and calls the same Child procedure ?See Keys? based on a different filter - JOINAUTO:GUID.

So, both browses call the same ?See Keys? procedure but with different filters.
My problem is that when I call the procedure to Update_SeeKeys - I want to know if it was called from ?AutoFile? as a parent OR ?JoinedAuto? as a parent as they will populate the form with slightly different values.

I have tried finding Parent settings in browse and child and update and loc:parent and loc;filter. However, I have not been able to key in on something that will tell me which the original calling procedure was. Anyone with any insight or tricks? Maybe have to set a Server Value based on which Tab is active?
THanks,
Ron

11
Hi,
Using C11.1 and NT14.38
I have my DNS Simple set up and running.  I have filled in all of the information on the Server.  I test my DNS credentials and they are OK.
"Call to WhoAmI was Successful
HTTP/1.1 200 OK"
I go to test getting a Certificate and it goes through the process and hangs at :
[ 7/08/26-15:49:57]  DNS Record not yet propogated. Rechecking.     <<<<<<<<<<<<==========

This is the precursor message:
[ 7/08/26-15:49:56]  Checking DNS Record propogation
[ 7/08/26-15:49:55]  DNS Challenge for pdmginc.com being created

Where do I look for a problem?
Thanks,
Ron

12
Web Server - Ask For Help / Re: How to translate C# API call to NT
« on: June 26, 2026, 03:29:15 PM »
Wow, I just put it into llamacoder.dev and this is what I got back!  Now to test it.
Here's the Clarion equivalent of your C# code:

```clarion
    PROGRAM
    INCLUDE('NetWebClient.INC')  ! Include for HTTP client functionality
    INCLUDE('StringTheory.INC')  ! Include for StringTheory class (string manipulation)
    MAP
    END

VINData        STRING('3GNDA13D76S000000;5XYKT3A12CG000000;')
URL            STRING('https://vpic.nhtsa.dot.gov/api/vehicles/DecodeVINValuesBatch/')
Response       STRING(100000)
ErrorMsg       STRING(1000)
ST             StringTheory
WebClient      NetWebClient
PostData       CSTRING(1000)
    CODE
    ! Prepare the POST data
    ST.SetValue('data=' & VINData & '&format=json')
    ST.URLEncode()
    PostData = ST.GetValue()

    ! Configure the web client
    WebClient.SetSSL()  ! Enable SSL for HTTPS
    WebClient.SetHeader('Content-Type', 'application/x-www-form-urlencoded')
    WebClient.SetHeader('Accept', 'application/json')

    ! Make the POST request
    IF WebClient.Post(URL, PostData, Response)
        ! Success - Response contains the JSON data
        ! Process the response here
    ELSE
        ! Error handling
        ErrorMsg = WebClient.GetError()
        ! Handle error here
    END
```

Notes:
1. This uses the NetTalk WebClient class (NetWebClient) which is the standard HTTP client in Clarion
2. StringTheory is used for URL encoding the POST data
3. You'll need to have NetTalk installed in your Clarion environment
4. The response will be in the Response variable as a JSON string
5. Error handling is done through WebClient.GetError() if the request fails

13
Web Server - Ask For Help / How to translate C# API call to NT
« on: June 26, 2026, 03:24:11 PM »
HI,
I am trying to write an API to send auto VIN number to NHTSA and get an XML or JSON return regarding the information about the auto.
This is the C# POST Code:
string text = "3GNDA13D76S000000;5XYKT3A12CG000000;";
string url = @"https://vpic.nhtsa.dot.gov/api/vehicles/DecodeVINValuesBatch/";
var nameValues = new Dictionary<string, string>();
nameValues.Add("data", text);
nameValues.Add("format", "json");
HttpClient client = new HttpClient();
client.BaseAddress = new Uri(url);
      
// using FormUrlEncodedContent
var name = new FormUrlEncodedContent(nameValues);
client.DefaultRequestHeaders.Accept.Add(new MediaTypeWithQualityHeaderValue("application/json"));
System.Threading.CancellationToken token = new System.Threading.CancellationToken();
try
{
   var tmp = client.PostAsync(client.BaseAddress, name, token).Result;
   var result = tmp.Content.ReadAsStringAsync();
}
catch (Exception err)
{
   // error handling
}

Can anyone help translate this to NetTalk Client Post?
Thanks,
Ron

14
Web Server - Ask For Help / Looking for Testers - new App
« on: June 18, 2026, 05:23:39 AM »
Hi All,
We have completed an app for shops and customers and this is the customer portion. It allows the customer to create a KK-eGloveBox which will store the information and photos of their drivers license, their auto registration, insurance and inspection. This information is available at the touch of a button and if they are stopped, they can show all the documents to the officer from ANY car which they are linked to. No more digging through the glove box for documents. Additionally, they can use it to create electronic service requests and take a photo of their keys that they drop off - thereby giving positive key ID to the shop with a printable signed work order. Additionally, the customers will get e mail reminders for renewing any document if they put in expiration dates.

RIght now there is only one shop in the database as we test it out and start rolling it out.

We have also developed a Kiwi-Kiosk which will dispense keys 24/7 and this is operated through the same mobile app. That is at https://kiwi-kiosks.com.

Right now we need to test the customer portion. The interface may change a little as we tweak it. So, give it a try and get back to me with any issues/feedback, etc.

You can find the customer portion at http://eppili.net. Use the Setup New Account on the top menu. You will need a valid e mail account and mobile phone number to set it up. Then you can enter cars that you own and enter data on these cars. Everything should be working and if it isn?t let me know so that we can fix it.
Ron

15
Web Server - Ask For Help / Calling a javascript function
« on: April 22, 2026, 07:38:59 AM »
Hi
C11.1 NT 14.37
I have a javascript function called move().

I have a button and i want to execute the move() function when the button is pressed.
I have tried multiple permutations and this is my current permutation for the button embed.  However, it is not correct as the function does not execute.
This is the current iteration:
p_web.script('$(''["move()"]'').call();')
Can someone help me with the correct syntax to call this function from a NT button?
THanks,
Ron

Pages: [1] 2 3 ... 31