Recupérer info film allocine txt et image (vb allocine 2)

Soyez le premier à donner votre avis sur cette source.

Vue 21 194 fois - Téléchargée 3 043 fois

Description

Voila j'avais il y a quelques temps développé une appli pour télécharger les affiches de films sur le site de movie covers, qui depuis a fermé ses portes.

On m'avait signalé que ma src était très bien, mais que j'aurais du la développer pour récupérer aussi les infos texte sur les films.

C'est chose faite avec cette source mais la avec allociné.com.

Récupération :Titre,année,genre,réalisateur,résumé,acteurs,nationalité,durée, film,miniature ,et affiche si dispo!!!!

Source / Exemple :


Tous dans le Zip
Voir la capture !!

Conclusion :


Mise a jour le 11/12/2003

- la source utilise maintenant le contrôle webbrowser pour récupérer le code source (gain de temps, et très stable), plus aucun problème chez moi!!!

- J'ai ajouté une progress bar lors d'une recherche ainsi que le pourcentage d'avancement (histoire de voir si ce n’est pas planté!!)

!!! Le contrôle inet est toujours utiliser pour l'affichage de l'affiche miniature, pour le téléchargement de l'affiche taille réel j'utilise l'api DoFileDownload, mais je ne peu pas l'utiliser pour le téléchargement de la miniature car elle ouvre une boite dialogue enregistrer sous, donc si qq. Sait comment on peu télécharger un fichier à partir d'une url sans inet et sans ouvrir une boite de dialogue, je suis preneur car j'aimerais bien ne plus utiliser inet qui apparemment pose pas mal de problème sur certaine config??

Voila j'espère que cette mise a jour fera remonter la note!!!, en tous cas je vais pouvoir maintenant me coder mon application de gestion de film!!

Un petit commentaire fait toujours plaisir, du moment qu'il est constructif!!!

PETITE ANNONCE PERSO : Je suis au chômage, alors si un boss du 59 a qq. Chose pour moi???

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
88
Date d'inscription
jeudi 21 avril 2005
Statut
Membre
Dernière intervention
13 juin 2013
1
Les évolutions de allociné ne permettent plus à ce code de fonctionner. Dommage il m'aurai été d'un grande utilité.
Quelqu’un a un solution?
Messages postés
8
Date d'inscription
vendredi 3 novembre 2000
Statut
Membre
Dernière intervention
27 mai 2008

Il ne marche pas, surement a cause des evolutions du site allocine !!!

J'aurais tant voulu que sa marche !!! pourrait tu remodifier ta source et la mettre a jour si c'est possible ???
Messages postés
1
Date d'inscription
vendredi 24 novembre 2000
Statut
Membre
Dernière intervention
5 septembre 2005

Dommage, ce code active mon antivirus BitDefender: infecté par Exploit.ADODB.Stream2.Gen

Function GetBinary(strPathSource As String, strFileName As String, strPathDest As String) As Long
On Error GoTo Err_GetBinary
Dim oHTTP
Dim oStream
Dim strSrcUrl As String

Const adTypeBinary = 1
Const adSaveCreateOverWrite = 2

Set oHTTP = CreateObject("MSXML2.XMLHTTP")

oHTTP.Open "GET", strPathSource & strFileName, False
oHTTP.Send

If oHTTP.Status = 200 Then
'Pas d'erreur
Set oStream = CreateObject("adodb.stream")
oStream.Type = adTypeBinary
oStream.Open
oStream.Write oHTTP.responseBody

oStream.SaveToFile strPathDest & strFileName, adSaveCreateOverWrite
GetBinary = ERROR_SUCCESS
Else
GetBinary = -1
End If
Set oStream = Nothing
Set oHTTP = Nothing

Exit Function

Err_GetBinary:
GetBinary = Err.Number
End Function
Messages postés
1247
Date d'inscription
mardi 7 mai 2002
Statut
Membre
Dernière intervention
18 février 2019
3
Comme je l'ai déja signaler vous pouvez trouver cette source sur vb france mais en ocx. En effet ayant adapter l 'ocx au nouveau formatage du site allociné, je ne vait pas recoder cette source :::

++
Messages postés
115
Date d'inscription
jeudi 11 octobre 2001
Statut
Membre
Dernière intervention
15 octobre 2012

En effet la structure du site d'allocine a changé idem pour l'adresse de recherche par mot clef.

J'ai aussi travaillé sur la base de ce programme pour en faire un plus complet avec base de données et d'autres sites de recherche ainsi que la récupération de l'affiche du film sur le site d'allociné et sur d'autre (au choix).
+ impression de jaquettes au format DVD, CD, et formulaire.
Ainsi qu'un paramétrage complet des balises de recherche dans le cas ou justement la structure et adresse changerait.
Tout en vb.net.
le programme à été amélioré: parti base de données ainsi que d'autres modules (réception de message anti-spam etc..et compo) de Jean-marie delaboutresse.
j'ai agrémenté le logiciel de différents modules pour en faire un tout-en-un.
Je ne peux pas diffuser le programme, car il est beaucoup trop gros pour être envoyé ici, mais vous
pouvez me le demander par mail ou à jean-marie.

La partie modification des balises n'est pas finie, mais fonctionnelle.
Afficher les 43 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.