| Welcome, Guest |
You have to register before you can post on our site.
|
| Forum Statistics |
» Members: 97,443
» Latest member: renoazul8
» Forum threads: 2,426
» Forum posts: 11,371
Full Statistics
|
| Online Users |
There are currently 1148 online users.
» 2 Member(s) | 1142 Guest(s)
Applebot, Bing, Facebook, Google, harrysebastian, renoazul8
|
| Latest Threads |
WebApplication.IP change ...
Forum: IntraWeb General Discussion
Last Post: MJS@mjs.us
Yesterday, 09:49 PM
» Replies: 1
» Views: 111
|
Hook/callback to handle t...
Forum: IntraWeb General Discussion
Last Post: Lenfors
09-08-2026, 09:03 AM
» Replies: 0
» Views: 107
|
Reproducible IIS crash in...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
09-08-2026, 01:48 AM
» Replies: 0
» Views: 118
|
The packages IW16.xx inc...
Forum: IntraWeb General Discussion
Last Post: hsbelli
09-03-2026, 11:46 AM
» Replies: 2
» Views: 401
|
Redirection issues with F...
Forum: IntraWeb General Discussion
Last Post: magosk
08-31-2026, 10:03 AM
» Replies: 0
» Views: 204
|
Source Code
Forum: IntraWeb General Discussion
Last Post: magosk
08-31-2026, 08:11 AM
» Replies: 3
» Views: 568
|
TContenthandler requires ...
Forum: IntraWeb General Discussion
Last Post: valmeras
08-30-2026, 02:35 AM
» Replies: 0
» Views: 193
|
TIWjQDBGrid erratic behav...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
08-20-2026, 05:12 PM
» Replies: 8
» Views: 2,139
|
Change Language DataTable
Forum: IntraWeb General Discussion
Last Post: Rigoberto Mercedes
08-19-2026, 03:21 PM
» Replies: 1
» Views: 328
|
How to terminate HTTP Thr...
Forum: Indy
Last Post: rlebeau
08-14-2026, 08:01 AM
» Replies: 5
» Views: 930
|
|
|
| POTP implementation |
|
Posted by: iwuser - 12-21-2023, 02:17 PM - Forum: IntraWeb General Discussion
- Replies (5)
|
 |
To avoid reinventing the wheel, has anyone implemented, or seen it implemented anywhere else, a complete TOTP authentication implementation (preferably in Delphi / IntraWeb), from enrolling users with QR codes, secret storage, code validation, etc.? Hopefully also complete with a Windows Service, or some ASP/JSP/PHP back-end? - all the components are generally available, it’s just rolling it all into a complete product that would take time I’m trying to save. There are a few mobile apps that can be freely used for the client side, which seems like a good motivation to piggy back on that.
Alexandre, can you add something along these lines into the standard IW? - it will need a QR component and maybe a new authentication scheme?
|
|
|
| Change report from send email to post to a php handler, need advice... |
|
Posted by: BosseB - 12-21-2023, 10:01 AM - Forum: Indy
- Replies (4)
|
|
I created a Subversion commit mailer back in 2018 using FPC/Lazarus and Indy 10 and it has been working ok up until recently when it has had all kinds of problems due to email security updates on mail servers etc.
So I am trying to move away from sending the emails out from the subversion server to have it post to a php script on my webserver instead. Then the script can send the report emails to the recipients.
The existing application uses TIdSMTP to send the message, which is written into a TIdMessage property by a composing function reading data from the svn server.
Now I want to have a similar function but instead of using the SMTP mail transfer it should POST the data to a php script which should do the mailing from there. I have so far no problems sending emails from that server.
But it is on an ISP so I cannot run anything else but web-server stuff there. Hence the php script for mailing.
So how can I use Indy10 to simulate a form submit using the POST method to send the data the script will need?
This is what I need to send:
- Sender name and email as a single line string
- Recipients list in name/email pairs as a single line string
- Message body as an html encoded multi-line text
These are already created in the current application but stuffed into a TIdMessage container used by TIdSMTP.
I can create the website php script as a form handler and use it to send the needed data from an html form with the following items:
method POST
From, To : text type inputs
Message: textarea
Submit button
What I want to do is send the data from my application the same way as how the user clicking submit would do.
How can that be done?
Which Indy10 component to use and how do I set it up to perform the POST operation?
|
|
|
|
| How to best accomplish this |
|
Posted by: PDSBILL - 12-19-2023, 02:41 PM - Forum: IntraWeb General Discussion
- Replies (8)
|
|
We have several ISAPI IW apps (15.2) that we link by each calling the others using TerminateAndRedirect.
This has worked great. Now we find Bad actors try to scrape our application and we have added an encrypted time string parameter will now pass when each app calls the other apps.
we decode and check the time string in the server controller's IWServerControllerBaseNewSession event.
If not checkTS(asession) then
begin
Asession.terminate;
exit;
end;
ASession.Data := TIWUserSession.Create(nil, ASession);
The result of this change is we find iwcache folders are not being cleaned up.
We are also seeing Reply is already set errors.
If we use IWServerControllerBaseBeforeNewSession, how do we send back an dynamic HTLM response as the function does not provide a response object only a request object
|
|
|
|
Problem with SNMP |
|
Posted by: STest6905 - 12-13-2023, 09:31 AM - Forum: Indy
- Replies (5)
|
|
Hello.
I have a gasoline generator that has the ability to report its status via the SNMP protocol. If I use a third-party app, I can get a response from querying "1.3.6.1.2.1.1.1.0" and "1.3.6.1.4.1.28634.6.2551906584.2.8206" and it works well. When I tried to write it myself, I notice that the first request is successful but on the second one I get a "NoSuchName" error.
ps.
Windows 10 x64
RAD Studio XE6
Indy 10.6.0
Here is my simple code:
Code: procedure TForm2.Button2Click(Sender: TObject);
var
i: Integer;
begin
SNMP.Host := '172.17.40.243';
SNMP.Port := 161;
SNMP.Community := 'public';
SNMP.Query.Clear;
SNMP.Query.Version := 0;
try
if not SNMP.Connected then
begin
SNMP.Connect;
Memo1.Lines.Add('Connected');
end
else
Memo1.Lines.Add('Already connected');
except
on E: Exception do
begin
Memo1.Lines.Add('Error on connect: ' + E.Message);
Exit;
end;
end;
try
SNMP.Query.PDUType := PDUGetRequest;
SNMP.Query.MIBAdd(Edit1.Text, '');
if SNMP.SendQuery then
begin
Memo1.Lines.Add('Value received: ' + SNMP.Reply.Value[0]);
end
else
begin
Memo1.Lines.Add('Error: ' + IntToStr(SNMP.Reply.ErrorStatus));
end;
SNMP.Disconnect;
except
on E: Exception do
begin
Memo1.Lines.Add('Error: ' + E.Message);
end;
end;
end;
This also doesn't work:
Code: procedure TForm2.Button5Click(Sender: TObject);
var
SNMP: TIdSNMP;
dn, PLevel, SRate: string;
p: Extended;
begin
SNMP := TIdSNMP.Create(nil);
try
SNMP.Host := '172.17.40.243';
SNMP.Community := 'public';
SNMP.Query.Version := 6;
SNMP.ReceiveTimeout := 3000;
if SNMP.QuickSend('1.3.6.1.2.1.1.1.0', SNMP.Community, SNMP.Host, dn) then
Memo1.Lines.Add(dn);
if SNMP.QuickSend('1.3.6.1.4.1.28634.6.2551906584.2.8206',
SNMP.Community, SNMP.Host, SRate) then
Memo1.Lines.Add(SRate);
Memo1.Lines.Add('');
finally
SNMP.Free;
end;
end;
In the first case, I have a positive result: (oid=1.3.6.1.2.1.1.1.0)
Code: Connected
Value received: IB-Lite
In the second case I have an error:
Code: Connected
Error: 2 (NoSuchName)
If I use a third-party program (MIBViewer), everything works fine:
Code: Send snmp get request to 172.17.40.243:161
.1.3.6.1.2.1.1.1.0 (not in loaded mib files) --> IB-Lite
Send snmp get request to 172.17.40.243:161
.1.3.6.1.4.1.28634.6.2551906584.2.8213.0 (not in loaded mib files) --> 261
Can anyone tell me what the problem is? I will be very grateful for the information
|
|
|
|
|
