Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

x
?
Solved

ASP startpoint when parsing xml

Posted on 2007-03-28
4
Medium Priority
?
201 Views
Last Modified: 2012-06-27
Hi
I am trying to get the results from an amazon xml feed using asp/ xml the following code works but only if the start point is valid. the startpoint is looking for <OurPrice> but if the product is not in stock the <OurPrice> attribute is not returned through the xml so my script crashes, what I need it to do is if the startpoint <OurPrice> is not returned set the value of strPrice to '0.00', the variable strPrice is then being used in an update statement to set the price in my database.  I would like to try and get an answer in classic asp please,

here is the code

 I'm using, I have taken out my developer token so the link to amazon will crash in this example

Dim objXML
             Set objXML = Server.CreateObject("MSXML2.ServerXMLHTTP.6.0")
                  strURL ="http://xml-eu.amazon.com/onca/xml3?t=webservices-20&dev-t=&AsinSearch=B0009yjb1g&type=lite&page=1&locale=uk&f=xml"
                  objXML.Open "GET" , strURL , False ,"",""
            objXML.Send
              If objXML.Status = 200 then
          strOpen = objXML.ResponseText
                            vStartAt1 = 1
          do while vStartAt1 <> -1
        startPoint= InStr(vStartAt1, strOpen, "<OurPrice>")   'Look for start string, start looking from cursor location.
'========================
If startPoint = 0 or IsNull(startPoint) then
   exit do
end if
'========================
     if startPoint <> -1 then  
          endPoint = InStr(startPoint, strOpen, "</OurPrice>")
                 if endPoint <> -1 then
             strPrice = Mid(strOpen, startPoint, endPoint-startPoint)
                   strPrice = Replace(strPrice, "'", """")
                    strPrice = Replace(strPrice, "<OurPrice>", "")
                    strPrice = Replace(strPrice, "£", "")
                       
                        Set db1 = server.CreateObject("ADODB.Connection")
db1.open MM_luxurygifts_STRING
strSQL1 = "UPDATE dbo.thomas SET pricecheckstatus = '2', pricecheck = (" & strPrice & ") FROM thomas WHERE id=151"
set rs1 = db1.execute(strSQL1)
set rs1 = nothing
db1.close
set db1 = nothing
            Else
           end if
             vStartAt1 = endPoint
              end if
                                  loop
                                      End if
        Set objXML = Nothing
0
Comment
Question by:sparky74
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
  • 2
4 Comments
 
LVL 75

Expert Comment

by:Anthony Perkins
ID: 18813629
Just out of curiousity, why in the world are you using string functions when you can use MSXML to parse the Xml Document?
0
 

Author Comment

by:sparky74
ID: 18813906
Thanks for the reply, I have never used MSXML to parse an XML Document before, in fact I didn't even know about it :(

I used the above script to scrape some info from one of our asp pages before and thought it would work in a similar way, which is does, but I have the problem when the <price> element is'nt returned.

I will search now for some info on MSXML, any examples of how I could achieve the above would be grateful

thanks

0
 
LVL 75

Accepted Solution

by:
Anthony Perkins earned 2000 total points
ID: 18818313
Post the Xml document and the node(s) you want to retrieve.
0
 

Author Comment

by:sparky74
ID: 18831350
Thanks for the comments, I found some info and got it sorted using the MSXML DOM to parse out the nodes
0

Featured Post

VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

User art_snob (http://www.experts-exchange.com/M_6114203.html) encountered strange behavior of Android Web browser on his Mobile Web site. It took a while to find the true cause. It happens so, that the Android Web browser (at least up to OS ver. 2.…
Browsing the questions asked to the Experts of this forum, you will be amazed to see how many times people are headaching about monster regular expressions (regex) to select that specific part of some HTML or XML file they want to extract. The examp…
This course is ideal for IT System Administrators working with VMware vSphere and its associated products in their company infrastructure. This course teaches you how to install and maintain this virtualization technology to store data, prevent vuln…
How to fix incompatible JVM issue while installing Eclipse While installing Eclipse in windows, got one error like above and unable to proceed with the installation. This video describes how to successfully install Eclipse. How to solve incompa…

705 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question