2010-01-07 9 views

Répondre

2

Je suppose que vous voulez rejouer une Entrez clé, dans la plupart des cas, lorsque QTP ne dossier une action, il est préférable d'ajouter l'étape manuellement plutôt que d'essayer de forcer QTP à l'enregistrer.

Si l'objet de test en question prend en charge Type vous pouvez l'utiliser:

Window("Calc").Type micReturn 

Sinon, vous pouvez utiliser l'objet DeviceReplay comme décrit dans this article

Set dr = CreateObject("Mercury.DeviceReplay") 
dr.PressKey 28 ' 28 = Return (Enter) 
1

Une autre option pour rejouer un bouton Enter presse serait d'utiliser simplement la méthode SendKeys de l'objet Windows Script Host. Le code ressemblerait à ceci:

Dim WshShell 
Set WshShell = CreateObject("WShell.script") 
WshShell.SendKeys "{ENTER}" 
Set WshShell = Nothing