|
Wait, I chaged some stuff.Here is the new wAY I'm doignit
This is everything, I took out the Module
Option Explicit
Private Declare Function FINDWINDOW Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Sub Form_Load()
Dim lIEFramehwnd As Long
lIEFramehwnd = FINDWINDOW("IEFrame", vbNullString)
If lIEFramehwnd Then
Form2.Show
End If
End Sub
Right now, I have to open IE and than start the program, but If im runnig the program, and than open IE Form2 wont show, any ideas. Also, Im still having problems declaring IEFrame As parnt window, and thna the Downlaod Dialog box as child.
__________________
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.
|