'QTP - Logging with folder structure for cases------ 
 Function PushLog(StepName, StepDetail) 	 Dim dicMetaDescription, intContext 	 Set dicMetaDescription = CreateObject("Scripting.Dictionary")   		 	 dicMetaDescription("Status") = micGeneral 	 dicMetaDescription("PlainTextNodeName") = StepName 	 dicMetaDescription("StepHtmlInfo") = " " + StepDetail +" " 
 	 'Some backdoor settings: 	 'dicMetaDescription("DllIconIndex") = 206 	 'dicMetaDescription("DllIconSelIndex") = 206    	 	 dicMetaDescription("DllPAth") = "C:\Program Files\HP\QuickTest Professional\bin\ContextManager.dll" 
 	 intContext = Reporter.LogEvent("User", dicMetaDescription, Reporter.GetContext) 	 'Set the new report node as a parent 	 'From now on, all reports will be added under this node 	 Reporter.SetContext intContext End Function 
 Function PopLog()    'Now return to the parent l...
Sharing ideas with automation testers and Enjoying the ride...