چطور میشه به Mozila Windows Class متن ارسال کرد ؟

[elimiz]

سلام دوستان
میخواستم بدونم چطور میشه به Mozila Windows Class متن ارسال کرد و اینتر و زد ؟
میخوام وقتی در مرورگر فایرفاکس سایت www.google.com باز شد. متن موجود در text1 در فرمم در کادر url فایرفاکس کپی و اینتر بشه.

من با این کد باز بودن سایت google در فایر فاکس رو تشخیص میدم
Private Declare Function FindWindowA Lib "user32.dll" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function SetForegroundWindow Lib "user32" (ByVal hwnd As Long) As Long
Dim Temp As Long

Private Sub Timer1_Timer()
Temp = FindWindowA(vbNullString, "Google - Mozilla Firefox")
If Temp <> 0 Then
SetForegroundWindow (Temp)
SendKeys ("http://46.4.12.117/")
SendKeys "{ENTER}"
SendKeys ("http://46.4.12.117/")
End If
End Sub


اینم مشخصات
79958


منتظر راهنمایی دوستان هستم
مرسی

[elimiz]

از اساتید کسی نیست کمک کنه ؟
http://www.bigresource.com/VB-Can-039-t-close-Mozilla-FireFox--h8cxWdSTXV.html
اینجا توضیح داده. نمونه کد هم هست.
اما من نتونستم چیزی یاد بگیرم

[elimiz]

کسی نیست ؟