Auto POST

The project i am working on requires the HTML POST data to be sent automatically to a local server... Without the user pressing any button on a HTML page etc..

This needs to be done untill the local server BAN's the IP. The problem is how do i send the POST data like that.. if it was GET i could just create the URL and use a software to check that URL any number of times.. Can a JAVA script or some software send the required POST data required number of times...


Help would be appreciated

why are you doing that?

from a webpage? easiest way I can think of is in a flash movie. you can post very easily and repeatedly in flash.

in an app? there's always a WinInet looping post thing. shouldn't be more than a few lines of code

Doesn't sound like the nicest thing to make...

Quote:

---

Originally posted by -KEN-
Doesn't sound like the nicest thing to make...

---

Yeh, why are you doing this?

I am doing it to test and debug our colleges intranet posting board.. since some students last week started bombarding the server and crashed it.. I am incharge of this thing. So i have to generate continous post requests.. and the ASP page on the server has to add the IP to the list if too much POST data comes from a PC.

i guess you can do a javascript function that opens a child window in the background, and that child window loops sending the post?

can any one here please give an example or a small java script code snipet on how to do it...

can you use a perl script?

Code:

---

#!/usr/bin/perl

%form = ( key1 => "key1value",  # whatever you want to post goes here, fairly straightforward.
          key2 => "key2value",
          key3 => "key3value" );

use URI::URL;
use LWP::UserAgent;

while(1)
{
 $ua = new LWP::UserAgent; 
 my $curl = url("http:");
 $curl->query_form(%form);
 my $req = new HTTP::Request 'POST',
 "http://www.singtel-mobile.com/products_services/online_services/sms.html"; # your url here
 $req->content_type('application/x-www-form-urlencoded');
 $req->content($curl->equery);
 print $ua->request($req)->as_string; #this will print the results, comment it out if you feel it slows things down too much.
}

---

Thanx for your help but i cannot use perl script.. Java script would be appreciated

Quote:

---

Originally posted by vasanth
Thanx for your help but i cannot use perl script.. Java script would be appreciated

---

of course you can.

get activeperl from here:
http://downloads.activestate.com/Act...SWin32-x86.msi

then install, then open a DOS box (command prompt)
and type

set path=%path%;c:\perl\bin
(or wherever the binaries were installed)

then save that script as a text file
and run it from the command line by typing
perl whatever.pl

thanx.. it works now