PureBasic Forums - English

How extract this json to structure and read params "text" and "callback_data"?
{
"chat_id": "123456",
"text": "Hi",
"reply_markup": {
"inline_keyboard": [[
{
"text": "A",
"callback_data": "A1"
},
{
"text": "B",
"callback_data": "C1"
}]
]
}
}


Structure inline_keyboard ...

fluent wrote:OK, Headers is a Variant parameter.

Thanks! Its work!

If I remember there is JAVA script to do the job too
which you can run it directly from PB WebGadget
I was unable to find solutions in javascript. But I saw what miracles you demonstrated using winapi.

This is my code opening page from ip adress but not change host in heder. Maby you help me ...

fluent wrote:Do you need to open one page, or several pages on your site?
If it is for just one page I believe I have a solution.

yes, only one page

Hello friends!
I need to use an ip address to open the page, but the web server requires entering the site name. If you change the ip in the header to a name, the page will open successfully.
Is it possible to change the Host value in the header in webgadget?
I need a windows only solution.

If I use 7zip archiver then my pack is ok


I tried all the methods of packers from purebasic and there was always an unsuccessful result

UseLZMAPacker()
; Create the packed file
If CreatePack(0, "mycompressedfiles2.7z")
; add your files
AddPackFile(0, "text_over_4_gb_size.txt", "text_over_4_gb_size.txt")
ClosePack(0)
EndIf

text_over_4_gb_size.txt size is 4 405 088 234 bytes
The result is small size archive with a packed ...

16300 is the approximate size of a pool of dynamic ports configured in windows.
I changed this: "netsh int ipv4 set dynamicport start= number num= range " and expanded the number of ports and the number of connections managed to greatly increase.

But I don’t understand why the client program ...

Hello! I discovered strange behavior

Global count

Procedure Tcpsrv_connect(param)
Print("connection")
Protected ccontrol_port.l=5555
Protected ccontrol_ip.s="192.168.101.252"
Protected ConnectionID
ConnectionID = OpenNetworkConnection(ccontrol_ip, ccontrol_port)
If ConnectionID
SendStr.s ...

Little John wrote: What is the purpose of the marked line?
My suggestion: Remove it and see whether the code then works as desired.

Yes, this is an extra line, but it does not solve the problem.

Little John wrote: 404 Not Found.

Fixed.

Hello to all! I have a problem with the code.

If CreateRegularExpression(0, "(.+?)\|(.+?)")
If ExamineRegularExpression(0, " :evil: | :twisted: ")
While NextRegularExpressionMatch(0)
RegularExpressionGroup(0, 1)
If OpenFile(0, "test.txt")
FileSeek(0, Lof(0))
WriteStringN(0 ...

Hello! The group crash if ListIconGadget with #PB_ListIcon_GridLines

it seems it's a victory!

Enumeration FormGadget
#Panel_0
#ListIcon_0
#ListIcon_1
#ListIcon_2
#Splitter_0
EndEnumeration


Procedure WinCallback(hWnd, uMsg, WParam, LParam)
Select uMsg
Case #WM_SIZE
width = WindowWidth(0)
height=WindowHeight(0)
; GadgetHeight
Select WParam
Case #SIZE ...

How to make a form with a panel, like in FormDesigner from my code?


Enumeration FormGadget
#Panel_0
#ListIcon_0
#ListIcon_1
#ListIcon_2
#Splitter_0
EndEnumeration


Procedure WinCallback(hWnd, uMsg, WParam, LParam)
Select uMsg
Case #WM_SIZE
width = WindowWidth(0)
height=WindowHeight(0 ...

Im windows user and i make stdread program on AutoIt for ffmpeg. Autoit work great and I did not have any problems!