Pakema
Contributor
Joined 16 years ago
User Profile
User Widgets
Contributions
[TC11.11,Android4.4.2,Lenovo S850]Strange error while I try install Android game via Testcomplete
Hi all! File: https://cloud.mail.ru/public/edUi/zVrviRo2n File already processed file via TestComplete When I try install this file inside phisical device via Total Commander - it's OK: I can install and run this app, BUT when I try install via TestComplete I have an error: The application requires a later Android version than the one that is installed on the device. An application with the same name but with another signing key is already installed on the device Before install app via TestComplete I uninstall manual all data and cache directories of this app from device Device: Lenovo S850 Android ver: 4.4.2 TC version: 11.11 Thanks!1.2KViews0likes1CommentRe: [TC 10.6|VBS] Eval and Execute - what wrong with it?
sbkeenan, oh god Ok, I try to explain what I want and what I mean 1. I have three function with parameters a, b, c function f1 (a, b, c) end function ' f1 function f2 (a, b, c) end function ' f2 function f3 (a, b, c) end function ' f3 2. I what check params a, b, c 3, If one of them will be empty I must execute from function, and I check it with another function that has a return value function f4 (a, b, c) Dim LocalVar_CheckArr Dim LocalVar_IterationCheckArr Dim LocalVar_TmpTxt LocalVar_CheckArr = Array(a, b, c) For LocalVar_IterationCheckArr = 0 To UBound(LocalVar_CheckArr ) LocalVar_TmpTxt = LocalVar_CheckArr(LocalVar_IterationCheckArr) If LocalVar_TmpTxt = "" or IsNull(LocalVar_TmpTxt ) or IsEmpty(LocalVar_TmpTxt ) Then f4 = False Exit function Next f4 = True end function ' f4 4. And in your idea I must dublicate condition THEREE times function f1 (a, b, c) If Not f4(a, b, c) Then Log.Error("Some param was empty") Exit Function End If end function ' f1 function f2 (a, b, c) If Not f4(a, b, c) Then Log.Error("Some param was empty") Exit Function End If end function ' f2 function f3 (a, b, c) If Not f4(a, b, c) Then Log.Error("Some param was empty") Exit Function End If end function ' f3 function f4 (a, b, c) Dim LocalVar_CheckArr Dim LocalVar_IterationCheckArr Dim LocalVar_TmpTxt LocalVar_CheckArr = Array(a, b, c) For LocalVar_IterationCheckArr = 0 To UBound(LocalVar_CheckArr ) LocalVar_TmpTxt = LocalVar_CheckArr(LocalVar_IterationCheckArr) If LocalVar_TmpTxt = "" or IsNull(LocalVar_TmpTxt ) or IsEmpty(LocalVar_TmpTxt ) Then f4 = False Exit function Next f4 = True end function ' f4 5. But my question is - What I must wrote and do some other that I write just one string? function f1 (a, b, c) Execute (f5) end function ' f1 function f2 (a, b, c) Execute (f5) end function ' f2 function f3 (a, b, c) Execute (f5) end function ' f3 function f4 (a, b, c) Dim LocalVar_CheckArr Dim LocalVar_IterationCheckArr Dim LocalVar_TmpTxt LocalVar_CheckArr = Array(a, b, c) For LocalVar_IterationCheckArr = 0 To UBound(LocalVar_CheckArr ) LocalVar_TmpTxt = LocalVar_CheckArr(LocalVar_IterationCheckArr) If LocalVar_TmpTxt = "" or IsNull(LocalVar_TmpTxt ) or IsEmpty(LocalVar_TmpTxt ) Then f4 = False Exit function Next f4 = True end function ' f4 function f5 dim LocalVar_TmpTxt dim LocalVar_CharEnter LocalVar_CharEnter = Chr(13) & Chr(10) LocalVar_TmpTxt = LocalVar_TmpTxt &_ "If Not f4(a, b, c) Then" & LocalVar_CharEnter &_ "Log.Error(""Some param was empty"")" & LocalVar_CharEnter &_ "Exit Function" & LocalVar_CharEnter &_ "End If" f5 = LocalVar_TmpTxt end function ' f52.5KViews0likes3CommentsRe: [TC 10.6|VBS] Eval and Execute - what wrong with it?
sbkeenan, I need a little another result In first, I need many time call same code with same result, In second, I need same exit function In 3 different function By your idea I need write additional condition each function, Why? I want once write macro code and calling it when I want without waiting result of code2.6KViews0likes5CommentsRe: [TC 10.6|VBS] Eval and Execute - what wrong with it?
I have code in 3 functions Function F1 Dim a Dim b a = 5 b = 6 If a = b Then Log.Error("A must be C!") Exit Function End If End Function ' F1 Function F2 Dim a Dim b a = 3 b = 0 If a = b Then Log.Error("A must be C!") Exit Function End If End Function ' F2 Function F3 Dim a Dim b a = 4 b = 7 If a = b Then Log.Error("A must be C!") Exit Function End If End Function ' F3 And I want to simplify this situation, f.e. Function F1 Dim a Dim b a = 5 b = 6 execute(F4) ' <-- Error: script is terminated with an exception Function F2 Dim a Dim b a = 3 b = 0 eval (F4) ' <-- Error: script is terminated with an exception End Function ' F2 Function F3 Dim a Dim b a = 4 b = 7 execute(F4) ' <-- Error: script is terminated with an exception End Function ' F3 Function F4 Dim LocalVar_TmpTxt Dim LocalVar_CharEnter LocalVar_CharEnter = Chr(13) & Chr(10) LocalVar_TmpTxt = LocalVar_TmpTxt &_ "If a = b Then" & LocalVar_CharEnter & LocalVar_CharEnter LocalVar_TmpTxt = LocalVar_TmpTxt &_ "Log.Error(""A must be C!"")" & LocalVar_CharEnter & LocalVar_CharEnter LocalVar_TmpTxt = LocalVar_TmpTxt &_ "Exit Function" & LocalVar_CharEnter & LocalVar_CharEnter LocalVar_TmpTxt = LocalVar_TmpTxt &_ "End If" & LocalVar_CharEnter & LocalVar_CharEnter F4 = LocalVar_TmpTxt End Function ' F4 Why error: script is terminated with an exception ?2.6KViews0likes7Comments[TC 10.6|VBS] Script execution was interrupted after ReDim array
Hi There In MSDN (VBS) in example https://msdn.microsoft.com/ru-ru/library/83zyeke9.aspx Dim threeDimArray(9, 9, 9), twoDimArray(9, 9) As Integer Erase threeDimArray, twoDimArray ReDim threeDimArray(4, 4, 9) Script Sub Ex1 Dim LocalVar_TmpArr(1) Erase LocalVar_TmpArr ReDim LocalVar_ObjArr(2) '<-- Script execution was interrupted End Sub ' Ex1 Why error?Solved2KViews0likes4Comments[TC 10.6|VBS] Eval and Execute - what wrong with it?
Hi there! I have some duplicating code f.e. If a = b Then Log.Error("A must be C!") Exit Function End If I insert this code in variable a = "" &_ "If a = b Then" & Chr(13) & Chr(10) a = a &_ "Log.Error(""A must be C!"")" & Chr(13) & Chr(10) a = a &_ "Exit Function" & Chr(13) & Chr(10) a = a &_ "End If" & Chr(13) & Chr(10) and then when I try apply it in Eval (a) or Execute(a) - script is terminated with an exception Why?2.7KViews0likes9Comments[TC 10.6| Android 4.4.2| Lenovo S850] PackageManager return wrong information
Hi there! 1. I install some package, f.e. "MyPackage1.apk" 2. Open "Object Browser" 3. Expand "Mobile" 4. Set focus on "Device("Lenovo S850")" Then 5. Open property "Mobile.Device("Lenovo S850").PackageManager" 6. Via bust index in sub-property "Mobile.Device("Lenovo S850").PackageManager.InstalledPackage" found installed package, f.e., index = 5 Then 7.Uninstall package "MyPackage1.apk" from device 8. When uninstallation package "MyPackage1.apk" was done I refresh property "Mobile.Device("Lenovo S850").PackageManager" and open sub-property "Mobile.Device("Lenovo S850").PackageManager.InstalledPackage" 9. And when I set in sub-property "Mobile.Device("Lenovo S850").PackageManager.InstalledPackage" index=5 it was return information about "MyPackage1.apk" Question: What should I do to update sub-property "Mobile.Device("Lenovo S850").PackageManager.InstalledPackage"correctly?Solved1.6KViews0likes1Comment