Exportpatch for Telephone CD

[soturiy]

Hello Ladies and Gentlemen,

i bought a phone book cd, called Das Telefonbuch, which includes the Yellow Pages.

I want to Export some Adresses and phone Numbers.

I need all 15108 data-sets, but i can only export 75 data-sets.

Well that would take a long time.

Therefore i hoped to find a script.

And i found one, but i don't really know how to use it, and if i follow the instructions i've read, it doesn't work.

Here the script:

^{WinWaitActive("Gelbe Seiten Deutschland")}

^{Dim $runden}

^{Dim $anzahl}

^{Dim $n}

^{$anzahl = 15108 ; Anzahl der Datensaetze}

^{$n = 0 ;Nummer der Startdatei}

 

^{$runden = $anzahl / 75 + $anzahl / 15000}

 

^{For $i = $runden To 1 Step -1}

^{WinWaitActive("Gelbe Seiten Deutschland")}

^{Send("+{DOWN 75}")}

^sleep(100)

^{ControlClick("Gelbe Seiten Deutschland", "", "[iD:2070]") ;Export Button}

^{WinWaitActive("Export")}

^{ControlSend("Export", "", "[CLASS:SysListView32; INSTANCE:1]", "{DOWN 14}") ;Auswahl auf CSV}

^{ControlClick("Export", "", "[iD:5100]") ; Export Speichern Button}

^{$n = $n + 1}

^{WinWaitActive("Textdatei speichern")}

^{ControlSend("Textdatei speichern", "", "[CLASS:Edit; INSTANCE:1]", $n) ;Dateinamen eingeben}

^{ControlSend("Textdatei speichern", "", "[CLASS:Edit; INSTANCE:1]", "!s") ;Dateinamen eingeben}

^{WinWaitActive("Gelbe Seiten Deutschland")}

^Sleep(90)

^{ControlSend("Gelbe Seiten Deutschland", "", "[CLASS:wxWindowClassNR; INSTANCE:2]", "{DOWN}") ;Suchergebnisse}

^Sleep(90)

^{ControlFocus("Gelbe Seiten Deutschland", "", "[CLASS:wxWindowClassNR; INSTANCE:2]") ; Focus auf Suchergebnisse}

^Sleep(50)

^Next

 

I hope you can help me with my problem.

 

Best regards,

soturiy

 

[water]

Welcome to AutoIt and the forum!

The limit of 75 records is enforced by the application?

[soturiy]

Hello,

yes the limit is forced by the application.

But i know that you can script around it in older versions of the cd.

[water]

When they enforce a limit then I think to bypass the limit might be against their terms of contract.