грабли c Rational Robot скриптом

Отправлено 21 апреля 2006 - 15:32

доброе время суток всем
помогите плиз начинающему тестеру решить граблю
есть скриптик, который чекает опции комбобокса
хочу, чтобы если с опциями всё в поряде, в логе менеджера выводилось ОК, к примеру
создан скриптик по примеру из хелпа, но оный не проходит по причине 2-х ошибок
если кто знает,в чём дело,плиз,объясните
вот тест

Sub Main
Dim Result As Integer
Window SetContext, "Caption=Application", ""
SQALogMessage sqaNone, "Starting test of Application...", ""
Result = ComboBoxVP (CompareData, "ObjectIndex=6", "VP=Object Data")
if Result=1 Then
SQALogMessage sqaPass, "ok", ""
End Sub

eror: Illegal statement
Error: Unexpected end of file

• Наверх

Отправлено 21 апреля 2006 - 16:33

• Наверх

Отправлено 22 апреля 2006 - 10:16

бывает...

• Наверх

Отправлено 25 апреля 2006 - 06:32

да уж точно бывает
сишница я,не привыкши вот так иф закрывать
пасиба

• Наверх

Отправлено 03 мая 2006 - 09:08

• Наверх

Отправлено 03 мая 2006 - 09:30

• Наверх

Отправлено 03 мая 2006 - 09:47

В приведенном Вами примере If записан одной строкой. В таком случае End If не требуется. Но если If пишется в несколько строк, то обязательно нужно в конце писать End If

Спасибо за подробное объснение

Вопрос был, так скажем, риторический. Ну не спрашивать, в самом деле, как включается компьютер

• Наверх

Отправлено 05 мая 2006 - 09:05

• Наверх