草庐IT

使用 vbscript 检查 xml 节点是否存在

codeneng 2023-03-28 原文

check xml node is exist or not using vbscript

这是 XML 文件

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
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
<ECSC>
 <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) 来自 <PARAMETERS> 标签 如果 <PNAME> 标签的前两个字母以 "I_" OR "V_" OR "E_" 开头,那么其对应的 <PTYP><PGROUP> 节点文本应该分别以 "I" OR "V" OR "E" 开头。

2) 来自 <PARAMETERS> 标记 如果任何 <PNAME> 没有对应的 <PGROUP> 则 VB 脚本应该显示错误,在这种情况下我们必须跳过检查第一个条件 <PGROUP> 节点只显示错误" <PGROUP> 节点对于 <PNAME>"

不存在

这是我尝试过的 vbscript:

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
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
Dim oFS      : Set oFS      = CreateObject("Scripting.FileSystemObject")
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 和 selectNodes 来识别无效的 item 元素,然后遍历无效节点以显示错误消息:

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
60
61
Option Explicit

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

一些注意事项:

  • 始终在每个脚本的顶部使用 Option Explicit。它将在将来为您省去头疼的问题。
  • 我将测试分成三组而不是两组。分别测试 PTYP 和 PGROUP 更容易。
  • 请注意,无效 PTYP 和 PGROUP 的测试包括谓词 [PGROUP]。这确保我们只检查具有 PGROUP 的项目(这是条件 2 要求的一部分)。

您可以使用两个 For Each 循环,每个规则一个循环。对于第二条规则,选择所有 <PNAME> 而不选择相应的 <PGROUP> 并显示错误消息,正如我在另一个问题中已经解释的那样。

对于第一条规则,选择所有 <item><PGROUP> 并验证它们:

1
2
3
4
5
6
7
8
9
10
11
12
Set nodesWithPgroup = objMSXML.documentElement.selectNodes("/ECSC/PARAMETERS/ETPAR_GUIX/item[PGROUP]")
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

有关使用 vbscript 检查 xml 节点是否存在的更多相关文章

  1. ruby - 如何使用 Nokogiri 的 xpath 和 at_xpath 方法 - 2

    我正在学习如何使用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

  2. ruby - 使用 RubyZip 生成 ZIP 文件时设置压缩级别 - 2

    我有一个Ruby程序,它使用rubyzip压缩XML文件的目录树。gem。我的问题是文件开始变得很重,我想提高压缩级别,因为压缩时间不是问题。我在rubyzipdocumentation中找不到一种为创建的ZIP文件指定压缩级别的方法。有人知道如何更改此设置吗?是否有另一个允许指定压缩级别的Ruby库? 最佳答案 这是我通过查看ruby​​zip内部创建的代码。level=Zlib::BEST_COMPRESSIONZip::ZipOutputStream.open(zip_file)do|zip|Dir.glob("**/*")d

  3. ruby - 为什么我可以在 Ruby 中使用 Object#send 访问私有(private)/ protected 方法? - 2

    类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

  4. ruby-on-rails - 使用 Ruby on Rails 进行自动化测试 - 最佳实践 - 2

    很好奇,就使用ruby​​onrails自动化单元测试而言,你们正在做什么?您是否创建了一个脚本来在cron中运行rake作业并将结果邮寄给您?git中的预提交Hook?只是手动调用?我完全理解测试,但想知道在错误发生之前捕获错误的最佳实践是什么。让我们理所当然地认为测试本身是完美无缺的,并且可以正常工作。下一步是什么以确保他们在正确的时间将可能有害的结果传达给您? 最佳答案 不确定您到底想听什么,但是有几个级别的自动代码库控制:在处理某项功能时,您可以使用类似autotest的内容获得关于哪些有效,哪些无效的即时反馈。要确保您的提

  5. ruby - 在 Ruby 中使用匿名模块 - 2

    假设我做了一个模块如下:m=Module.newdoclassCendend三个问题:除了对m的引用之外,还有什么方法可以访问C和m中的其他内容?我可以在创建匿名模块后为其命名吗(就像我输入“module...”一样)?如何在使用完匿名模块后将其删除,使其定义的常量不再存在? 最佳答案 三个答案:是的,使用ObjectSpace.此代码使c引用你的类(class)C不引用m:c=nilObjectSpace.each_object{|obj|c=objif(Class===objandobj.name=~/::C$/)}当然这取决于

  6. ruby - 使用 ruby​​ 和 savon 的 SOAP 服务 - 2

    我正在尝试使用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请求没有正确的命名空间。任何人都可以建议我

  7. python - 如何使用 Ruby 或 Python 创建一系列高音调和低音调的蜂鸣声? - 2

    关闭。这个问题是opinion-based.它目前不接受答案。想要改进这个问题?更新问题,以便editingthispost可以用事实和引用来回答它.关闭4年前。Improvethisquestion我想在固定时间创建一系列低音和高音调的哔哔声。例如:在150毫秒时发出高音调的蜂鸣声在151毫秒时发出低音调的蜂鸣声200毫秒时发出低音调的蜂鸣声250毫秒的高音调蜂鸣声有没有办法在Ruby或Python中做到这一点?我真的不在乎输出编码是什么(.wav、.mp3、.ogg等等),但我确实想创建一个输出文件。

  8. ruby-on-rails - 如何验证 update_all 是否实际在 Rails 中更新 - 2

    给定这段代码defcreate@upgrades=User.update_all(["role=?","upgraded"],:id=>params[:upgrade])redirect_toadmin_upgrades_path,:notice=>"Successfullyupgradeduser."end我如何在该操作中实际验证它们是否已保存或未重定向到适当的页面和消息? 最佳答案 在Rails3中,update_all不返回任何有意义的信息,除了已更新的记录数(这可能取决于您的DBMS是否返回该信息)。http://ar.ru

  9. ruby-on-rails - 'compass watch' 是如何工作的/它是如何与 rails 一起使用的 - 2

    我在我的项目目录中完成了compasscreate.和compassinitrails。几个问题:我已将我的.sass文件放在public/stylesheets中。这是放置它们的正确位置吗?当我运行compasswatch时,它不会自动编译这些.sass文件。我必须手动指定文件:compasswatchpublic/stylesheets/myfile.sass等。如何让它自动运行?文件ie.css、print.css和screen.css已放在stylesheets/compiled。如何在编译后不让它们重新出现的情况下删除它们?我自己编译的.sass文件编译成compiled/t

  10. ruby - 使用 ruby​​ 将 HTML 转换为纯文本并维护结构/格式 - 2

    我想将html转换为纯文本。不过,我不想只删除标签,我想智能地保留尽可能多的格式。为插入换行符标签,检测段落并格式化它们等。输入非常简单,通常是格式良好的html(不是整个文档,只是一堆内容,通常没有anchor或图像)。我可以将几个正则表达式放在一起,让我达到80%,但我认为可能有一些现有的解决方案更智能。 最佳答案 首先,不要尝试为此使用正则表达式。很有可能你会想出一个脆弱/脆弱的解决方案,它会随着HTML的变化而崩溃,或者很难管理和维护。您可以使用Nokogiri快速解析HTML并提取文本:require'nokogiri'h

随机推荐