如果你有兴趣，请把代码分析的结果写下来，因为看别人的代码，是提高自己自身能力的最快途径之一，当下公司招聘很多都需要测试人员懂工具，有的公司在面试过程中还拿出代码让测试人员来读，分析代码的结果是什么。古人说 "熟读唐诗三百首，不会做诗也会吟"，希望你也成为一个自动化测试开发高手：

代码 一:

txtSearch = "T"
Set edtxt = CreateObject("Wscrīpt.Shell")
Browser(" ").Page(" ").WebEdit(" ").Click
edtxt.SendKeys(txtSearch)
Set edtxt = Nothing

rowCount = Browser(" ").Page(" ").WebTable(" ").GetROProperty("rows")
For j = 1  to rowCount
      strTxt =  Browser(" ").Page(" ").WebTable(" ").GetCellData(j,1)
      strColor = Browser(" ").Page(" ").WebTable(" ").Object.rows(j-1).cells(1).currentStyle.backgroundColor

       If strColor = "#fffde8" Then
            reporter.ReportEvent micDone, "Text Highlighted", "The text  """&strTxt&""" is highlighted."
        strPos = left(strTxt,1)
            If (Trim(txtSearch) = Trim(strPos)) Then
                      reporter.ReportEvent micPass, "Highlighted", "First Letter of highlighted text  """&strTxt&""" starts with """&strPos&"""."
            Else
                   reporter.ReportEvent micFail, "Highlighted", "Text  """&strTxt&""" doesn't start  with letter """&strPos&"""."
            End If
       End If
Next

代码 二：

Set ōbjDesc = Descrīption.Create()
objDesc("micclass").Value = "WebEdit"

Set ōbjWE = Browser().Page().ChildObjects(objDesc)
objWECount = objWE.Count

For i = 0 to objWECount-1
     Set ōbjCP = objWE(i).Object
     ChkPointWE = objCP.IsContentEditable
     Print objWE(i).GetROProperty("name")
     Print ChkPointWE
Next

代码 三:自动化测试框架代码，本框架基于SAFFRON(mercury)框架为基础实现的针对mercury自带的网上售票系统的关键字数据驱动其中SAFFRON(mercury)部分：

框架核心代码：

'************************************************************
' S.A.F.F.R.O.N. Prototype 1.1'
' Simple Automation Framework For Remarkably Obvious Notes
' Copyright © 2006 Mercury Interactive Corporation
'
' Notes:
'
' Requires QuickTest Professional 9.1
'
' Author       : Adam Gensler
' Created      : July 12, 2006
' Last Updated : September 11, 2006
'
' This prototype framework is provided AS IS, and is meant
' to be used for instructional purposes.
'
' This framework is a prototype, and is not supported
' by Mercury Interactive.
'
'************************************************************
initialized = false
thirdlevel = ""
level = ""
desc = ""
object = ""
objectDescrīption = ""

levelsubdescrīptiondelimiter = ","
leveldescdelimiter = "|"
objectdelimiter = "|"
leveldelimiter = "|"
objectsDescrīptiondelimiter = "|"

webLevels = "Browser|Page|Frame"
webLevelsDesc = "micclass:=Browser|micclass:=Page|micclass:=Frame|"
objects = "Link|WebButton|WebList|WebEdit"
objectsDescrīption = "micclass:=Link|micclass:=WebButton|micclass:=WebList|micclass:=WebEdit"

' Generates a generic descrīption based up on the "level" viarable
' levelstr - will be one of the values that is in the level array
' returns - string representative of the object hierarchy
Public Function GenerateDescrīption (levelstr)
 l = IndexOf(level, levelstr)
 If l >=0 Then
  fdesc = level(0) & "(" & Quote(desc(0)) & ")."
  If l >= 1 Then
   fdesc = fdesc + level(1) & "(" & Quote(desc(1)) & ")."
   If 2 >= l Then
    If thirdlevel <> "" Then
     fdesc = fdesc + level(2) & "(" & Quote(desc(2)) & "," & Quote("name:=" & thirdlevel) & ")."
    End If
   End If
  End If
 End If
   GenerateDescrīption = fdesc
End Function

' Generates an object descrīption based upon the object, and objectDescrīption arrays
' obj - name of the object in the object array
' prop - additional property to help uniquely identify the object
' returns - a string representative of the object descrīption
Public Function GenerateObjectDescrīption (obj, prop)
 i = IndexOf(object, obj)
 ndesc = ""
   If i <> -1 Then
  ndesc = obj & "(" & Quote(objectDescrīption(i)) & "," & Quote(prop) & ")."
 End If
 GenerateobjectDescrīption = ndesc
End Function

' given an array, returns the index of the value to search for
' ary - an array
' str - value to search for in an array
' returns - index in array
Public Function IndexOf (ary, str)
 val = -1
 For i = 0 to UBound(ary)
  If ary(i) = str Then
   val = i
  End If
 Next
 IndexOf = val
End Function

' configures framework to work within the context of a specific frame
' val - the Name of the frame to work within -- use Object Spy if you don't
'       already know the frame name
Public Function WorkInFrame (val)
 Report micPass, "Enter Frame", "Entered scope of frame " & Quote(val)
 thirdlevel = val
End Function

' configures the framework to work outside the context of a specific frame
Public Function StopWorkingInFrame
 Report micPass, "Exit Frame", "Exited scope of frame " & Quote(thirdlevel)
 thirdlevel = ""
End Function

' generates a string with embedded/surrounding quotes
Public Function Quote (txt)
 Quote = chr(34) & txt & chr(34)
End Function

' navigate to a site if the browser is already opened, otherwise run initialization
Public Function BrowseTo (url)
 thirdlevel = ""
 Report micPass, "Navigate to URL", "Navigating to URL: " & Quote(url)
 If initialized Then
  Execute GenerateDescrīption("Browser") & "Navigate " & Quote(url)
 Else
  Launch "website", url
 End If
 Reporter.Filter = rfDisableAll
End Function

' waits for the web page to finish loading
Public Function AutoSync
    Execute GenerateDescrīption("Browser") & "Sync"
End Function

' close all opened browsers
Public Function CloseBrowsers
 If Browser("micclass:=Browser").Exist (0) Then
  Browser("micclass:=Browser").Close
 End If
 While Browser("micclass:=Browser", "index:=1").Exist (0)
  Browser("index:=1").Close
 Wend
 If Browser("micclass:=Browser").Exist (0) Then
  Browser("micclass:=Browser").Close
 End If
End Function

' prepares the framework for usage, and configures all internal framework
' variables and structures
' apptype - used to launch different types of applications based
'           upon different technologies -- currently there is only web
' val     - string that represents what to launch
' returns - always returns true
Public Function Launch (apptype, val)
 If "website" = apptype Then
  thirdlevel = ""
  Report micPass, "Initialize", "Initializing Framework"
  level = split(webLevels, leveldelimiter, -1, 1)
  desc = split(webLevelsDesc, leveldescdelimiter, -1, 1)
  object = split(objects, objectdelimiter, -1, 1)
  objectDescrīption = split(objectsDescrīption, objectsDescrīptiondelimiter, -1, 1)
  CloseBrowsers
  Set IE = CreateObject("InternetExplorer.Application")
  IE.visible = true
  IE.Navigate val
  While IE.Busy
   wait 1
  Wend
 End If
 initialized = true
 Launch = true
End Function

' Verify the Existence of an object
' objtype - values should be limited to values in the object array
' text    - multi-purpose argument that indicates what to verify
'         - for a link, or button, it's the text of the control
'         - for a list, it's the name of the control
'         - for a frame, it's the name of the frame
Public Function Verify (objtype, text)
   rval = false
 localDesc = ""
 estr = ""
 If thirdlevel <> "" Then
  localDesc = GenerateDescrīption(level(2))
 Else
  localDesc = GenerateDescrīption(level(1))
 End If

   AutoSync()

 Select Case objtype
 Case "Page"
  Execute "rval = " & GenerateDescrīption(level(1)) & "Exist (0)"
  If rval Then
   Execute "title = " & GenerateDescrīption(level(1)) & "GetROProperty(" & Quote("title") & ")"
   If title = text Then
    rval = true
   Else
    rval = false
   End If
  End If
 Case "CurrentFrame"
  If thirdlevel <> "" Then
   estr = "rval = " & localDesc
  End If
 Case "Link"
  estr =  "rval = " & localDesc & GenerateObjectDescrīption("Link", "innertext:=" & text)
 Case "WebButton"
  estr = "rval = " & localDesc & GenerateObjectDescrīption("WebButton", "value:=" & text)
 Case "WebList"
  estr = "rval = " & localDesc & GenerateObjectDescrīption("WebList", "name:=" & text)
 Case "WebEdit"
  estr = "rval = " & localDesc & GenerateObjectDescrīption("WebEdit", "name:=" & text)
 End Select

 If estr <> "" Then
  Execute estr + "Exist (0)"
 End If

 If rval Then
  Report micPass, objtype & " Verification", "The " & objtype & " " & Quote(text) & " was verified to exist"
 Else
  Report micFail, objtype & "  Verification", "The " & objtype & " " & Quote(text) & " was not found"
 End If

 If "True" = rval Then
  rval = True
 Else
  rval = False
 End If

   Verify = rval
End Function

' Activates an object based upon its object type
' objtype - the type of object should be limited to values in the object array
' text    - identifying text for the control - for a link, it's the text of the link
Public Function Activate (objtype, text)
 localDesc = ""
 If thirdlevel <> "" Then
  localDesc = GenerateDescrīption(level(2))
 Else
  localDesc = GenerateDescrīption(level(1))
 End If

 AutoSync() 

 Select Case objtype
 Case  "Link"
  Execute localDesc & GenerateObjectDescrīption("Link","innertext:=" & text) & "Click"
  Report micPass, "Link Activation", "The Link " & Quote(text) & " was clicked."
 Case "WebButton"
  Execute localDesc & GenerateObjectDescrīption("WebButton", "value:=" & text) & "Click"
  Report micPass, "WebButton Activation", "The WebButton " & Quote(text) & " was clicked."
 End Select
End Function

' Selects a specific value from a listbox, or combobox
' objname - name of the control -- use Object Spy if you don't know the name property
' text    - the item in the combobox to select
Public Function SelectFromList (objname, text)
 localDesc = ""
 rv = ""
 rval = false
 If thirdlevel <> "" Then
  localDesc = GenerateDescrīption(level(2))
 Else
  localDesc = GenerateDescrīption(level(1))
 End If

 AutoSync() 

 localDesc = localdesc & GenerateObjectDescrīption("WebList", "name:=" & objname)

 Execute "cnt = " & localDesc & "GetROProperty(" & Quote("items count") & ")"
 For i = 1 to cnt
  Execute "rv = " & localDesc & "GetItem (" & i & ")"
  If rv = text Then
   rval = true
  End If
 Next

 If rval Then
  Execute localDesc & "Select " & Quote(text)
 End If
 If rval Then
  Report micPass, "WebList Selection", "The WebList item " & Quote(text) & " was selected."
 Else
  Report micFail, "WebList Selection", "The WebList item " & Quote(text) & " was NOT found."
 End If

 SelectFromList = rval
End Function

' Enters text into an edit field
' objname - name of the control -- use Object Spy if you don't know what it is
' text    - the text to enter into the control
Public Function EnterTextIn (objname, text)
 localDesc = ""
 rval = true
 If thirdlevel <> "" Then
  localDesc = GenerateDescrīption(level(2))
 Else
  localDesc = GenerateDescrīption(level(1))
 End If

 AutoSync()

 localDesc = localdesc & GenerateObjectDescrīption("WebEdit", "name:=" & objname)
 Execute localDesc & "Set (" & Quote(text) & ")"
 Report micPass, "Enter Text", "Text: " & Quote(text) & " was entered into " & Quote(objname)
 EnterTextIn = rval 
End Function

' Obtains text from a control
' objtype - is the type of control the get the text from
' objname - is the name of the control -- use Object Spy if you don't know the name
' returns - the text of the control
Public Function GetTextFrom (objtype, objname)
 text = ""
 localDesc = ""
 If thirdlevel <> "" Then
  localDesc = GenerateDescrīption(level(2))
 Else
  localDesc = GenerateDescrīption(level(1))
 End If

 AutoSync()

 Select Case objtype
  Case "WebEdit"
   Execute "text = " & localDesc & GenerateObjectDescrīption("WebEdit", "name:=" & objname) & "GetROProperty (" & Quote("value") & ")"
  Case "WebList"
   Execute "text = " & localDesc & GenerateObjectDescrīption("WebList", "name:=" & objname) & "GetROProperty (" & Quote("value") & ")"
 End Select
 Report micPass, "Capture Text", "Text: " & Quote(text) & " was captured from the control " & Quote(objname)
 GetTextFrom = text
End Function

' Wrapper for the Reporter.Report Event method
' - could be used to create custom reports more easily
' See Reporter.ReportEvent documentation for usage
Public Function Report (status, objtype, text)
 Reporter.Filter = rtEnableAll
 Reporter.ReportEvent status, objtype, text
 Reporter.Filter = rfDisableAll
End Function

基于此框架的qtp网上售票的系统的框架代码例子想要的人请加： pcl2004_19@hotmail.com

      有的时候人总也想不到自己的将来，下一步会往哪里走，记得大学毕业的时候我没有想过要去北京，但是最后到了北京，没有想到2年之后去上海还是去了上海，没有想到回到北京，却回到了北京，一切都是意外，但是一切又是好像那么顺其自然。

     我经常把测试行业比作一个江湖，记得zee有一次到51testing跟我们北京的就业学员说，说他是小混子，我是大混子（我认识他的时候他还在上学，从他在苏州去了上海最后到北京一直都有联系，也算是有缘分）。当初我走上这个我认为是江湖的地方(在bbs上帮别人解决问题)，我认识了jackei(陈雷),sincky(张振兴),xueqin(丁雪芹),normal(酸辣土豆丝 原先在中国测试社区上的rational的斑竹),oldsidney(现在都成了做爸爸的人),sunshinelius(柳胜)等等，而且认识了我现在的老板 导师 朋友 兄弟 bwf(李波，王威，周峰)，最后因为这个江湖加入了51testing。

    说起来sincky和我的关系很特殊，记得我第一次见测试行业的网友就是sincky，第一次见面吃饭是在肖家河农大对面的白鸭梨，当时他还脖子上带着ibm的门卡，对我说哪个门卡如果丢了要赔10000，呵呵，也不知道是不是真的。算是缘分把，2005年他加入了51testing我们又成为了同事，当时51testing也很艰苦，来了大家都是一心想要做出点事情和成绩，都是为未来而奋斗，由于我们的住宿不是很好，后来李波（我把bwf看作自己的大哥）还把自己的房子借给我们住，我和sincky都是北方人在南方不习惯，特别是sincky吃不好也睡不好，不过每天忙得也算是自得其乐。这样我们坚持了1年多，由于李波的房子卖了，我和sincky也不得不离开，也是因为这样在bwf的帮助下我们买了自己的第一套房子，有了一个我们安身的地方。以为一切都会安定，没想到买房子的当年年底我就离开了上海去了北京，建立了北京51testing。

   我离开上海不久，sincky由于个人原因离开了51testing，一年我们见面的机会很少，每次见面都聊到后半夜，离开的日子很想念他。前一段时间我刚到深圳认识了一位朋友，她那里有个职位觉得sincky很合适，就推荐了sincky，今天得到消息，这个职位基本上搞定，但是需要他回北京工作，sincky在上海结婚，房子在上海，老婆还是上海人，现在要离开上海回到北京重新发展了。人生际遇 希望每个人都有好的发展和机遇。

 有个网友接到工作任务产生测试数据，具体任务如下：
“我们老大给了个这个的任务给我：
  质量:重复率<0.1%,相似率<10%
  数据根据该字段的类型和长度生成, 涵盖各种情况,包括边界值,异常值....字符串要包含所有字符集,规定的所有长度,时间跨度取前后3年以上,枚举字段要随机取完所有值....
  特殊要求:
  固定在一个字段里放测试标识,如在作者字段的前两个字符为"测试",便于识别和删除...”
  他的解决问题思路是通过lr把现有数据库中的数据导入到参数文件中，然后发送给服务器（不知道他为什么从数据库中读取数据，然后再发送），导入到file中遇到问题是 lr报错 “check file format”。经过交流之后我们把他的问题简单化，其实就是一个目标产生数据，但是中间遇到的是两个问题，一个是数据来源问题  一个是数据如何发送问题

 1.数据来源，如果是要网页文件信息，从他的方法来看，是利用lr读取数据库，那么我们来看看结合lr如何做呢？首先是利用vc写一个dll，从服务器上读取字段内容，然后在lr中读取该代码，2007年的时候当时帮大连的一个朋友写过一个dll代码，就是读取oracle数据库字段内容的，然后再lr中使用。根据以上思路写了个vc中伪代码（伪代码就是没有经过调试，或者没有实现完全的代码）如下：
   _ConnectionPtr pConnection;
_RecordsetPtr pRecordSet;
ICfxDataAdoPtr pCfxDataAdo;

pRecordSet.CreateInstance(__uuidof(Recordset));
pConnection.CreateInstance(__uuidof(Connection));

 // Read from database
 pConnection->ConnectionString ="Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=";
 pConnection->Open("","","",-1);
 pRecordSet = pConnection->Execute("SELECT * FROM xxx",NULL,-1);
 //获得pRecordSet字段数据
   
  pRecordSet->Close();
  pConnection->Close();
 
    以上代码可以封装成函数放入dll后，在lr中调用dll，lr中的代码伪代码如下，

   
    rc=lr_load_dll("xxx.dll");
 if( rc != 0 ){
  lr_error_message("lr_load_dll of advapi32.dll failed. Aborted for rc=%d",rc);
  lr_abort();
 }else{
           strcpy(data,dll中调用返回的函数数据);
           web_submit_form 发送出去要发送的数据包

 }

       我们在换一个思路，如果就是为了得到html这样的数据，那么我们是否可以自己写代码得到网站上任何的Html代码作为自己的数据，用vbs写了段代码：
   Set XML = CreateObject("Microsoft.XMLHTTP")
   XML.Open "GET", "http://www.51testing.com", False
   XML.Send
   vResponse = XML.responseText
   MsgBox vResponse
   以上代码调试通过
 
   2.如何发送数据包
     方法可以是利用lr发送，可以是直接发送请求，我们看如何直接发送请求，代码如下：
     Dim xmlhttp
    Set xmlhttp = New MSXML2.ServerXMLHTTP
    xmlhttp.Open "POST", "http://xxxxxxx", False
    xmlhttp.setRequestHeader "Content-Type", "xxxxx"
    xmlhttp.send DataToSend
   
    Set xmlhttp = Nothing

DataToSend
=====================================================
<HTML>

  <HEAD>
    <title>demo</title>
  </HEAD>

  <BODY>
     xxxxxx
  </BODY>
</HTML>
 
   思路如上，解决问题中具体用到的技术大家可以找相应资料深入研究下。   
 

Introduction

The SAP CCMS (Computer Center Management System) monitor displays statistics about the resource usage of all servers, components, and resources in any SAP R/3 landscape during the scenario run. You can also use the SAP CCMS monitor for SAP Portal and SAP GUI environments, but the amount of measurements provided by the SAP CCMS monitor is much greater.

Requirements

1.      SAP monitor license

2.      LoadRunner 7.8 or above. 

For LoadRunner 7.8, apply Feature Pack 1:

1. On a machine with LoadRunner 7.8, go to Start à Programs à LoadRunner à  UpdateService.
2. Click on the "Show Update" button.
3. Obtain and install "LoadRunner update."

3.      SiteScope installation

·        For LoadRunner 7.8 and below:

 LoadRunner 7.8 and below supports SiteScope Lite  version only. The SiteScope Lite installation file (SiteScopeSetupForLR.exe) and SiteScope Lite license are available in the Patches Database à LoadRunner à 7.6 à Performance Monitor à LR76P6 - LoadRunner 7.6 SiteScope Siebel and SAP Portal Add-in for LoadRunner.

·        For LoadRunner 8.0:

LoadRunner 8.0 supports SiteScope 7.9.5. You need to install a patch on the Sitescope machine and the LoadRunner Controller machine. These patches are available in Patches Database à LoadRunner à 8.0  à Performance Monitors à LR80P77 - LoadRunner 8.0 Monitoring Support for SiteScope 7.9.5

4.      On the machine installed with SiteScope, install the SAP Java Connector (SAP JCo 2.0.6 and above)

.

SiteScope installation and Setup

Overview

Ensure you have LoadRunner 7.8 or above installed.  Ideally, you will want an extra machine for the SiteScope installation:

• First machine          à   Controller
• Second machine     à   SiteScope
• Third machine         à   Load Generator
• Fourth machine       à   Load Generator

Etc.

In this situation, SiteScope will be gathering information from the servers and displaying them via a Web interface.  The Controller will then connect to the SiteScope installation and retrieve this data during the scenario run.

Preparing the environment

Prior to installing SiteScope, install the SAP Java Connector (SAP JCo 2.0.6 and above). To install the SAP Java Connector, perform the following:

• Download the SAP Java Connector from the SAP Software Distribution Center at http://www.service.sap.com/connectors. Click ‘SAP Java Connector’ and ‘Tools and Services’. You will need a valid Service Marketplace login to access this site.

• Follow the installation instructions that come with the SAP JCo download for your appropriate platform. On Windows, add the JCo installation location in the System Environment PATH variable. This change usually requires you to reboot Windows for the system PATH to be updated. Once completed, make the SAP JCo library file available to SiteScope by copying sapjco.jar (which comes with the Jco install) to /SiteScope/java/lib/ext before starting SiteScope.

Install SiteScope

1.      Obtain the SiteScope installation file. (Requirement)

2.      On the machine where you wish to install SiteScope, run the installation file. 

3.      In the “Administrator E-mail Address” window, enter an E-mail if you want a designated person to receive alerts, reports, and status messages. Otherwise, click <Next> to proceed to the next window.

4.      Follow all the defaults settings to complete the SiteScope installation.

5.      When the installation of SiteScope is completed, a browser will automatically open with instructions on how to start SiteScope.  Basically, the way to start SiteScope is via a browser with the URL http://<machine-name>:8888/SiteScope.

As you can guess, SiteScope installs its own Web server as an interface to the application.

Install SiteScope license

Note: If you do not have the license, please contact you regional sales.

1.      The first time you start SiteScope, you will get a “SiteScope First Time Setup” page. Click on “Skip this Page” to go to main SiteScope site.

2.      Once the Auto Configuration completes, you will be brought to the main SiteScope page. 

3.      Click on the “Preferences” link from the main SiteScope panel.

a.       Enter the license in the “License Number” edit field.

b.      Enter the additional license in the “Option licenses” edit field.

Note: The SAP CCMS Server monitor will not be available without an Option license.

4.      Click on the “Save Changes” button.

SiteScope Monitor Configuration

How to add an SAP CCMS Monitor Group

1.   On the SiteScope main page, click on “Create Groups.”

2.   Enter a name for the group (e.g., SAP CCMS).

3.   Click on the “Add” button.

How to add a SAP CCMS Monitor

1.   From the main SiteScope page, go to the “SAP CCMS” group.

(How to add an SAP CCMS Monitor Group)

2.   In the “Add to Group” section, click on “Monitor” and select “SAP CCMS Server” from the list of monitors.

Note: If you do not see “SAP CCMS Server” in the list, contact your local sales representative for the SAP CCMS add-in license.

3.   Click on “Choose Server,” and fill in the following:

4.      Click on the “Browse counters” button.

5.      SiteScope will navigate to a page with all the available counters. Select the counters you want to monitor, and click on “Choose Counters.”

Note: This tree will more or less match the hierarchy of Monitoring Tree Elements displayed in the Monitoring Tree that is shown in the SAP GUI with transaction RZ20. However, the browse tree may show more or less information than RZ20 depending on the authorization level of the username you specified for this monitor.  Check or clear the check boxes on the choose counters screen to select counters to monitor on this server.

6.      SiteScope will navigate to the “Add SAP CCMS Server Monitor in Group” page with the counters selected in step 5 listed.

a.       Verify the counters.

b.       Change the update time to 15 seconds, and click on “Add monitor.”

Setting up a SiteScope SAP CCMS Monitor in the Controller

1.      In the Controller, look for the SAP CCMS monitor in the ERP/CRM Server Resource Section.

2.      Display the graph by dragging it to the right.  Right-click in the graph and select “Add Measurement(s).”  You should now see the SiteScope Dialog box.

3.      Click on the first “Add” button.  For the machine name, type in the IP address or the machine name of the system on which SiteScope is installed.  Click <OK>.

4.      Click on the second “Add” button.  You should now see a SiteScope Monitor Configuration window.  In the left pane, you should see a tree with the monitors you have added into the SiteScope application.  Highlight the available monitors and choose the counters in the right pane.  Click <OK> to get out of the menus.

    昨天在做Qtp培训发给学员资料的时候无意中找到以前的资料，记得刚参加工作的时候自动化测试就知道Rational robot，感觉工具特别好，也激起了很大的热情和兴趣，对Robot做了很多研究，当时还写了很多关于robot的文章，也曾经憧憬着做中国第一个自动化测试项目，后来加入51testing由于工作需要接触了wr,qtp,silktest等功能自动化测试工具，随着时间的推移wr robot逐渐淡出大家的视线。其实每一个工具都有自己的特点在里面，好比一个人一样有自己的风格，在不同的项目用不同的工具，只有结合起来才能发挥最大的威力，下面是一些代码例子，算是做个纪念：

1.WinRunner如何加载Dll，例子代码如下：

rc1 = reload ( "win32api", 1, 1 );
if ( rc1 != 0 )
 { tl_step ( "Error Message", FAIL, "[reload(\"win32api\")] - FAILED!"); }
else
 { tl_step ( "Status Message", PASS, "[reload(\"win32api\")] - OK"); }

public function phone_num_gen (out phone)
{
 auto x, areacode, prefix, sufix;

 x = int ( rand(GetTickCount())*1000000000000 );
 areacode = substr(x, 1 ,3);
 prefix = substr(x, 4, 3);
 sufix = substr(x, 7, 4);
 phone = "(" & areacode & ") " & prefix & "-" & sufix;
 return ( E_OK );
}

for (i = 1; i < 10; i++)
{
 phone_num_gen(num);
 printf(num);
}

rc1 = unload ( "win32api" );
if ( rc1 != 0 )
 { tl_step ( "Error Message", FAIL, "[unload(\"win32api\")] - FAILED!"); }
else
 { tl_step ( "Status Message", PASS, "[unload(\"win32api\")] - OK"); }

2.在winrunner中如何统计代码行，提供一种解决思路

public function cloc ( in fileX, inout lines_code, inout lines_blank_or_comment, inout total_LOC  )
{
 auto line;

 # Initialize variables ...
 lines_code = 0;

 file_open ( fileX, FO_MODE_READ );

 while ( file_getline( fileX, line ) == 0 )
 {
  # Blank or Coment lines ...
  if ( match( line, "[^#]" ) == 1 )
  {
   lines_blank_or_comment++;
  }
  else
  {
   lines_code++;
  }
 }

 total_LOC = lines_code + lines_blank_or_comment;

 file_close ( fileX );
}

rc1 = cloc( "C:\\Junk1\\scrīpt", LOC, BlankOrComment, TLOC );

printf ( "Total Number of lines of code: %s\r\n", LOC );
printf ( "Total Comment or blank lines in code: %s\r\n", BlankOrComment );
printf ( "Total lines in file: %s\r\n", TLOC );

3.winrunner错误处理函数

function CreateErrorMessageArray ( inout ErrorMsgArray[] )
{
 # Location of WinRunner scrīpt which defines the error message codes
 auto ErrorMsgFile = getenv ( "M_ROOT" )  & "\\lib\\wr_gen\\scrīpt";
 auto rc = E_OK;  # Return code for this function
 auto character;  # Store a character
 auto line;   # Store a line from file
 auto tmpline;  # Store a line with no tab or spaces
 auto counter;  # Used to strip tab and spaces out of the line
 static tmpArray[]; # Store split (  )  results

 # Delete everything in the ErrorMsgArray
 for  ( counter in ErrorMsgArray )
  delete ErrorMsgArray[counter];

 rc = file_open ( ErrorMsgFile,FO_MODE_READ );
 if  ( rc != E_OK )
  return  ( rc );

 #Parse the file looking for "public const E_"
 while ( file_getline ( ErrorMsgFile,line ) == 0 )
 {
  if  ( index(line, "public const E_") > 0 )
  {
   # Get rid of spaces and tab characters
   tmpline = "";
   for  ( counter = 1; counter <= length(line); counter++ )
   {
    character = substr ( line, counter, 1 );
    if  ( (character != " ") && (character != "\t") )
     tmpline = tmpline & character;
   }
   split  ( tmpline, tmpArray, "=" );

   # The substr ( tmpArray[2],1, length ( tmpArray[2] ) -1 ) gets rid of the trailing semicolon  ( ; )
   # The substr ( tmpArray[1], 12 ) is the error code minus the public const
   if  ( ErrorMsgArray[substr(tmpArray[2], 1, length(tmpArray[2] - 1 )  ) ] )
   {
     ErrorMsgArray[substr(tmpArray[2], 1, length(tmpArray[2] - 1) ) ] =
     ErrorMsgArray[substr(tmpArray[2], 1, length(tmpArray[2] - 1) ) ]&", "&
     substr(tmpArray[1], 12 );
   }
   else
   {
    ErrorMsgArray[substr(tmpArray[2], 1, length(tmpArray[2]) - 1) ] =
    substr(tmpArray[1], 12);
   }
  }
 }
 file_close ( ErrorMsgFile );
 return  ( E_OK );
}

function GetErrorMessage ( inout ErrorMsgArray[], in ErrorCode )
{
 return ( ErrorMsgArray[ErrorCode] );
}

      今天用VB写创建AOM对象,代码执行如下的时候就报错：

      Set Qtp_App=CreateObject("QuickTest.Application")'报错 ActiveX控件不能创建

      单独打开qtp没有问题，就是以上代码会出现问题，最后找了下论坛中的是否有人遇到同样的问题，也没有最后给解决办法，最后自动动手丰衣足食，分析结果是直接注册QTObjectModel.dll也不能解决以上问题，分析应该是有相关dll对象耦合在一起了，所以重新注册相应的dll就可以解决了，大胆推断后，然后就是小心求证，最后问题解决

      解决方法尝试如下：重新执行C:\Program Files\Mercury Interactive\QuickTest Professional\bin\QuickTestProfessional.bat，也就是重新注册qtp dll,执行完毕后执行代码，没有报错

过程:一系列的活动,把输入转化成输出的流程,其中的活动可裁剪.
规程:为了细致一个活动的具体做法而做的说明,可被别的流程调用,主要是强调步骤,告诉别人怎么去做.
规范:主要是针对输出的,实现一个活动的标准

/*** Actions.c ***/

#include "lrs.h"

#define host "localhost"
#define port 23
#define socktype "TCP"

void Printf( char * str )
{

 lr_message ( str );

}

int recv( char *sock, char *buffer, int bytes, int flags )
{
 int size;
 int byte;
 int result;
 char *data = (char *)malloc(1);
 char input[12767];  // make as big or small as you want
 
 sprintf(input,"");
 for (byte = 0; byte < bytes; byte++)
 {
  lrs_set_recv_timeout(1,0);
  result = lrs_receive_ex(sock, "WS_BufferIN", "NumberOfBytesToRecv=1", LrsLastArg);
  lrs_get_last_received_buffer(sock, &data, &size);
  if (size != 0)
   sprintf(input,"%s%c",input,data[0]);
 }
 strncpy(buffer,input,strlen(input));
 return strlen(input);
}

int send( char *sock, char *buffer, int bytes, int flags )
{
 int size;
 int byte;
 int result;
 char *data = (char *)malloc(1);
 char input[12767];
 
 sprintf(input,"");
 
 lrs_set_send_buffer(sock,buffer,strlen(buffer));
 //sprintf(WS_BufferOUT,"%s",buffer);
 result = lrs_send(sock,"WS_BufferOUT",LrsLastArg);
 return strlen(buffer);
}

Actions()
{

 char WS_Sock[] = "socket0";
 char *WS_SockType = (char *)malloc(3);
 char *WS_RemoteHost = (char *)malloc(1024);
 char *WS_Data = (char *)malloc(2024);
 int WS_Result;
 int size;
 char *data = (char *)malloc(1024);
 char temp[2024];
 char buffer[1024];

 sprintf(buffer,"RemoteHost=%s:%d",host,port);
 strncpy(WS_SockType,socktype,3);
 strncpy(WS_RemoteHost,buffer,strlen(buffer)); 

 // Create & Connect to host specified in WS_RemoteHost
 // the TCP/IP connection will be of WS_SockType
 lrs_create_socket(WS_Sock, WS_SockType, WS_RemoteHost,  LrsLastArg);

 // read in 10 bytes from the remote host
 recv(WS_Sock,data,10,0);
 sprintf(temp,"%s",data);
 Printf(temp);

 sprintf(temp,"This is outgoing data...");
 // send a string to the remote host
 send(WS_Sock,temp,strlen(temp),0);

 // close the connection
 lrs_close_socket(WS_Sock);

 return 0;

}

Av. DB Req. Time

A considerable amount of the dispatched time of a dialog is spent reading or changing the data of the respective database. The time for processing logical data base requests is stored in this field.

Various factors affect the logical DB access time. Read requests can either be sent to the data base buffers or to the fast local SAP buffers. The efficiency of the buffers, the required number of requests as well as a large number of database change requests affects the total access time.

The DB access time also takes into account the data base server CPU performance as well as network transfer times.

Av. Enqueue Time

No information for this from the SAP server.

Av. Response Time

The response time of a dialog step comprises the time for the dialog request to the dispatcher work process, dialog processing, and completion of the dialog in the dispatcher and transfer of data to the presentation medium.

Please note that the time required for processing the "Presentation -- Dispatcher -- Presentation" communication step is not taken into account here. In long-distance or low-performance networks, this step can lead to considerably longer 'subjective' response times.

Response time is usually divided into waiting time and dispatched time.

The SAP response time consists of the following components:

Response time             =     Waiting time + "Dispatched" time

Dispatched time   =     Generation times at run-time

+ Loading time for programs, screens, and CUA interfaces

+ Roll times for rolling the working data in and out

+ ABAP / 4 processing time

+ DB database interface time – that required at the SAP interface from ABAP / 4 to the database and SAP buffer

+ Enqueue time for SAP logical lock processes

The displayed CPU time is also a component of the response time, but is not broken down further. Thus the CPU time is a further independent component of the response time.

Av. RFC + CPIC Time

There is no information for this in the ST03 transaction.

Av. Roll I + w time

No documentation available.

Average Bytes Req.

A number of interfaces provide the SAP application with data for various purposes. The data requests are differentiated according to the following interfaces/data types:

Screen sources

Screen load

ABAP   sources

ABAP   load

CUA    sources

CUA    load

Nametab interface

CPIC    interface

DDIC    interface

DSQL    interface (user data from data base)

Average CPU Time

During execution of a dialog step, the application server CPU is used for processing (loading, generating, processing DB requests, processing ABAP/IV...). The CPU time represents a large part of the dispatched time, which is response time without waiting time.

Average Load Time

Loading and generating time comprises the time required to load objects such as source codes, CUA interface and screen information from the database and to generate them, if required.

Average Wait Time

Under normal circumstances, a dialog step should be transferred from the dispatcher work process to the application process immediately after its request. If this is executed, the average waiting time in the dispatcher process is several milliseconds. In high-load situations in the application server or the system, waiting times in the dispatcher queue and considerable response times (> 1s) can occur.

CPU Time

During execution of a dialog step, the application server CPU is used for processing (loading, generating, processing DB requests, processing ABAP/IV). The CPU time represents a considerable amount of dispatched time, and thus of response time without waiting time.

Database Calls

Total of the modification (INSERTs, UPDATEs, DELETEs) and delete commands to the database system.

Database Requests

The number of logical data base requests corresponds to the number of requests transferred by the ABAP/IV processor to the interface. Please note the difference between logical requests and calls transferred to the database by the interface.

DB Calls: Changes

Number of logical table change requests. Change requests are UPDATE, DELETE or INSERT one or more lines of a table.

DB Calls: Direct Reads

Number of logical "direct read" data base requests, e.g. ABAP/IV "SELECT SINGLE ..." statements.

The local SAP buffer can in certain cases, process the request. If not, it must be transferred to the database.

DB Calls: Sequential Reads

Number of logical "sequential read" data base requests, e.g. ABAP/IV SELECT * FROM ... statements. This request can, in certain cases, be processed by the local SAP buffer (100% buffer for tables) and if not, is transferred to the database.

Dialog Steps

The number of counted/usable dialog steps or statistics records.  A dialog step is logged as a statistics record in the SAP workload statistics if it is one of the following types: DIALOG, UPDATE, BATCH, SPOOL, ENQUEUE.

Roll wait time

Response time of dialog steps which are not ended, despite roll out (such as some RFCs, for example), and which wait a certain time in the roll area until the dialog step is continued. This time is called the waiting time in the roll area.

Roll-in time

Time used in dialog steps for roll in/out operations.

In roll-in operations, user-specific data is transferred (rolled in) to the process work area from the shared memory roll buffer or roll file.  In roll-out operations, data is transferred (rolled out) to the roll buffer or roll file.

Roll-ins

Number of roll-in operations.

In roll-in operations, user-specific data is transferred (rolled in) to the process work area from the shared memory roll buffer or roll file.  In roll-out operations, data is transferred (rolled out) to the roll buffer or roll file.

Roll-out time

Time used in dialog steps for roll in/out operations.

In roll-in operations, user-specific data is transferred (rolled in) to the process work area from the shared memory roll buffer or roll file.  In roll-out operations, data is transferred (rolled out) to the roll buffer or roll file.

Roll-outs

Number of roll-out operations.

In roll-in operations, user-specific data is transferred (rolled in) to process work area from the shared memory roll buffer or roll file. In roll-out operations, data is transferred (rolled out) to the roll buffer or roll file.

Time per DB Request

Average response time of all commands to the database system in milliseconds.

As access times to buffered tables are shorter, they are not included in the runtime measurement.

Time per Req.:    Changes and commits

Mean time per dialog step for logical  "UPDATE", "DELETE" or "INSERT" database requests.

The time requirements for 'Commit work' requests to the database are also taken into account here.

Time per Req.:    Direct Reads

Mean time per dialog step for a logical "direct read" data base request, e.g. the ABAP/IV "SELECT SINGLE ..." statement.

Time per Req.:    Sequential Reads

Mean time per dialog step for a logical "sequential read" data base request, e.g. the ABAP/IV "SELECT * FROM ..." statement.

这是我从51Testing就业专版中转出来的一篇文章，2005年发的了，写这篇文章的人是51testing的一位学员，参加51testing就业培训的学员都享受到这样的特权可以进入到学员专版，里面有很多资料，也有很多珍贵的照片。还有很多学员经过培训之后自己总结的资料。发这篇文章是因为最近收到很多人投过来的简历，发现学生找工作真的很难，下面借花献佛这篇文章就献给那些正在找工作的大学生们：

献给正在为面试而奋斗的七期同学们

       2008年8月23日，经过一个月的努力，在深圳51Testing就业培训第二期开班。开班的当天来了一位咨询的学员，说是从广州赶过来，专程想了解下我们培训的情况，想通过培训加入测试行业。我们其中一位职业发展老师很热情的接待了她，给她做了详细的介绍，由于当天我们是开学典礼邀请了几位企业中的朋友过来给学员讲下在企业里的工作情况是什么样，如何做好测试，现在需要做那些准备；还有一位是我们上海21期学员，专门从广州过来给小师弟师妹讲应该如何学习，如何做好跨入行业的准备，这位学员现在是广州一家公司的测试主管。每期班开学我们都会请以前的就业培训学员和用人企业或者企业中的主管过来跟学员交流，参加我们的开学典礼，让学员提前就进入做一名软件测试工程师的状态。

       这个咨询的学员问的很详细，问招生，问教学，问就业，本来以为是个正常的学员咨询，我们也没有任何避讳，并且让她跟以前的学员交流，当中午一段时间大家都很忙，这个咨询者和学员交流后到咨询室等老师，我们的老师到咨询室找她的时候，发现她正在拿着相机在我们的咨询室照相，并把一个mp3放入兜子里。我们的老师看到后产生了怀疑，因为自从51testing到深圳以来，其它培训机构的人经常来做假咨询，其中有一次我们另外一位老师在接待咨询的过程中发现就是以前某培训机构的同事。经过一番交流，确认该人就是一名其他培训机构的探子。

     以前在北京的时候，就经常有其他培训机构的人过来咨询，拿着录音设备录音，探子和正常的咨询者其实有明显的区别，问的问题的角度其实都不一样。不过这里要说一个很有意思的事情，我们的学员中就有其他培训机构做测试培训的咨询师，她也是在咨询我们之后参加51testing的培训。其实很多事情都是只要做好自己，就能有成果，只要我们自己不做错事情，我想我们就能成功。

       在自动化测试框架中经常设计分布式执行用例，调用不同计算机机上的qtp来执行，如何远程调用qtp有以下几个方法：

       1.利用qc启动相应机器上qtp执行自动化测试用例

          打开QC 打开test lab--> in the execution flow-->设置

       2.利用wmi对象远程启动远程进程

         脚本代码例子：

         strComputer = "."
         strCommand = "QPro.exe"

         Const INTERVAL = "n"
         Const MINUTES = 1

         Set ōbjWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
         Set ōbjScheduledJob = objWMIService.Get("Win32_ScheduledJob")
         Set ōbjSWbemDateTime = CreateObject("Wbemscrīpting.SWbemDateTime")

         objSWbemDateTime.SetVarDate(DateAdd(INTERVAL, MINUTES, Now()))
         errReturn = objScheduledJob.Create(strCommand, objSWbemDateTime.Value, False, 0, 0, True, intJobID)

         If errReturn = 0 Then
            Wscrīpt.Echo "notepad.exe was started with a process ID: " & intJobID
         Else
            Wscrīpt.Echo "notepad.exe could not be started due to error: "&errReturn
         End If
  

       3.利用lr controller远程启动qtp自动化测试脚本

        打开controller，然后加载qtp脚本，设置load generator

Write a program to delete Line in file?

思路：封装scrīpting.filesystemobject对象，利用readline方法

Function DeleteLine(strFile, strKey, LineNumber, CheckCase)

'Use strFile = "c:\file.txt"  (Full path to text file)
'Use strKey = "John Doe"      (Lines containing this text string to be deleted)
'Use strKey = ""              (To not use keyword search)
'Use LineNumber = "1"         (Enter specific line number to delete)
'Use LineNumber = "0"         (To ignore line numbers)
'Use CheckCase = "1"          (For case sensitive search )
'Use CheckCase = "0"          (To ignore upper/lower case characters)

   Const ForReading=1:Const ForWriting=2
   Dim objFSO,objFile,Count,strLine,strLineCase,strNewFile
   Set ōbjFSO=CreateObject("scrīpting.FileSystemObject")
   Set ōbjFile=objFSO.OpenTextFile(strFile,ForReading)
   Do Until objFile.AtEndOfStream
      strLine=objFile.Readline
      If CheckCase=0 then strLineCase=ucase(strLine):strKey=ucase(strKey)
      If LineNumber=objFile.Line-1 or LineNumber=0 then
         If instr(strLine,strKey) or instr(strLineCase,strkey) or strKey="" then
            strNewFile=strNewFile
         Else
            strNewFile=strNewFile&strLine&vbcrlf
         End If
      Else
         strNewFile=strNewFile&strLine&vbcrlf
      End If
   Loop
   objFile.Close
   Set ōbjFSO=CreateObject("scrīpting.FileSystemObject")
   Set ōbjFile=objFSO.OpenTextFile(strFile,ForWriting)
   objFile.Write strNewFile
   objFile.Close

End Function

  一般vb中创建对象有两种形式：

  （1）

  dim   a   as   object_x  
  这样只是定义对象A的一个标识,并没有开辟内存空间来创建这个对象.  
  dim   a   as   new   object_x  
 

  这样定义就开辟了内存空间,即在定义对象时就构建了这个对象.其它等于:  
 

  （2）

  dim   a   as   object_x  
  set   a= new   object_x  

  或者  
  dim   a   as   object_x  
  set   a= CreateObject("objectname”)

 
  CreateObject支持更多的对象定义.比如用VB6写的DLL不是标准格式的DLL,一般用CreateObject来完成对象的创建,而且在VBscrīpt（qtp）等VB的子集中也只支持用CreateObject.

         今天同事告诉我有个女孩子由于自己是重点高校毕业的学生参加培训觉得很没有面子，这还是第一次让我遇到的情况。参加培训应该要想好为什么要参加培训，不是为了面子而参加。如果你订好了自己奋斗的方向，如把软件测试做好你自己职业发展路线，就要提前做准备，在学校学习基础理论的时候就开始注重自身能力的提高。除了学习理论外会有针对的学习软件企业所需求的技术、职业所要求的技能不断锻炼，这样当大学毕业的时候轻松跨入这个行业。

        参加我们培训的人有很多名牌大学毕业的学生参加培训，有清华和北大甚至还有从国外回来如美国，丹麦，法国，阿拉伯等，他们不是找不到工作，我觉得他们给人的感觉是对自己的职业定位很明确，过来培训是为了提高技能，为自己的将来职业发展做好准备。

        参加培训前要想清楚是为了就业，还是为了获得高薪，还是为了提高技能，只有有了明确的目标才能把握好心态。通过培训使用培训所掌握的知识来使你工作更加容易，这样提升的空间就会更大。

        所以想好了为什么参加培训，不要因为面子而裹足不前。         

        今天同事接到一个电话咨询我们的周末精品班的课程，由于我们周末精品班培训前是需要考试才能进入学习的，因为为了保证培训效果需要两方面一方面是培训课程的体系内容，一方面是个人的主观努力，由于课程内容需要有一定基础的人参加，所以要面试入学学员，笔试考察部分测试理论方面，面试会问些编程方面的知识。

       由于打进电话的人要问些课程的具体设置，所以需要交流，该人说他在美国做了10多年的QA，回国后找到一家公司做自动化，但是很久不用工具，所以想参加培训。了解培训内容中是否有白盒测试，我界很少了下课程体系和单元测试的内容，但是她竟说不知道我说的单元测试是什么？做过测试的人都知道软件测试是一项复杂的系统工程，从不同的角度考虑可以有不同的划分方法，对测试进行分类是为了更好的明确测试的过程，了解测试究竟要完成哪些工作，尽量做到全面测试。按照是否执行可以划分为动态和静态测试，按照测试阶段划分单元测试 集成测试 系统测试，按照测试方法来分有白盒测试，黑盒测试。明显可以看出白盒测试和黑盒测试只是一种测试方法，一般白盒测试用在单元测试阶段，黑盒测试用在系统测试阶段，如果想保证软件质量我们都是从整个软件生命周期去把握，孤立的看白盒测试和黑盒测试是没有意义的，比如在单元测试阶段需要参照文档进行设计和编写测试用例，而我们看白盒测试主要是写针对内部逻辑进行测试（概念：白盒测试也称结构测试或逻辑驱动测试，是指基于一个应用代码的内部逻辑知识，即基于覆盖全部代码、分支、路径、条件的测试，它是知道产品内部工作过程，可通过测试来检测产品内部动作是否按照规格说明书的规定正常进行，按照程序内部的结构测试程序，检验程序中的每条通路是否都有能按预定要求正确工作，而不顾它的功能，白盒测试的主要方法有逻辑驱动、基路测试等，主要用于软件验证）

    如果按照阶段来看的话就有流程和技术，技术我们不用说了主要是测试单元模块内和模块之间的 功能测试、容错测试、边界测试、约束测试、界面测试、重要的执行路径测试，单元内的业务流程和数据流程等。 如果是流程就要设计到人，   单元测试的职责分工： 由各项目组的开发人员完成测试工作，并详细记录测试结果和修改过程等。所以真正的来看要想做好单元测试不仅仅是测试的具体技术用的是什么还有流程方面去要保证。做了10年的人还不知道单元测试和白盒测试的区别。实在是遗憾，而且还是在国外做了10多年。

   题外话：很多人参加培训想学到东西，第一个就应该看课程体系和内容，很多机构培训的课程介绍中只培训白盒测试和黑盒测试，也就是把测试放在一个孤立的点上培训，这怎么能让你从一个整体的环境中去认识如何做好单元测试呢，这么培训出来的人怎么才能有提高呢。

  骗人者可恨，上当者可气。

    SiteScope是由Mercury Interactive公司所提供的系统管理软件。SiteScope可以实施于Windows PC 服务器，Sun Solaris平台或是Linux之上，在统一的平台上集中式地管理各种不同的操作系统的服务器，WEB服务器，数据库系统，邮件服务器，网络设备，应用服务器等等资源。它的显著的无代理方式监控技术的应用，尤其适用于多变的系统环境之中，再加上SiteScope的远端管理方式和极其灵活的配置方式，将为用户的管理和服务助一臂之力。
    在传统的网络系统管理软件中，大部分都采用Manager-Agent的体系结构。Agent是指安装在被管理的生产系统机上的一个或是多个代理程序，它负责采集被管理机上的一系列性能数据，并把数据传递给Manager一端。尽管许多厂商宣称这些代理程序Agent将以较低的优先级和较少的资源消耗运作，我们还是无法避免这样一个问题。就是当我们的关键的生产应用系统发生性能危机时，我们无法排除代理软件Agent对生产系统的或多或少的影响。换言之，管理软件的代理程序的存在，干扰了我们对生产系统的维护和性能问题的诊断。尤其是在有众多服务器的环境中，为了保障用户的托管服务器的绝对的安全和无干扰，我们在此推荐SiteScope所采用的先进的Agentless系统管理和性能管理技术，它将避免在生产系统中安装任何不必要的代理程序。没有代理程序，被管理机的资源消耗和影响也减到最小。由于在SiteScope管理系统中采用了与操作系统厂商、数据库厂商和其他应用系统厂商的性能数据库的集成，我们将在不修改生产系统机的情况下，对其进行全面的系统、数据库和应用系统性能管理。无代理程序的系统、数据库和应用系统性能管理方案，它将生产系统的日常运行和管理系统的操作分离了开来，使得管理系统对生产系统的消耗和影响降到了最低点。SiteScope目前支持绝大多数的业界流行的标准，包括操作系统类型Windows/Unix/Linux，数据库，邮件系统，FTP服务器，网络设备，应用服务器，中间件，等等90多种不同监控器。

SiteScope提供了对于不同URL和业务关键交易的监控点，它甚至也可以模仿业务用户来填写Web表单。它基本的URL监控点要远比其它产品要丰富得多。
   用户可以通过URL监控器管理每一个关注的WEB页面的响应时间，使用URL content做页面内容的匹配检查。而URL sequence监控器更能模拟用户一定的业务流程顺序的访问一组页面。SiteScope 从URL等监控器获得数据帮助用户实时的了解的基于WEB的应用系统的性能问题。
传统的性能监测方式依赖片断式的结构显示。每个IT 部门都配有不同人员负责网络结构的某一部件。而且，每个部门又都使用各自的监测器跟踪系统性能。其结果是从元件层面得到的是片段孤立的应用性能显示。利用Mercury Interactive 的SiteScope，管理员从一台座机就能监测到所有服务器和应用程序的性能品质，发生状况立即能接收到警报。SiteScope可以在系统发生故障时，发送Email，SMS，Pager，SNMP traps，scrīpts，Sound，Database，Log，Post等不同形式的警告到管理员的信箱或是手机。在任何时候，管理员都会在第一时间，早于客户了解到系统的运作状况。在一个警报之后，SiteScope能够实施一系列自动的应急措施，在管理员到达现场之前，尽量避免down机等重大损失