xxxxxxxxxxxxxxxxxxxxxxxxx

 

 

 

 

Anzeige aufgeben

 
xxxx

Online-Märkte

 
xxxx

FAQ's, Infos, News

 
xx
xx

Email

 

x
x
 Importieren von Anzeigen in großen Mengen

Sie können auch Anzeigen in größeren Mengen in die Anzeigenschleuder importieren, z.B. um diesen Service auch auf Ihrem Markt anzubieten oder wenn Sie regelmäßig Einträge aus Ihrer Datenbank hier einlesen möchten. (z.B.: Immobilienmakler, Gebrauchtwagenmarkt, ...). Dieser Service ist ebenfalls kostenlos.

so funktioniert es:


Sie können zur Importierung von Anzeigen untenstehenden Beispiel-Perl-Code verwenden oder einen vergleichbaren Code.
Oder: Sie bauen eine Formularseite auf (post-methode), welche denselben Link produziert.

Damit wird eine Anzeige in die Anzeigenschleuder eingelesen. Sie benötigen Ihr password und Ihre userid. Sobald Sie eine Verbindung installiert haben, informieren Sie uns, wir schalten Sie dann einmalig frei.
Um an diesem Service dauerhaft teilnehmen zu können, müssen die importierten Anzeigen eine hohe Qualität besitzen, d.h. z.B. korrekte Angaben, keine Wiederholungen, Anzeigen müssen für einen Leser interessant sein, ...
Wir behalten uns vor, einzelne Importeingänge auch wieder zu schließen.

Hier ein Beispielaufruf:

http://anzeigenschleuder.com/cgi-bin/cgilocal/german/submitAdvert.cgi?
CGIuser=<user>&CGIpasswd=<pwd>&advertheader=testas©text=testas&
country=0049&areacode=123&telephone=111&username=testname&
firstname=testvorname&street=abcd&zipcode=13507&town=Stuttgart&fax=123&
email=test&link=test&currcat=jobmarket&brandID=subcat01&
adverttype=biete&busitype=com&adult=ON&datetime=1234

Für <user> und <pwd> setzen Sie Ihre Werte für Ihren Anzeigenmarkt ein.

Für currcat und brandID müssen die exakten Werte aus unserer Rubrikenliste gesetzt sein.

 
x
xxxxx
#!/usr/local/bin/perl
use strict;
use HTTP::Request::Common qw (POST);
use LWP::UserAgent;

my(%DataHash);
my($url)='http://anzeigenschleuder.com/cgi-bin/cgilocal/german/submitAdvert.cgi';
my $ua = new LWP::UserAgent;
$ua->timeout(30);
#Fill %DataHash with test data.
$DataHash{'CGIuser'} = "username";
$DataHash{'CGIpasswd'} = "password";
$DataHash{'datetime'} = time();
$DataHash{'currcat'} = "jobmarket";
$DataHash{'brandID'} = "subcat01";
$DataHash{'adverttype'} = "biete";
$DataHash{'busitype'} =  "com";
$DataHash{'advertheader'} = "vergebe Arbeit";
$DataHash{'copytext'} = "Seri\366se und realistische\r\nEinkommensm\366glichkeit ...";
$DataHash{'country'} = "0049";
$DataHash{'areacode'} = "02331";
$DataHash{'telephone'} = "30xxx";
$DataHash{'username'} = "Graxxxx";
$DataHash{'firstname'} = "Manuela";
$DataHash{'street'} = "Worxxx. 23";
$DataHash{'zipcode'} = "58089";
$DataHash{'town'} = "Hagen";
$DataHash{'fax'} = "02331/34xxxx";
$DataHash{'email'} = "mgrxxx\@t-online.de";
$DataHash{'link'} = "www.lotto.de";
#$DataHash{'adult'} =  "ON";
print "Submitting data...\n";
my $res = $ua->request(POST($url, \%DataHash));
#$last_error_status = $res->is_error;
if ($res->is_error) {
#printf " Error: %s\n", $res->status_line;
printf "General HTTP Error: %s\n", $res->status_line;
} else {
if ($res->content =~ /^OK/) {
	print "Successfully!\n";
} else {
	print "Submission error!!! Errortext:\n".$res->content();
}
}
x