Online Code Converter C# vb.net Java [ vb.net ] [kod]

Maveraün Nehr

Katılımcı Üye
25 Haz 2021
973
1,850
41.303921, -81.901693
Merhabalar webbrowser kodlarını kullanarak kod çeviri kullanacağız. Bu sefer ki konumuzda diğerlerinden farklı olarak seçenekler üzerinden webbrowser'ımıza işlem yaptırmayı öğreneceğiz. Umarım Yararlı olmuşumdur.

Gerekenler;
Bir adet webbrowser URL'si olsun.

2 adet textbox ikisi de scrollbars özelliği both olsun birisine kod gireceğiz diğeri girdiğimiz kodu istenen dile çevirecek yani sonuç textbox'u olacak.

colorize adında bir çağrı oluşturalım programı yıllar önce kodladığım için ne işe yaradığını araştırmadım siz değerli kullanıcılar çözecektir. :)

Kod:
  Sub colorrize()
        WebBrowser1.Document.GetElementById("_colorize").InvokeMember("click")
    End Sub

Form Load olayına programımızın script hataları ile bulanmaması için aşağıdaki kodu ekleyelim;

Kod:
WebBrowser1.ScriptErrorsSuppressed = True

WebBrowser'imiz sayfa yüklenmeden işlem yapmaya kalkarsa diye aşağıdaki kodu ekleyelim;

Kod:
 Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted

        Button1.PerformClick()
        Timer1.Start()
    End Sub

1 tane buton koyalım ve çevir yazalım kodumuz aşağıdadır;

Kod:
  On Error Resume Next
        Call colorrize()
        WebBrowser1.Document.GetElementById("_code").SetAttribute("Value", TextBox1.Text)
        WebBrowser1.Document.GetElementById("_colorize").InvokeMember("click")

3 tane Radiobutton ekleyelim

İlkine VB.NET Dilinden C# Diline Çevir diyelim çift tıklayalım ve içerisine aşağıdaki kodu yapıştıralım;

Kod:
TextBox2.Text = ""
        WebBrowser1.Refresh()

İkincisine C# Dilinden VB.NET Diline Çevir diyelim ve çift tıklayalım daha sonra içerisine aşağıdaki kodu yapıştıralım;

Kod:
 TextBox2.Text = ""
        WebBrowser1.Document.GetElementById("_src").SetAttribute("Value", "C#")

Sonuncusuna ise Java Dilinden C# Diline Çevir diyelim çift tıkladıktan sonra aşağıdaki kodu yapıştıralım;

Kod:
  TextBox2.Text = ""
        WebBrowser1.Document.GetElementById("_src").SetAttribute("Value", "Java")

Bir adet timer ekleyelim enabled özelliğini false yapalım ıntervıval'ımız 100 olsun aşağıdaki kodu girelim;

Kod:
 Dim PageElement As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("div")
        For Each CurElement As HtmlElement In PageElement
            If (CurElement.GetAttribute("className") = "code") Then
                TextBox2.Text = CurElement.InnerText
            End If
        Next
        Button1.PerformClick()
 

sw1ndler

Katılımcı Üye
29 Şub 2020
592
136
web browser fazla ram yiyecektir ve birçok eksi yönleri vardır onun yerine php öğrenip api yazıp c# ile çekmek daha sağlıklıdır
 
Üst

Turkhackteam.org internet sitesi 5651 sayılı kanun’un 2. maddesinin 1. fıkrasının m) bendi ile aynı kanunun 5. maddesi kapsamında "Yer Sağlayıcı" konumundadır. İçerikler ön onay olmaksızın tamamen kullanıcılar tarafından oluşturulmaktadır. Turkhackteam.org; Yer sağlayıcı olarak, kullanıcılar tarafından oluşturulan içeriği ya da hukuka aykırı paylaşımı kontrol etmekle ya da araştırmakla yükümlü değildir. Türkhackteam saldırı timleri Türk sitelerine hiçbir zararlı faaliyette bulunmaz. Türkhackteam üyelerinin yaptığı bireysel hack faaliyetlerinden Türkhackteam sorumlu değildir. Sitelerinize Türkhackteam ismi kullanılarak hack faaliyetinde bulunulursa, site-sunucu erişim loglarından bu faaliyeti gerçekleştiren ip adresini tespit edip diğer kanıtlarla birlikte savcılığa suç duyurusunda bulununuz.