同步点问题

Grace

同步点问题
想在按Done之前确认File已经被Attach上，用了以下Scripit 来实现同步点操作，但有时文件还是加不上，不知为什么？
Private Sub AttachFile(sFile)
thePage.Link("Add/Delete Files").Click
thepage.WebFile("_ctl3:txtFileAttachment").Set sFile
Wait (2)
thepage.WebButton("Add Attachment").Click
    If thePage.WebElement("DeleteAttachFile").WaitProperty ("visible", True, 10000) Then
   bAttachFile=true
   End If
  thepage.WebButton("Done").Click      
  thepage.sync
End Sub

风过无息

楼主在thePage.Link("Add/Delete Files").Click完了以后加给等待时间试一下.

rivermen

thepage.WebButton("Add Attachment").Click
    If thePage.WebElement("DeleteAttachFile").WaitProperty ("visible", True, 10000) Then
   bAttachFile=true
   End If

Button点击之后，进行判断同步点。
判断的结果只不过是让变量 bAttachFile 取不同的值
即便bAttachFile=False，依然执行 thepage.WebButton("Done").Click    只是相当于wait 10  
对后面没有什么影响。


改造一下：

   while not bAttachFile
   wait 2
   bAttachFile=thePage.WebElement("DeleteAttachFile").GetRoproperty("visible")
   Wend