[Ex] Collecter des infos d'un site et remplir un tableur
Posté : mer. 06 avr. 2022 21:00
bonjour,
je propose un petit utilitaire, à vous de voir si c'est légal et si cela a sa place ici
je ne viens plus beaucoup ici mais j'avais besoin de collecter des infos sur le site
https://www.interencheres.com/
dans mon cas des appareils photos argentiques, ça donne une idée de la valeur d'un objet pour ne pas le "surpayer"
à la fin d'une vente, le site donne le résultat de la vente jusqu’à minuit
je récupère le n° de lot, le prix, l'intitulé du lot dans un tableur libreoffice ou excel
c'est de la recherche de chaines:
;heme--light"></i> <span>Adjugé à 20 €</span> <span>-
$pattern = '.*Adjugé à(.*?)</span>.*'
$iprix = StringRegExpReplace($sligne, $pattern, '$1')
$pattern = '.*Lot n°(.*?)</div>.*' ;chercher un nombre entre "Lot n°" et le 1° "</div>"
$ilot = StringRegExpReplace($sligne, $pattern, '$1')
tout ca dans un tableau puis je rempli la feuille de calcul
_OOoCalc_WriteFromArray($oCalc, $T1, 0,0)
ou
_Excel_RangeWrite($oWorkbook, $oWorkbook.Activesheet, $T3, Default, True, True)
je propose un petit utilitaire, à vous de voir si c'est légal et si cela a sa place ici
je ne viens plus beaucoup ici mais j'avais besoin de collecter des infos sur le site
https://www.interencheres.com/
dans mon cas des appareils photos argentiques, ça donne une idée de la valeur d'un objet pour ne pas le "surpayer"
à la fin d'une vente, le site donne le résultat de la vente jusqu’à minuit
je récupère le n° de lot, le prix, l'intitulé du lot dans un tableur libreoffice ou excel
c'est de la recherche de chaines:
;heme--light"></i> <span>Adjugé à 20 €</span> <span>-
$pattern = '.*Adjugé à(.*?)</span>.*'
$iprix = StringRegExpReplace($sligne, $pattern, '$1')
$pattern = '.*Lot n°(.*?)</div>.*' ;chercher un nombre entre "Lot n°" et le 1° "</div>"
$ilot = StringRegExpReplace($sligne, $pattern, '$1')
tout ca dans un tableau puis je rempli la feuille de calcul
_OOoCalc_WriteFromArray($oCalc, $T1, 0,0)
ou
_Excel_RangeWrite($oWorkbook, $oWorkbook.Activesheet, $T3, Default, True, True)