با سلام دوستان
من یه صفحه رو در موزیلا فایرفاکس بازکردم که هر 10 دقیقه باید یه بار ریفرش بشه.یه کد میخوام که بعد از هر 10 دقیقه خودش اتومات CTRL+R که باعث رفرش صفحه میشه بزنه
ممنون میشم کمک کنید
درخواست لود صفحه فایرفاکس بر اساس تایم
با سلام دوستان
من یه صفحه رو در موزیلا فایرفاکس بازکردم که هر 10 دقیقه باید یه بار ریفرش بشه.یه کد میخوام که بعد از هر 10 دقیقه خودش اتومات CTRL+R که باعث رفرش صفحه میشه بزنه
ممنون میشم کمک کنید
به شرطی که در FireFox پنجره اون صفحه فعال باشه (مثلا اگر سه صفحه متفاوت رو باز کرده، اون صفحه مورد نظر شما فعال باشه)، بر اساس عنوان صفحه پیداش می کنید.نوشته شده توسط karem2074
RefreshFirefox.zip
Preview.png
خیلی خیلی ممنون فقط میتونید کد ماله مرورگر Opera هم تو کد زیر برام بذارید.چون هردوتاشون یه نام دارن صفحه میخوام اتومات هردوتاشون ریفرش بشن.ممنون میشم خیلی لطف کردید.
Private Shared Sub RefreshWebPage(pageTitle As String)
Dim pageHandle = FindWindowEx(IntPtr.Zero, IntPtr.Zero, "MozillaWindowClass", pageTitle & " — Mozilla Firefox")
If pageHandle <> IntPtr.Zero Then
Dim prevHandle = GetForegroundWindow()
SetForegroundWindow(pageHandle)
SendKeys.SendWait("^R")
SetForegroundWindow(prevHandle)
End If
End Sub
من بر اساس مشخصات Opera 75.0 کد رو نوشتم، ممکنه با نسخه قبلی یا بعدی سازگار نباشه.خیلی خیلی ممنون فقط میتونید کد ماله مرورگر Opera هم تو کد زیر برام بذارید.چون هردوتاشون یه نام دارن صفحه میخوام اتومات هردوتاشون ریفرش بشن.ممنون میشم خیلی لطف کردید.
Private Shared Sub RefreshWebPage(pageTitle As String)
Dim pageHandle = FindWindowEx(IntPtr.Zero, IntPtr.Zero, "MozillaWindowClass", pageTitle & " — Mozilla Firefox")
If pageHandle <> IntPtr.Zero Then
Dim prevHandle = GetForegroundWindow()
SetForegroundWindow(pageHandle)
SendKeys.SendWait("^R")
SetForegroundWindow(prevHandle)
End If
End Sub
RefreshFirefox2.zip
تست کردم کار نمیکنه نسخه 75
همه مرورگرها یک پلاگین/اکستنشن برای این کار دارن: auto refresh
برنامه جناب کینگ خیلی overkill هست برای این کار ساده، مگر این که نکته خاصی باشه که دقت نکرده باشم.
قوانین ایجاد تاپیک در تالار
پاسخ با نقل قول