Solved

Hanging up modem after 30 minutes (TSR?)

Posted on 1997-09-13
2
182 Views
Last Modified: 2010-04-04
I have dial-up internet connection and
I would like to know how can I hang up my modem
after I have been online 30 minutes (or 120 minutes or
what ever time I choose).

It would hang up modem when duration in Windows 95
dialer is 00:30:00 and redial immediately after that.
And again hang up after 30 minutes and redial (loop :)
So the program would start after I have connected
(like ICQ does).
 
I guess I need some kind of tsr, but how do I do it?
Give me so advice where to start. I can use Delphi 2 or 3.

BTW Sorry bad english

ToniTOP
0
Comment
Question by:tonitop
2 Comments
 

Expert Comment

by:joseramos
ID: 1344763
I'm not sure I understood the question, however it appears as
this could be a perfect case for a TTimer that would check the
time elapsed (or Dialer duration) every 30 minutes or so and take some action (Dial again or hangup the modem).
0
 
LVL 3

Accepted Solution

by:
Pegasus100397 earned 100 total points
ID: 1344764
ToniTop,
You do not need a TSR for this activity but rather a small Delphi program to get the list of running tasks (Dial Up Networking in this case) and it's associated window handle.

Once you've determined the handle of the "Dial Up Networking" application, check it's child windows until you come to the label containing the "On-line" time. It's this label your program will monitor.

Once the label (minutes portion) reaches 30 then issue a WM_Click message to the "Disconnect" button on the form to close the connection. Wait about 10 seconds and issue a WM_Click message to the "Connect" button on the form. This will connect and re-set the on-line timer where you program will wait for the minutes to reach "30" again, thereby repeating the cycle. Hope this helps.

Pegasus
0

Featured Post

Free Tool: Site Down Detector

Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Delphi 2 77
Dev express lookupcombo 3 45
DBGrid or StringGrid ? 6 120
how to make 2 step back? ..\..\ ExtractFilePath (paramstr(0)) 5 70
Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…
Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
Attackers love to prey on accounts that have privileges. Reducing privileged accounts and protecting privileged accounts therefore is paramount. Users, groups, and service accounts need to be protected to help protect the entire Active Directory …
Are you ready to implement Active Directory best practices without reading 300+ pages? You're in luck. In this webinar hosted by Skyport Systems, you gain insight into Microsoft's latest comprehensive guide, with tips on the best and easiest way…

756 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question