• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Nederlandse top 40

Status
Niet open voor verdere reacties.

de klaes

Gebruiker
Lid geworden
24 okt 2010
Berichten
19
Hoi misschien een vreemde vraag.
en waarschijnlijk op de verkeerde plaats

Ik ben zelf een beetje lijstjes gek
en de top 40 vind/vond ik altijd al leuk
maar om zelf de databank te hebben waar je zelf iets mee kunt (lekker simpel)
en daarna eventueel om te kunnen zetten naar een echte databank (sql oid)
daarom heb ik zelf iets in elkaar gedraaid (bijlage)

ben begonnen maar even vlug gerekend
1965 t/m 2015 = 51 jaar x 52 weken x 5-10 minuten = ergens tussen de 200 en 400 uur
oeps da's lang en ook nog andere hobbies / werk en het is taai werk.

nu de vraag
Zijn er mensen zo'n dit ook wel iets lijkt.
en denken ja ik wil ook wel mee helpen met een jaar of wat
Of hebben al zo'n bestand (zou helemaal prachtig zijn als je dat wilt delen scheelt veel werk)

graag hier onder melden

ps in het bestand staan opmerkingen zodat het misschien duidelijker wordt
heb ook 1965 +1965 toegevoegd (iets andere lay-out en probleem in die jaren is dat er meerdere artiesten gelijk tijdig genoemd worden)
 

Bijlagen

het is dat je die PDFjes ook omgezet gaan worden in een excel cq databank

die pdf files heb ik ook allemaal
en die google link had ik ook gevonden
 
Deel je nu iets mee of heb je vragen over hoe je iets kan oplossen in Excel?
 
Nee
het is een vraag of mensen eventueel mee zouden willen doen
om de gehele top 40 om te zetten naar excel bestanden
 
RogerS

is ook geen aanval op jouw hoor

waarom die lijstjes?
misschien een tik. het is meer voor de heb
heb de meeste nummers uit de top 40 vanaf 1965
de bij behorende pdf jes
en het is niet voor de handel maar gewoon lekker een dagje naar een bepaald jaar luisteren
radio is niet meer wat het was
 
bijv.

Code:
Sub M_snb()
   With CreateObject("MSXML2.xmlhttp")
      .Open "get", "https://www.top40.nl/top40/1970/week-1", False
      .send
      c00 = .responsetext
   End With
   
   With CreateObject("htmlfile")
     .body.innerHTML = c00
     For Each it In .Links
       MsgBox it
     Next
   End With
End Sub
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan