Advertisement
Advertisement
| 06.02.2008 at 06:50AM PDT, ID: 23449821 |
|
[x]
Attachment Details
|
||
|
[x]
The Solution Rating System
|
||
With so many solutions, how can you tell which solutions are most likely to help you and which ones are not? To provide you with a tool to use, we rate our solutions based on various elements that most accurately determine if a solution is a quality solution. To explain what factors affect the solution rating, here are the elements we take into consideration when formulating our solution rating.
Your Input Matters If you have any suggestions that you would like to make for our rating system, please ask a question in the Suggestions Zone of Community Support. Thank you! |
||
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26: 27: 28: 29: 30: 31: 32: 33: 34: 35: 36: 37: 38: 39: 40: 41: 42: 43: 44: 45: 46: 47: 48: 49: 50: 51: 52: 53: 54: 55: 56: 57: 58: 59: |
<%@ Language=VBScript %>
<%Option Explicit%>
<HTML>
<HEAD>
<TITLE>Processing file</TITLE>
</HEAD>
<%
Dim xmlDoc
Dim xmlRoot
Dim xmlPNode
Dim xmlNode
Dim strDoc
'Set xmlDoc = Server.CreateObject("Microsoft.xmldom")
Set xmlDoc = Server.CreateObject("MSXML2.DOMDocument.3.0")
xmlDoc.async = False
xmlDoc.load(Server.MapPath("sample.xml"))
'save customer info into variables
Dim strTitle, strForename, strSurname
strTitle = xmlDoc.selectSingleNode("/Applications/Remotesale/Customer").getAttribute("Title")
strForename = xmlDoc.selectSingleNode("/Applications/Remotesale/Customer").getAttribute("Forename")
strSurname = xmlDoc.selectSingleNode("/Applications/Remotesale/Customer").getAttribute("Surname")
'Write the customer info
Response.Write strTitle & " " & strForename & " " & strSurname & "<br />"
'save the vehicles onto an array of node objects.
Dim vehicles
Set vehicles = xmlDoc.selectNodes("/Applications/Remotesale/Vehicles/Vehicle")
'iterate through array
Dim vehicleCounter
vehicleCounter = 1001
Dim strMake_1
Dim strMake_2
Dim strMake_3
Dim v
For Each v in vehicles
If vehicleCounter = 1001 then
strMake_1 = v.getAttribute("Make")
ElseIf vehicleCounter = 1002 then
strMake_2 = v.getAttribute("Make")
ElseIf vehicleCounter = 1003 then
strMake_3 = v.getAttribute("Make")
End If
vehicleCounter = vehicleCounter + 1
Next
Response.Write strMake_1 & "<br />"
If strMake_2 <> "" then Response.Write strMake_2 & "<br />"
If strMake_3 <> "" then Response.Write strMake_3 & "<br />"
%>
</BODY>
</HTML>
|