Contributions
- 740Views0likes0Comments
Re: why is the findallchildren method not working?
Hi Helen Thank you for the reply. yes I did see those errors yesterday and changed them But I still cannot figure out to capture the array of objects returned.. can u please give me syntax for this statement... reqobj = objContext.FindALLChildren(propNames,propValues,depth) THanks for ur support Thanks AN1.1KViews0likes0Commentswhat is returned into the Project.Variables.objcontext??
''''function to set project.variables.objcontext Public Function projvarobjctxt if Project.Variables.BrowserName = "IE" then set Context1 = sys.process("iexplore").Page("*") 'To validate loading of login page set Context1 = Sys.Browser("iexplore").Page("*") else if (Project.Variables.BrowserName= "firefox") then set Context1 = sys.process("firefox").Page("*") else set Context1 = Sys.Browser("iexplore").Page("*") log.Message ("Unknown Browser specified. Page loaded in Internet Explorer") end if end If Project.Variables.objContext = Context1 end function I want to know what is returned into the variable Project.Variables.objcontext ?? Is it a url or the page object or what... thanks for your help thanks20KViews0likes2Commentswhy is the findallchildren method not working?
Public Function advancefindObject () Dim reqobj propnames = "ObjectIdentifier" propvalues = "leftnav" depth = 20 Browsers.Item("iexplore").Run("http://www.google.com/#hl=en&output=search&sclient=psy-ab&q=test&oq=test&gs_l=hp.3..0l4.673.1032.0.1366.4.4.0.0.0.0.202.652.0j3j1.4.0...0.0...1c.7jJqdtQ6Sak&pbx=1&bav=on.2,or.r_gc.r_pw.r_qf.,cf.osb&fp=92012027ea7e328b&biw=1920&bih=936") Set objContext = Sys.Browser("iexplore").Page("") reqobj = objContext.FindALLChildren(propNames,propValues,depth) for i = 1 to depth If i < depth and reqObj.exists then log.Message "searched object is found at iteration:"&i 'log.Message (reqobj.contenttext) If UBound(reqobj) >= 0 Then For j = 0 To UBound(buttons) Log.Message(reqobj(j).FullName) Next Log.Message("Total number of found enabled buttons: " & (UBound(reqobj) + 1)) Else Log.Warning("No enabled buttons were found.") End If exit for else aqutils.Delay 6000 log.Message i Set reqObj = objContext.FindAllChildren(propNames,propValues,depth) end if If i = depth then log.Message "Searched Object is not found even after 1 min" End if Next end Function26KViews0likes3CommentsRe: establish ADODriver Connection string in vb
i did resolve the above syntax but now I am getting new error Cannot open database " testDBase" requested by the login. The login failed even though I can connect witht he same login and password through SQL studio please help thanks807Views0likes0Commentsestablish ADODriver Connection string in vb
I am trying to establish a sql 2008db connection string in vb script in test complete here are the details Driver =DDT.ADODriver("Provider=SQLOLEDB.1;Server=133.12.2.166;Database= testdb;Uid=uname;Pwd=pwd;", "dbo.table") note: above values of parameters have been changed. When i execute - this is the error message i am getting Provider cannot be found. It may not be properly installed20KViews0likes2Comments