IE6 scripts not working in IE7

[jsknight1969]

Code:

dim Browserobj, validationtxt
Set Browserobj = Description.Create()
Browser("micclass") = "Browser"
Browser("url") = "" 'Insert your url here or use Expression (ie: .*msn.*)
With Browser(Browserobj).Dialog("title:=.*")
       If .Exist(1) Then
            validationtxt = .GetVisibleText(-1,-1,-1,-1)
            Reporter.ReportEvent micDone, "Popup", validationtxt
            .WinButton("OK").Click
       End If
End with

This code is adapted from a web framework I wrote that handles popups for me. I did make the Browserobj more generic, so hopefully it will still work for you.

Hope this helps.