excel - Parse HTML in VBA to extract information from description list? -


I want to remove information from the website with Excel XP

I have some examples to the code () and the following: 

  function as strHtmlElementValue (htmldoc HTMLDocument, ID as a string) String Dim HtmlElement Set as IHTMLElement in HtmlElement = htmldoc.getElementById (ID) strHtmlElementValue = ID & amp; ":" & Amp; HtmlElement.innerText End Function   
 I tried it with the following URL ( htmldoc  loaded as):  
 If I The use of the string "open busted for id", gives the title of the function page, which is fine.  
 But how can I use E. G. Information like price? In  
 HTML code, it seems there is no ID and if I  getElementById  the class name to try to use "is24qa-kaufpreis", I get an error message < / P> 
 . & Lt; DL & gt; & Lt; DT & gt; & Lt; Strong class = "is24qa-kaufpreis-label" & gt; Kaufpreis: & lt; / Strong> & Lt; / Dt & gt; & Lt; Dd class = "is24qa-kaufpreis" & gt; 2.190.000,00 EUR & lt; / Dd> & Lt; / DL & gt;   
 So, there is a way to reach such areas as "is24qa-kaufpreis" and read the internal text (in this case  2.190.000,00 EUR  ?   
 
 
 You can see many different ways about it., Approach based on "getElementsByTagName In the source code for the web page, if you can trust the div of the "DD" in kaufpreis, then you can use the first method. A more general approach is to show it below Is.  
  Sub test () my_url = "http://www.immobilienscout24.de/expose/73940554" html_doc set = CreateObject ( "htmlfile") xml_obj set = CreateObject ( "MSXML2 .XMLHTTP ") xml_obj .Open" GET ", my_url, false xml_obj.send html_doc.body.innerhtml = xml_obj.responseText set xml_obj = nothing k_pice = html_doc.body.getElementsByTagName (" dd ") (0) .innertext ' or set result = html_doc.body .getElementsByTagName ( "to each itm DD") results if InStr (1, itm.outerhtml, "E UR", vbTextCompare) & gt; 0 then exit k_price = itm.innertext for the other end if the next ending sub

Comments

Post a Comment

Popular posts from this blog

c - Mpirun hangs when mpi send and recieve is put in a loop -

I was trying to use the program to use mifrewan on 4 node clusters. Distributing node 0 data in nodes 1, 2 and 3. In the program, from '90 'to variable values ​​of' dior 'to be calculated. Therefore the node is distributing data and collecting results in an omitted fashion (for different values ​​of var 'dir') when do {*******} Whereas (dir Loop is given, Mippun is hanging, and no output is found. But when I comment on two {*******} (dir The loop output is obtained for the initial value of variable dir dir = -90 ), and that output is correct. The problem occurs when the loop is given. Can anyone help me in solving this problem. #include "mpi.h" int main (int argc, char * argv []) Float dir = -90; Int rank, nanoprakash; MPI_Status status; MPI_Init (& amp; argc, & argv); MPI_Comm_rank (MPI_COMM_WORLD, & amp; Rank); MPI_Comm_size (MPI_COMM_WORLD, & amp; numprocs); If (rank == 0) {/ / data to begin / / (dest = 1; dest ...
Read more

python - Apply coupon to a customer's subscription based on non-stripe related actions on the site -

I can not find anything in the source about using coupons after subscribing to a user's plan. Is it possible to use a coupon to credit a user's membership after initial subscription? If not, what is the best option? Specifically, I want to give a user 100% coupon for that month, when they take 5 [site specific actions]. This is possible, but may not be the best idea. Coupons are currently applied to the stripe, then apply again at the customer level and each client can have a single coupon. So if you are already offering discounts to the coupon, then the customer who is currently in the present will also give up. It also means that if you are using a recently-added multiple subscription capacity, then all of the user's subscription will be ready for the month. Coupons can be set to "Once", only once (as the only name) can be used by any customer, so if this credit can earn more than once, You will have to maintain a 100% discount coupon continuousl...
Read more

java - Unable to get JDBC connection in Spring application to MySQL -

मैंने स्प्रिंग में डीबी कॉन्फ़िगरेशन का पालन किया है: & lt; bean id = "dataSource" Class = "org.apache.commons.dbcp.BasicDataSource" नष्ट-विधि = "बंद" & gt; & Lt; प्रॉपर्टी नाम = "url" मान = "jdbc: dburl" / & gt; & Lt; संपत्ति नाम = "driverClassName" मान = "com.mysql.jdbc.Driver" / & gt; & Lt; संपत्ति नाम = "उपयोगकर्ता नाम" मान = "उपयोगकर्ता नाम" / & gt; & Lt; संपत्ति नाम = "पासवर्ड" मान = "पासवॉर्फ" / & gt; & Lt; प्रॉपर्टी नाम = "हटाए गए हटाए गए" मान = "सही" / & gt; & Lt; गुण नाम = "प्रारंभिक आकार" मान = "3" / & gt; & Lt; संपत्ति नाम = "अधिकतमअक्टिव" मान = "5" / & gt; & Lt; / सेम ​​& gt; डीबी से गुण मूल्यों को लोड करने के लिए अतिरिक्त कॉन्फ़िगरेशन। & lt; bean id = "config1" class = "org.apache.commons.configuration....
Read more