<?xml version="1.0" encoding="utf-8"?>
<feed xmlns="http://www.w3.org/2005/Atom">
	<title type="html"><![CDATA[Серый форум &mdash; VBS Работа с массивами]]></title>
	<link rel="self" href="https://forum.script-coding.com/extern.php?action=feed&amp;tid=8147&amp;type=atom" />
	<updated>2013-03-13T12:25:01Z</updated>
	<generator>PunBB</generator>
	<id>https://forum.script-coding.com/viewtopic.php?id=8147</id>
		<entry>
			<title type="html"><![CDATA[Re: VBS Работа с массивами]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=70239#p70239" />
			<content type="html"><![CDATA[<p><strong>inock</strong><br />Оптимально работать с <a href="http://script-coding.com/WSH/Dictionary.html#2.2.">коллекциями</a>.</p>]]></content>
			<author>
				<name><![CDATA[Flasher]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=27593</uri>
			</author>
			<updated>2013-03-13T12:25:01Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=70239#p70239</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS Работа с массивами]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=70232#p70232" />
			<content type="html"><![CDATA[<div class="quotebox"><cite>alexii пишет:</cite><blockquote><p>Используйте Recordset.</p></blockquote></div><p>Да, наверное это будет оптимально. Спасибо <img src="//forum.script-coding.com/img/smilies/smile.png" width="15" height="15" /></p>]]></content>
			<author>
				<name><![CDATA[inock]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=25049</uri>
			</author>
			<updated>2013-03-13T10:57:47Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=70232#p70232</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS Работа с массивами]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=70231#p70231" />
			<content type="html"><![CDATA[<p><strong>inock</strong>, перебором.</p><p>Если есть возможность использовать вместо обычного массива ассоциативный («Scripting.Dictionary») — используйте его. Используйте Recordset. Выбор зависит от того, что Вы делаете в дальнейшем с данными.</p>]]></content>
			<author>
				<name><![CDATA[alexii]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=1844</uri>
			</author>
			<updated>2013-03-13T10:49:28Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=70231#p70231</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS Работа с массивами]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=70229#p70229" />
			<content type="html"><![CDATA[<div class="quotebox"><cite>Dmitrii пишет:</cite><blockquote><p>Если массив невелик, то можно и не перебором.</p></blockquote></div><p>А если массив приличный?</p><p>Там суть-то в чем... Считываются данные (для простоты скажем, номера телефонов из файла). Данные могут повторяться. Если такого номера еще не было - заносим в массив. если уже такой номер есть в массиве - ничего не делаем, считываем следующую строчку.</p><p>Вот сижу, соображаю, как это лучше реализовать...</p>]]></content>
			<author>
				<name><![CDATA[inock]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=25049</uri>
			</author>
			<updated>2013-03-13T10:43:11Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=70229#p70229</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[Re: VBS Работа с массивами]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=70228#p70228" />
			<content type="html"><![CDATA[<div class="quotebox"><cite>inock пишет:</cite><blockquote><p>... в VBS есть средства поиска данных в массиве...</p></blockquote></div><p>Нет.<br /></p><div class="quotebox"><cite>inock пишет:</cite><blockquote><p>... или тупо перебором искать?..</p></blockquote></div><p>Если массив невелик, то можно и не перебором. Так, например:<br /></p><div class="codebox"><pre><code>Dim zooAnimals(2), strTemp, x
zooAnimals(0) = &quot;lion&quot;
zooAnimals(1) = &quot;turtle&quot;
zooAnimals(2) = &quot;ostrich&quot;
strTemp = Join(zooAnimals, &quot;;&quot;) &amp; &quot;;&quot;
x = InStr(1, strTemp, &quot;ostrich;&quot;, vbTextCompare)
If x &gt; 0 Then
    If x = 1 Then
        WScript.Echo x - 1
    Else
        WScript.Echo UBound(Split(Left(strTemp, x - 2), &quot;;&quot;)) + 1
    End If
Else
    WScript.Echo &quot;Нет такого элемента&quot;
End If</code></pre></div>]]></content>
			<author>
				<name><![CDATA[Dmitrii]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=13351</uri>
			</author>
			<updated>2013-03-13T10:37:54Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=70228#p70228</id>
		</entry>
		<entry>
			<title type="html"><![CDATA[VBS Работа с массивами]]></title>
			<link rel="alternate" href="https://forum.script-coding.com/viewtopic.php?pid=70224#p70224" />
			<content type="html"><![CDATA[<p>Для поиска значения в массиве в VB микрософт <a href="http://msdn.microsoft.com/ru-ru/library/c7cdd1d1(v=vs.90).aspx">предлагает такой код</a>:</p><div class="codebox"><pre><code>Public Sub findAnimal()
    Dim zooAnimals(2) As String
    zooAnimals(0) = &quot;lion&quot;
    zooAnimals(1) = &quot;turtle&quot;
    zooAnimals(2) = &quot;ostrich&quot;
    Dim turtleIndex As Integer
    turtleIndex = (Array.IndexOf(zooAnimals,&quot;turtle&quot;))
    MsgBox(&quot;The turtle is element &quot; &amp; turtleIndex)
End Sub</code></pre></div><p>Однако, в VBS он не работает, WSH не понимает объект Array.<br />Вопрос: в VBS есть средства поиска данных в массиве или тупо перебором искать?</p><p>Спасибо.</p>]]></content>
			<author>
				<name><![CDATA[inock]]></name>
				<uri>https://forum.script-coding.com/profile.php?id=25049</uri>
			</author>
			<updated>2013-03-13T09:43:06Z</updated>
			<id>https://forum.script-coding.com/viewtopic.php?pid=70224#p70224</id>
		</entry>
</feed>
