PureBasic Forums - English

Your code ...
[08:55:39] [COMPILER] Line 12: Syntax error.

You're right! I apologize. My brain has been in a fog for the last year or so. This should be better: ; ------------------------------------------------------------
; Program name: network_procs.pbi
; Written by: Rich Algeni, Jr.
; Date ...

Seems to be an old code for old PB version.
Networking really hasn't changed in the 30 years I've been writing network programs.

In addition, this does not belong to this contribution NetworkTCP

Of course it does. Under the NetworkWrite() procedure, you can send an amount of data equivalent ...

skinkairewalker wrote: Mon Jan 20, 2025 8:35 pm how can i use this?
I detected several syntax errors

This is a procedure to help TEACH you how to use networking in PureBasic. Child procedures often use variables defined in calling procedures. If you have specific questions, I will be glad to help you.

Take a look at my network procedure, Let me know if you have any questions. ; Program name: network_procs.pbi
; Written by: Rich Algeni, Jr.
; Date written: 02/17/2011
;
; Purpose: to include network procedures into PB programs
; ------------------------------------------------------------

Global ...

The only way to get the receive process to know how many bytes are sent, is to send the number of bytes you will send at the beginning of the data. You can do this by sending a fixed number of bytes, for instance 6 (which can give you up to 999,999 ascii bytes in length), or use a character ...

RichAlgeni wrote: Sat Sep 14, 2024 6:57 pm Has anyone run into a CreatePack issue, where the packed file ends up corrupt?

One big piece of information I just found, this is running on a bitlocked machine.

Has anyone run into a CreatePack issue, where the packed file ends up corrupt?

I am using the following process to pack a 100 MB QuickBooks file, and rename it to a NAS.

packNumber = CreatePack(#PB_Any, "..\qb_backups\keeneStore.7z", #PB_PackerPlugin_Lzma, 7)
If packNumber
result = AddPackFile ...

If only this could work for QuickBooks!!! When people don't logout, we can't do backups.

No need to worry, I'm fine. I thought it was important to share a personal anecdote about why I feel the way I do. I must admit, I do find myself losing concentration on things. Probably just old age!

I lost my wife, and our daughters lost their mom on New Years Day last year. Cigarettes had a hold on her that we couldn't break. No one, including Jennifer, knew she had lung cancer. We thought she had pneumonia. Even her Primary Care Physician was shocked. It progressed to stage 4, and ...

CatchPack() works perfectly!!! Forgive me! My mind has been mush since I lost my wife.

Ok, so I'm an idiot! Fred, Freak and the team have already given us CatchPack()!

In the immortal words of Roseanne Roseannadanna..., nevermind!!!

I believe that I am trying to use a function, UncompressMemory() , in a way which it was not designed: to unpack a packed file with directories and files. I'd rather have not had to write the packed file to disk, then read it again as a packed file, but I believe that is what is required. Maybe in ...

Ok, so I took an old text file, and zipped it up using 7z and online winzip. The files both sowed they were valid zip files, but both could not be uncompressed. Is there consensus that this is a bug? Or am I doing something wrong?
EnableExplicit

UseZipPacker()
UseSHA2Fingerprint()

#ProgramName ...

Here are the variable assignments. I always use EnableExplicit: Define sha256Hash.s
Define readLength.i = $FFFF
Define outputSize.i = $7FFFF
Define *receiveBuffer = AllocateMemory(readLength + 1)
Define responseText.s = Space(readLength + 1)
Define *outputMemory = AllocateMemory(outputSize)
I didn ...