|
|
I have this code below:
[code]
<%
theStr = xmldoc.documentelement.selectnodes("dataElementsMaster").item(0).selectnodes("dataElementsIndiv").item(k).selectnodes("miscellaneousRemarks").item(0).selectnodes("remarks").item(0).selectnodes("freetext").item(0).text
'... Split the <freetext> XML Reply by : and ,
Dim expression_5: Set expression_5 = New RegExp
expression_5.Pattern = "[^:]*:([^/]*)/?"
expression_5.Global = True
Dim match_5, first_matches_5
Set first_matches_5 = expression_5.Execute(theStr)
dim sMyArray_5
sMyArray_5 = Array("Adult Net Net","Weekend Supp.","Pre-Addon","Markup","Agent Markup","Gross Fare","Fuel Surcharge","Tax","TOTAL")
counter = 0
For Each match_5 In first_matches_5
response.write "<tr bordercolor=#ececec><td align=right colspan=30><font face=verdana size=2><b>"& sMyArray_5(counter) &"</b> </font></td>"
if counter = 10 then
response.write "<td></td>"
else
response.write "<td align=right><font face=verdana size=2> " & match_5.SubMatches(0) & "</font></td>"
response.write "<td width=175> </td></tr>"
end if
counter = counter+1
Next
[/code]
theStr's output is:
ADTNN:870.00/WKEND:20.00/ADDON:0.00/MKUP:20.00/AGTMKUP:40.00/FARE:950.00/FUEL:0.00/TAX:134.20/TTL:1,084.20
I need to find a way to pick out the Agent Markup as i need to do some calculations on it. How can i do this?
TIA.
Picco
|
|
|
|
Untested code snipet:
items = Split(theStr,"/index.html")
for each items as item
x = Split(item,":")
if x[0] = "AGTMKUP" then
agtmkup = x[1]
end if
next
|
|
|
|
|
|
|
|
If you want a regex to do this, this should work.
Dim expression: Set expression = New RegExp
expression.Pattern = "AGTMKUP:([^/]*)/?"
expression.Global = True
Dim matches
Set matches = expression.Execute(theStr)
semper fi...
|
|
|
|
|
|
|
|
crmpicco
Troy Wolf
