Lors de l'exécution de cette fonction de synchronisation, une erreur est détectée en tant qu'objet Requis dictObj

Question

Sub sb_Web_Sync(webObject,objDesc) 
    Set webObject = dictObj.Item(webObject) 
    mercurytimers.Timer ("sb_Web_Sync").Start 
    Do 
     Services.ThinkTime 1 
    Loop Until webObject.Object.readyState = "complete" and webObject.Object.documentElement.readyState = "complete" 

    Do 
     Services.ThinkTime 1 
    Loop Until webObject.Frame("html tag:=IFRAME","Class Name:=Frame","url:=about:blank").Exist(0) = false Or (mercurytimers.Timer ("sb_Web_Sync").ElapsedTime >=2000) 

    mercurytimers.Timer ("sb_Web_Sync").Reset 
    mercurytimers.Timer ("sb_Web_Sync").Stop 
    Err.Clear 
End Sub 

Answer 1

L'objet dictObj de la fonction ci-dessus ne pointe vers aucun objet. Vous devez créer la référence à cet objet que vous souhaitez pointer.

Par exemple: Si vous avez l'intention de pointer vers une page, puis utilisez l'instruction suivante: Set dictObj = Browser ("micClass: = Navigateur", "CreationTime: = 0"). Page ("micClass: = page ")

Probablement le webObject/objDesc qui est passé en paramètre à cette fonction doit avoir l'objet décrit. Veuillez vérifier la déclaration une fois.

Espérons que cela répondra à votre question.

Merci, Nandana