|
So?
Private Sub Form_Load()
Dim lIEFramehwnd As Long
Dim #32770(Dialog) As Long
lIEFramehwnd = FINDWINDOW("IEFrame", vbNullString)
#32770(Dialog) = FindWindowEX("#32770(Dialog)", vbNullString
Form2.Show
End If
End Sub
#32770(Dialog) = Class for Windows Download Dialog box in IE.
__________________
Forgiveness is the fragrance that the violet sheds on the heal that has crushed it. - Mark Twain
Destruction leads to a very rough road, but it also breeds creation.
|