QTP日期控件

1.录制日期控件时，点击后下拉内容录制不下来，经过试验，可通过object.value给日期控件赋值

下面是把系统时间赋给日期控件：

Currentdatetime=now()
Browser("呼叫中心管理系统").Page("呼叫中心管理系统").Frame("Frame_AddTask").WebEdit("WebEdit_FromDate").Object.value = Currentdatetime
或
Browser("呼叫中心管理系统").Page("呼叫中心管理系统").Frame("Frame_AddTask").WebEdit("WebEdit_FromDate").Object.setAttribute “value“，”20120202”，0

备注：关于获取系统时间

'获取系统时间
Currentdatetime=now()
'获取年、月、日
Dim YY,MM,DD,NowStr
YY = Year(Currentdatetime)
MM = Month(Currentdatetime)
DD = Day(Currentdatetime)
NowStr = YY & MM & DD