这是 XML 文件
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 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 | <ATTRIBUTES> <some part of attribute section> </ATTRIBUTES> <ETXML_LINE_TABTYPE> <some part of script section> </ETXML_LINE_TABTYPE> <PARAMETERS> <ETPAR_GUIX> <item> <PNAME>I_LANG</PNAME> <PTYP>I</PTYP> <PINDEX>0003</PINDEX> <PDATLEN>0128</PDATLEN> <PINTTYP>C</PINTTYP> <PINTLEN>000128</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0001</SORT_LNR> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>WE20_100_STEP_1</PNAME> <PTYP>X</PTYP> <PDESC>WE20 - SAPMSEDIPARTNER - 100</PDESC> <PINDEX>0009</PINDEX> <PGROUP>SAPGUI</PGROUP> <XMLREF_TYP>G</XMLREF_TYP> <PSTRUC_TYP>T</PSTRUC_TYP> <PREF_NAME>SAPGUI</PREF_NAME> <PDATLEN>0000</PDATLEN> <PINTLEN>000000</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0001</SORT_LNR> <PREF_NAME2>SAPGUI</PREF_NAME2> <VALUE><VALUE></VALUE> <VAL_TYPE>T</VAL_TYPE> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>V_LANG</PNAME> <PTYP>V</PTYP> <PINDEX>0007</PINDEX> <PGROUP>V.01</PGROUP> <PDATLEN>0128</PDATLEN> <PINTTYP>C</PINTTYP> <PINTLEN>000128</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0002</SORT_LNR> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>WE20_100_STEP_2</PNAME> <PTYP>X</PTYP> <PDESC>WE20 - SAPMSEDIPARTNER - 100</PDESC> <PINDEX>0010</PINDEX> <PGROUP>SAPGUI</PGROUP> <XMLREF_TYP>G</XMLREF_TYP> <PSTRUC_TYP>T</PSTRUC_TYP> <PREF_NAME>SAPGUI</PREF_NAME> <PDATLEN>0000</PDATLEN> <PINTLEN>000000</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0002</SORT_LNR> <PREF_NAME2>SAPGUI</PREF_NAME2> <VALUE><VALUE></VALUE> <VAL_TYPE>T</VAL_TYPE> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>I_AGENT</PNAME> <PTYP>I</PTYP> <PINDEX>0002</PINDEX> <PDATLEN>0128</PDATLEN> <PINTTYP>C</PINTTYP> <PINTLEN>000128</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0003</SORT_LNR> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>WE20_100_STEP_3</PNAME> <PTYP>X</PTYP> <PDESC>WE20 - SAPMSEDIPARTNER - 100</PDESC> <PINDEX>0011</PINDEX> <PGROUP>GETGUI</PGROUP> <XMLREF_TYP>I</XMLREF_TYP> <PSTRUC_TYP>T</PSTRUC_TYP> <PREF_NAME>GETGUI</PREF_NAME> <PDATLEN>0000</PDATLEN> <PINTLEN>000000</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0003</SORT_LNR> <PREF_NAME2>GETGUI</PREF_NAME2> <VALUE><VALUE></VALUE> <VAL_TYPE>T</VAL_TYPE> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>I_TYPE</PNAME> <PTYP>I</PTYP> <PINDEX>0004</PINDEX> <PGROUP>V.04</PGROUP> <PDATLEN>0128</PDATLEN> <PINTTYP>C</PINTTYP> <PINTLEN>000128</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0004</SORT_LNR> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>WE20_100_STEP_4</PNAME> <PTYP>X</PTYP> <PDESC>WE20 - SAPMSEDIPARTNER - 100</PDESC> <PINDEX>0012</PINDEX> <PGROUP>GETGUI</PGROUP> <XMLREF_TYP>I</XMLREF_TYP> <PSTRUC_TYP>T</PSTRUC_TYP> <PREF_NAME>GETGUI</PREF_NAME> <PDATLEN>0000</PDATLEN> <PINTLEN>000000</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0004</SORT_LNR> <PREF_NAME2>GETGUI</PREF_NAME2> <VALUE><VALUE></VALUE> <VAL_TYPE>T</VAL_TYPE> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>V_AGENT</PNAME> <PTYP>V</PTYP> <PINDEX>0006</PINDEX> <PGROUP>I.02</PGROUP> <PDATLEN>0128</PDATLEN> <PINTTYP>C</PINTTYP> <PINTLEN>000128</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0005</SORT_LNR> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>WE20_100_STEP_5</PNAME> <PTYP>X</PTYP> <PDESC>WE20 - SAPMSEDIPARTNER - 100</PDESC> <PINDEX>0013</PINDEX> <PGROUP>GETGUI</PGROUP> <XMLREF_TYP>I</XMLREF_TYP> <PSTRUC_TYP>T</PSTRUC_TYP> <PREF_NAME>GETGUI</PREF_NAME> <PDATLEN>0000</PDATLEN> <PINTLEN>000000</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0005</SORT_LNR> <PREF_NAME2>GETGUI</PREF_NAME2> <VALUE><VALUE></VALUE> <VAL_TYPE>T</VAL_TYPE> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>V_TYPE</PNAME> <PTYP>V</PTYP> <PINDEX>0008</PINDEX> <PGROUP>V.03</PGROUP> <PDATLEN>0128</PDATLEN> <PINTTYP>C</PINTTYP> <PINTLEN>000128</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0006</SORT_LNR> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>WE20_100_STEP_6</PNAME> <PTYP>X</PTYP> <PDESC>WE20 - SAPMSEDIPARTNER - 100</PDESC> <PINDEX>0014</PINDEX> <PGROUP>SAPGUI</PGROUP> <XMLREF_TYP>G</XMLREF_TYP> <PSTRUC_TYP>T</PSTRUC_TYP> <PREF_NAME>SAPGUI</PREF_NAME> <PDATLEN>0000</PDATLEN> <PINTLEN>000000</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0006</SORT_LNR> <PREF_NAME2>SAPGUI</PREF_NAME2> <VALUE><VALUE></VALUE> <VAL_TYPE>T</VAL_TYPE> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>MSG_1</PNAME> <PTYP>X</PTYP> <PDESC>Rules for Message Check eCATT Command MESSAGE</PDESC> <PINDEX>0005</PINDEX> <PGROUP>MESSAGE</PGROUP> <XMLREF_TYP>M</XMLREF_TYP> <PSTRUC_TYP>T</PSTRUC_TYP> <PREF_NAME>ETMSG_DEF_TABTYPE</PREF_NAME> <PDATLEN>0000</PDATLEN> <PINTLEN>000000</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0007</SORT_LNR> <PREF_NAME2>ETMSG_DEF_TABTYPE</PREF_NAME2> <VAL_TYPE>T</VAL_TYPE> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>E_MSG_1</PNAME> <PTYP>X</PTYP> <PDESC>Collected Messages Before ENDMESSAGE</PDESC> <PINDEX>0001</PINDEX> <PGROUP>ENDMESSAGE</PGROUP> <XMLREF_TYP>N</XMLREF_TYP> <PSTRUC_TYP>T</PSTRUC_TYP> <PREF_NAME>ETMSG_RES_TABTYPE</PREF_NAME> <PDATLEN>0000</PDATLEN> <PINTLEN>000000</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0008</SORT_LNR> <PREF_NAME2>ETMSG_RES_TABTYPE</PREF_NAME2> <VAL_TYPE>T</VAL_TYPE> <TAB_INDEX>0</TAB_INDEX> </item> <item> <PNAME>ZX_FI_FP_0569_MS07_COAS_FB_1</PNAME> <PTYP>X</PTYP> <PDESC>TF_FI_FP_FI_0569_MS07_CO_Search_Help_Internal_Orders_vTD0_1_</PDESC> <PINDEX>0015</PINDEX> <PGROUP>REF</PGROUP> <XMLREF_TYP>R</XMLREF_TYP> <PSTRUC_TYP>T</PSTRUC_TYP> <PREF_NAME>ZX_FI_FP_0569_MS07_COAS_FB01</PREF_NAME> <PDATLEN>0000</PDATLEN> <PINTLEN>000000</PINTLEN> <PDECIMALS>000000</PDECIMALS> <SORT_LNR>0009</SORT_LNR> <PREF_NAME2>ZX_FI_FP_0569_MS07_COAS_FB01</PREF_NAME2> <VAL_TYPE>T</VAL_TYPE> <TAB_INDEX>0</TAB_INDEX> </item> </ETPAR_GUIX> |
从上面的 XML 文件中,我们要验证以下条件:
1) 来自
2) 来自
不存在
这是我尝试过的 vbscript:
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 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 | Dim sFSpec : sFSpec = oFS.GetAbsolutePathName("C:\ ewXML.xml") Dim objMSXML : Set objMSXML = CreateObject("Msxml2.DOMDocument") objMSXML.setProperty"SelectionLanguage","XPath" objMSXML.async = False objMSXML.load sFSpec objMSXML.validateOnParse = True dim item,items,root counter=0 Set NodeList = objMSXML.documentElement.selectNodes("/ECSC/PARAMETERS/ETPAR_GUIX/item") for each item in NodeList myPNAME = objMSXML.getElementsByTagName("PNAME").item(counter).text myPTYP = objMSXML.getElementsByTagName("PTYP").item(counter).text myPGROUP = objMSXML.getElementsByTagName("PGROUP").item(counter).text If (Left(myPNAME, 2) ="I_") Then IsValid_I = True If (Left(myPTYP, 1) <>"I") Then IsValid_I = False End If Set pgroup = objMSXML.selectSingleNode("/ECSC/PARAMETERS/ETPAR_GUIX/item[not(PGROUP)]/PNAME") If Not pgroup Is Nothing Then msgbox("PGROUP is exist for" &myPNAME) If (Left(myPGROUP, 1) <>"I" )Then IsValid_I = False End If Else msgbox("PGROUP is not exist for"&myPNAME) End If If IsValid_I = False Then msgbox(myPNAME &" is not valid.") End If IsValid_I = True End If If (Left(myPNAME, 2) ="V_") Then IsValid_V = True If (Left(myPTYP, 1) <>"V") Then IsValid_V = False End If Set pgroup = objMSXML.selectSingleNode("/ECSC/PARAMETERS/ETPAR_GUIX/item[not(PGROUP)]/PNAME") If Not pgroup Is Nothing Then msgbox("PGROUP is exist for" &myPNAME) If (Left(myPGROUP, 1) <>"V" )Then IsValid_V = False End If Else msgbox("PGROUP is not exist for"&myPNAME) End If IsValid_V = False Then msgbox(myPNAME &" is not valid.") End If IsValid_V = True End If If (Left(myPNAME,2) ="E_") Then IsValid_E = True If (Left(myPTYP, 1) <>"E") Then IsValid_E = False End If Set pgroup = objMSXML.selectSingleNode("/ECSC/PARAMETERS/ETPAR_GUIX/item[not(PGROUP)]/PNAME") If Not pgroup Is Nothing Then msgbox("PGROUP is exist for" &myPNAME) If (Left(myPGROUP, 1) <>"E" )Then IsValid_E = False End If Else msgbox("PGROUP is not exist for"&myPNAME) End If If IsValid_E = False Then msgbox(myPNAME &" is not valid.") End If IsValid_E = True End If counter=counter+1 next |
请帮帮我。提前致谢。
使用 XPath 和
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 60 61 | Dim oFS : Set oFS = CreateObject("Scripting.FileSystemObject") Dim sFSpec : sFSpec = oFS.GetAbsolutePathName("C:\\doc.xml") Dim objMSXML : Set objMSXML = CreateObject("Msxml2.DOMDocument") objMSXML.setProperty"SelectionLanguage","XPath" objMSXML.async = False objMSXML.load sFSpec objMSXML.validateOnParse = True FindMissingPgroups objMSXML FindInvalidPtyps objMSXML FindInvalidPGroups objMSXML Sub FindMissingPgroups(doc) Dim query, items, item, pname query ="/ECSC/PARAMETERS/ETPAR_GUIX/item[not(PGROUP)]" Set items = doc.selectNodes(query) For Each item In items Set pname = item.selectSingleNode("PNAME") MsgBox"Missing PGROUP for" & pname.text Next ' item End Sub Sub FindInvalidPtyps(doc) Dim query, items, item, pname, ptyp query = query &"/ECSC/PARAMETERS/ETPAR_GUIX/item[PGROUP][" query = query &" (starts-with(PNAME, 'I_') and not(starts-with(PTYP, 'I'))) or" query = query &" (starts-with(PNAME, 'V_') and not(starts-with(PTYP, 'V'))) or" query = query &" (starts-with(PNAME, 'E_') and not(starts-with(PTYP, 'E')))" query = query &"]" Set items = doc.selectNodes(query) For Each item In items Set pname = item.selectSingleNode("PNAME") Set ptyp = item.selectSingleNode("PTYP") MsgBox"Invalid PTYP (" & ptyp.text &") for" & pname.text Next ' item End Sub Sub FindInvalidPgroups(doc) Dim query, items, item, pname, pgroup query = query &"/ECSC/PARAMETERS/ETPAR_GUIX/item[PGROUP][" query = query &" (starts-with(PNAME, 'I_') and not(starts-with(PGROUP, 'I'))) or" query = query &" (starts-with(PNAME, 'V_') and not(starts-with(PGROUP, 'V'))) or" query = query &" (starts-with(PNAME, 'E_') and not(starts-with(PGROUP, 'E')))" query = query &"]" Set items = doc.selectNodes(query) For Each item In items Set pname = item.selectSingleNode("PNAME") Set pgroup = item.selectSingleNode("PGROUP") MsgBox"Invalid PGROUP (" & pgroup.text &") for" & pname.text Next ' item End Sub |
一些注意事项:
您可以使用两个
对于第一条规则,选择所有
2 3 4 5 6 7 8 9 10 11 12 | For Each item in nodesWithPgroup myPNAME = item.SelectSingleNode("PNAME").text myPTYP = item.SelectSingleNode("PTYP").text myPGROUP = item.SelectSingleNode("PGROUP").text code = Left(myPNAME, 1) If (Left(myPNAME, 2) = code &"_") Then If (Left(myPTYP, 1) <> code Or Left(myPGROUP, 1) <> code) Then msgbox(myPNAME &" is not valid.") End If End If Next |
我正在学习如何使用Nokogiri,根据这段代码我遇到了一些问题:require'rubygems'require'mechanize'post_agent=WWW::Mechanize.newpost_page=post_agent.get('http://www.vbulletin.org/forum/showthread.php?t=230708')puts"\nabsolutepathwithtbodygivesnil"putspost_page.parser.xpath('/html/body/div/div/div/div/div/table/tbody/tr/td/div
我有一个Ruby程序,它使用rubyzip压缩XML文件的目录树。gem。我的问题是文件开始变得很重,我想提高压缩级别,因为压缩时间不是问题。我在rubyzipdocumentation中找不到一种为创建的ZIP文件指定压缩级别的方法。有人知道如何更改此设置吗?是否有另一个允许指定压缩级别的Ruby库? 最佳答案 这是我通过查看rubyzip内部创建的代码。level=Zlib::BEST_COMPRESSIONZip::ZipOutputStream.open(zip_file)do|zip|Dir.glob("**/*")d
类classAprivatedeffooputs:fooendpublicdefbarputs:barendprivatedefzimputs:zimendprotecteddefdibputs:dibendendA的实例a=A.new测试a.foorescueputs:faila.barrescueputs:faila.zimrescueputs:faila.dibrescueputs:faila.gazrescueputs:fail测试输出failbarfailfailfail.发送测试[:foo,:bar,:zim,:dib,:gaz].each{|m|a.send(m)resc
很好奇,就使用rubyonrails自动化单元测试而言,你们正在做什么?您是否创建了一个脚本来在cron中运行rake作业并将结果邮寄给您?git中的预提交Hook?只是手动调用?我完全理解测试,但想知道在错误发生之前捕获错误的最佳实践是什么。让我们理所当然地认为测试本身是完美无缺的,并且可以正常工作。下一步是什么以确保他们在正确的时间将可能有害的结果传达给您? 最佳答案 不确定您到底想听什么,但是有几个级别的自动代码库控制:在处理某项功能时,您可以使用类似autotest的内容获得关于哪些有效,哪些无效的即时反馈。要确保您的提
假设我做了一个模块如下:m=Module.newdoclassCendend三个问题:除了对m的引用之外,还有什么方法可以访问C和m中的其他内容?我可以在创建匿名模块后为其命名吗(就像我输入“module...”一样)?如何在使用完匿名模块后将其删除,使其定义的常量不再存在? 最佳答案 三个答案:是的,使用ObjectSpace.此代码使c引用你的类(class)C不引用m:c=nilObjectSpace.each_object{|obj|c=objif(Class===objandobj.name=~/::C$/)}当然这取决于
我正在尝试使用ruby和Savon来使用网络服务。测试服务为http://www.webservicex.net/WS/WSDetails.aspx?WSID=9&CATID=2require'rubygems'require'savon'client=Savon::Client.new"http://www.webservicex.net/stockquote.asmx?WSDL"client.get_quotedo|soap|soap.body={:symbol=>"AAPL"}end返回SOAP异常。检查soap信封,在我看来soap请求没有正确的命名空间。任何人都可以建议我
关闭。这个问题是opinion-based.它目前不接受答案。想要改进这个问题?更新问题,以便editingthispost可以用事实和引用来回答它.关闭4年前。Improvethisquestion我想在固定时间创建一系列低音和高音调的哔哔声。例如:在150毫秒时发出高音调的蜂鸣声在151毫秒时发出低音调的蜂鸣声200毫秒时发出低音调的蜂鸣声250毫秒的高音调蜂鸣声有没有办法在Ruby或Python中做到这一点?我真的不在乎输出编码是什么(.wav、.mp3、.ogg等等),但我确实想创建一个输出文件。
给定这段代码defcreate@upgrades=User.update_all(["role=?","upgraded"],:id=>params[:upgrade])redirect_toadmin_upgrades_path,:notice=>"Successfullyupgradeduser."end我如何在该操作中实际验证它们是否已保存或未重定向到适当的页面和消息? 最佳答案 在Rails3中,update_all不返回任何有意义的信息,除了已更新的记录数(这可能取决于您的DBMS是否返回该信息)。http://ar.ru
我在我的项目目录中完成了compasscreate.和compassinitrails。几个问题:我已将我的.sass文件放在public/stylesheets中。这是放置它们的正确位置吗?当我运行compasswatch时,它不会自动编译这些.sass文件。我必须手动指定文件:compasswatchpublic/stylesheets/myfile.sass等。如何让它自动运行?文件ie.css、print.css和screen.css已放在stylesheets/compiled。如何在编译后不让它们重新出现的情况下删除它们?我自己编译的.sass文件编译成compiled/t
我想将html转换为纯文本。不过,我不想只删除标签,我想智能地保留尽可能多的格式。为插入换行符标签,检测段落并格式化它们等。输入非常简单,通常是格式良好的html(不是整个文档,只是一堆内容,通常没有anchor或图像)。我可以将几个正则表达式放在一起,让我达到80%,但我认为可能有一些现有的解决方案更智能。 最佳答案 首先,不要尝试为此使用正则表达式。很有可能你会想出一个脆弱/脆弱的解决方案,它会随着HTML的变化而崩溃,或者很难管理和维护。您可以使用Nokogiri快速解析HTML并提取文本:require'nokogiri'h