![:clapping:](http://software-testing.ru/forum/public/style_emoticons/default/crazy.gif)
- Форум тестировщиков
- → Публикации Rumata
65 публикаций создано Rumata (учитываются публикации только с 18 июня 2023)
Отправлено автор:
Rumata
13 февраля 2008 - 10:56
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
17 сентября 2007 - 04:25
в
SmartBear (AutomatedQA) - Functional Testing
Здравствуйте.
Мы используем такой код. Простой и удобный.
MSE:= Sys.OleObject('Excel.Application'); MSE.Workbooks.Open('C:\PurchaseOrder.xls'); Log.Message(VarToString(MSE.Cells(i,j).value)); // i и j номер строки и столбца.
Отправлено автор:
Rumata
13 сентября 2007 - 06:30
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
13 сентября 2007 - 12:39
в
SmartBear (AutomatedQA) - Functional Testing
Вот на скорую руку сделал, может как-то так =)
Set ExcelApp = CreateObject("Excel.Application") pathFile = "C:\..\.xls" ExcelApp.Workbooks.Open(pathFile) Set Ran = ExcelApp.Sheets(1).Range("F9:G12") ReDim arr(Ran.Cells.Count) For nRow = 1 To Ran.Rows.Count Set Row = Ran.Rows(nRow) For nCell = 1 To Row.Cells.Count arr((nRow - 1) * Row.Cells.Count + nCell - 1) = Row.Cells(nCell).value Next Next
Отправлено автор:
Rumata
17 сентября 2007 - 05:23
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
17 сентября 2007 - 10:46
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
12 сентября 2007 - 12:27
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
13 сентября 2007 - 06:13
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
13 сентября 2007 - 05:26
в
SmartBear (AutomatedQA) - Functional Testing
А не проще работать с файлом после вывода?
с помощью добавления к консоли ">имяф_файла" - вывод будет направлен в файл.
Хотя скорее всего я просто не до конца вник в текст
Отправлено автор:
Rumata
13 сентября 2007 - 05:44
в
SmartBear (AutomatedQA) - Functional Testing
я тут нашёл ещё...
Отправлено автор:
Rumata
17 сентября 2007 - 04:21
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
13 сентября 2007 - 05:33
в
SmartBear (AutomatedQA) - Functional Testing
Здравствуйте.
Можете использовать ClrBridge, чтобы сделать это через .NET. Вот так:procedure Test; var p, output; begin p := dotNET.System_Diagnostics.Process.zctor(); p.StartInfo.FileName := 'c:\Windows\System32\cmd.exe'; p.StartInfo.Arguments := '/c ipconfig'; p.StartInfo.UseShellExecute := False; p.StartInfo.RedirectStandardOutput := True; p.Start; while not p.HasExited do Delay(100); output := p.StandardOutput.ReadToEnd(); Log.Message(output); end;
Чтобы этот код заработал, надо добавить ассемблю System.dll в ваш проект TestComplete'а. Для этого дважды щёлкните на имени проекта в Project Explorer, откройте страницу Properties редактора проекта и в опциях 'CLR Bridge' нажмите 'Browse GAC...'.
Отправлено автор:
Rumata
25 июня 2008 - 11:30
в
SmartBear (AutomatedQA) - Functional Testing
function SendEmail(mFrom, mTo, mSubject, mBody, mAttach); var i, schema, mConfig, mMessage : OleVariant; begin try schema := 'http://schemas.microsoft.com/cdo/configuration/'; mConfig := Sys.OleObject('CDO.Configuration'); mConfig.Fields.Item(schema + 'sendusing') := 2; // cdoSendUsingPort mConfig.Fields.Item(schema + 'smtpserver') := 'бла.бла.бла'; // SMTP server mConfig.Fields.Item(schema + 'smtpserverport') := 25; // Port number // mConfig.Fields.Item(schema + 'sendusername') := ''; // User name (if needed) // mConfig.Fields.Item(schema + 'sendpassword') := ''; // User password (if needed) mConfig.Fields.Update(); mMessage := Sys.OleObject('CDO.Message'); mMessage.Configuration := mConfig; mMessage.From := mFrom; mMessage.To := mTo; mMessage.Subject := mSubject; mMessage.HTMLBody := mBody; for i := 0 to GetCSVCount(mAttach) - 1 do mMessage.AddAttachment(GetCSVItem(mAttach, i)); mMessage.Send(); Log.Message('Сообщение отправленно!', 'Адресат - '+mTo, pmNormal, debug_attr ); Result := True; except Log.Message('Сообщение не отправленно!', '', pmNormal, error_attr ); Result := False; end; end;
Отправлено автор:
Rumata
26 июня 2008 - 04:15
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
03 октября 2007 - 09:24
в
SmartBear (AutomatedQA) - Functional Testing
Здравствуйте.
Как я понимаю, вам надо проверить существование объекта в приложении, а не процесса. Сделать это можно с помощью метода WaitSwingObject.logName := '20070918.log.gz'; w1 := Sys.Process('javaw').SwingObject('JDialog', 'Окно архивирования лог файла', -1).SwingObject('JRootPane', '', 0).SwingObject('null.layeredPane').SwingObject('null.contentPane').SwingObject('LogArchivePanel', '', 0).SwingObject('JPanel', '', 0).SwingObject('JScrollPane', '', 0).SwingObject('JViewport', '', 0).SwingObject('JList', '', 0).AWTObject('CellRendererPane', '', 0); w2 := w1.WaitSwingObject('DefaultListCellRenderer$UIResource', logName, 0, 1000); if w2.Exists then Log.Message('Log file is found') else Log.Error('Log file is not found');
Отправлено автор:
Rumata
05 октября 2007 - 04:51
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
05 октября 2007 - 04:30
в
SmartBear (AutomatedQA) - Functional Testing
Здравствуйте.
Прежде всего хочу заметить, что в TestComplete замечательная справочная система. Задокументировано практически все, и при этом очень доступно и с примерами. Это к вопросу о 1000 в вызове метода WaitSwingObject.
А по поводу невозможности найти объект, в скрипте упоминается 12 объектов -- возможно не находится какой-нибудь другой объект. Запостите сюда сообщение об ошибке вместе с содержимым панели Remarks.
Отправлено автор:
Rumata
03 октября 2007 - 05:30
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
13 февраля 2008 - 06:04
в
SmartBear (AutomatedQA) - Functional Testing
На счет - удаления файла попробуйте установить небольшую задержку после удаления( у меня на разных компах с разной скоростью удаляются файлы - "не моментально") - Builtin.Delay(300); - файл логов обычно большой может дольше удаляться.И только после задержки создавайте файл.
Отправлено автор:
Rumata
13 февраля 2008 - 05:28
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
13 февраля 2008 - 04:44
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
14 декабря 2007 - 10:45
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
13 февраля 2008 - 04:37
в
SmartBear (AutomatedQA) - Functional Testing
Отправлено автор:
Rumata
14 ноября 2007 - 08:59
в
SmartBear (AutomatedQA) - Functional Testing
Здравствуйте.
Насколько я понимаю, в справке написано что TestComplete может работать на 100% валидно только с одним Unicode'вым языком -- тем, который указан в 'Language for non Unicode programs'. Поддержка других языков в этом случае частичная.
Отправлено автор:
Rumata
14 ноября 2007 - 06:42
в
SmartBear (AutomatedQA) - Functional Testing
нашёл но не помогло то что там написанно, или я неправильно делаю...Здравствуйте.
Да нет там вроде никаких ссылок на форум. Вот ветка, в которой вы сможете найти топик, о котором я говорил:
Using TestComplete | Testing With TestComplete | General Information | Support for Unicode
Community Forum Software by IP.Board Русификация от IBResource
Лицензия зарегистрирована на: Software-Testing.Ru