Rekl@m kontrolu vb.net

merhabalar yapmak istediğim şey webbrowsersiz bir rekl@m kontrolüdür aynı dword ve benzeri loaderler gibi nasıl yaparım sakın bana mainwindow title ile yap demeyin eğer yaparsam atıyorum x kısaltıcı siteyi kullandım ve titlesini programa yazdım linkten sonra gelen link google.com diyelim linke girip linki geçmedende google.com a gidince form algılıyor ve forma geçiyor böyle olmadan nasıl yapabilirim varmı önerisi yardımı olan kod paylaşabilecek olan

Önce istediğin adrese girince bir değişkeni doğrularsın daha sonra değişken doğru iken google girerse onaylatırsın.öte yandan sqllite ile tarayıcının geçmiş bilgilerini okutursun girilen siteye göre işlem yaptırırsın

Reklam siteleri belli ise " title "
if else komutları ile basit bir şekilde yaparsın.

çaylak bak şimdi atıyorum link kısaltma sitesi

Bağlantıları görmek için lütfen Giriş Yap

kısaltxyz nin titlesi Google - Kisalt.xyz - Basit Link Kısaltma - Google Chrome tm mı
ben diyorum ki
timer1 e
For Each p As Process In Process.GetProcessesByName("chrome")
If p.MainWindowTitle = Nothing Then
Else
label1.text=p.MainWindowTitle
End If
Next

timer2 ye de
if label1.text="Google - Kisalt.xyz - Basit Link Kısaltma - Google Chrome" then

if label1.text="Google" then ' burada linki geçtiken sonra gidecek yer ama adam linki geçmedende direk google.com a gitse yine geçmiş sayacak yani illa linkin tıklatıldığını nasıl kontrol ettiririm

End If

End If

CaptainMemory' Alıntı:

Önce istediğin adrese girince bir değişkeni doğrularsın daha sonra değişken doğru iken google girerse onaylatırsın.öte yandan sqllite ile tarayıcının geçmiş bilgilerini okutursun girilen siteye göre işlem yaptırırsın

Genişletmek için tıklayın ...

araştıracağım fakat yazabiliyorsan kod yazabilirmisin

CaptainMemory' Alıntı:

Önce istediğin adrese girince bir değişkeni doğrularsın daha sonra değişken doğru iken google girerse onaylatırsın.öte yandan sqllite ile tarayıcının geçmiş bilgilerini okutursun girilen siteye göre işlem yaptırırsın

Genişletmek için tıklayın ...

Tam olarak değişken oluşturmayı anlamadım biraz daha açabilirmisiniz açıklamanızı

Cromeflex' Alıntı:

çaylak bak şimdi atıyorum link kısaltma sitesi

Bağlantıları görmek için lütfen Giriş Yap

kısaltxyz nin titlesi Google - Kisalt.xyz - Basit Link Kısaltma - Google Chrome tm mı
ben diyorum ki
timer1 e
For Each p As Process In Process.GetProcessesByName("chrome")
If p.MainWindowTitle = Nothing Then
Else
label1.text=p.MainWindowTitle
End If
Next

timer2 ye de
if label1.text="Google - Kisalt.xyz - Basit Link Kısaltma - Google Chrome" then

if label1.text="Google" then ' burada linki geçtiken sonra gidecek yer ama adam linki geçmedende direk google.com a gitse yine geçmiş sayacak yani illa linkin tıklatıldığını nasıl kontrol ettiririm

End If

End If

Post automatically merged: 2 Eyl 2019

araştıracağım fakat yazabiliyorsan kod yazabilirmisin

Genişletmek için tıklayın ...

Hocam link e tıklasın 2. açılak link in title sini çek okey?

Button oluştur içine şunları yaz:
Process.Start("Rekl@m sayfasının linki")

timer1 oluştur enabledini true yap ve içine şunları yaz:
Dim myProcesses() As Process = Process.GetProcesses

For Each p As Process In myProcesses
If p.MainWindowTitle.Contains("Sekmenin ismi") Then 'Sekmenin titlesini yazın onu algılayıp çalışır.
timer1.Enabled = False
MsgBox("Rekl@m onayı başarılı!", MsgBoxStyle.Information, "Bilgilendirme")
form2.Show()
Me.close()
End If
Next