PDA

View Full Version : OCR Data extraction with VBA from Web site HELP!



Galactico
09-07-2017, 10:43 AM
Hello everyone

I have the following macros to get internet data, but, I do not know how to apply ocr to get the value that I need (price) (or if there is another way to get it)



Sub scgget()Dim htmlDeRespuesta As Object
Set htmlDeRespuesta = CreateObject("htmlFile")
With CreateObject("msxml2.xmlhttp")
.Open "Get", "sales.starcitygames.com/carddisplay.php?productids[]=1263992&productids[]=1264618", False
.send
htmlDeRespuesta.body.innerhtml = .responsetext
End With


On Error Resume Next
Range("e8").Value = htmlDeRespuesta.GetElementsByTagName("span")(7).innertext
Range("e8").Replace What:="Out of Stock", Replacement:="NS"


On Error GoTo 0
End Sub


I would greatly appreciate your help

sorry for my english, not main language, thanks!