Arkadaşlar takıldığım iki konu var 1.cisi listviewle 2.cisi ise proxy ayarlarıyla ilgili
ilk olarak listviewde

For Each li As ListViewItem In Me.ListView1.Items
If Not li.ForeColor = Color.Blue Then ' yazı rengi mavi değilse (yada fontu şuysa buysa kaldırma)değilse kaldır
li.Remove()
End If
Next
For Each ri As RssItem In RC.Items
Dim Li As New ListViewItem(ri.Title)
Li.Tag = ri

'bu kısmında mavi olan yazılar duruyor ama yeni bir tane daha mavi yazıyı hiç okunmamış gibi listviewe ekleniyor yani okunmuş itemleri tekrar ekliyor okunmamış larda ise problem yok...

If Not Me.ListView1.Items.Contains(Li) Then 'bu seferde listview a item eklerken aynı ada sahip bir item varsa ekle yoksa ekleme dedik
ListView1.Items.Add(Li)
End If
Next

kodu ile mavi renkteki itemları yenileme işlemi esnasında saklamak ve diğer itemleri kaldırıp yerine yeni itemleri koymak ama problem şudurki mavi renkteki itemlar dururken hiç okunmamış gibi aynılarınıda koyuyur yani üstdeki kodun alt bölümü aynı contains de ki itemleri eklememesi gerekiyor ama düşündüğüm gibi çalışmıyor

#########################################################
2.Konu

şimdi arkadaşlar ISA Client nesnesi bulunun bir networkde çalışan bir proje için domain-k.adı-pwd belirtip dışarı ile bağlantı kurmanın yolunu buldum fakat kendime göre bunu derleyemedim problem şudur ki
aşağıdaki kodda

client.downloadfile("adres",indirelecekdizin") diye bir satır var bu satırı ben bir dosya indirmek için değilde sitelerdeki rssleri okumak için kullancağım programda network güvenliği olmayan bir internet makinasında problem yok fakat iş yerinde 407 proxy....error diye bir hata çıkıyor ve çözümü bu şekilde takıldığım durum ise dosya indirmek yerine rssleri okumak


imports System

Imports System.Collections.Generic

Imports System.Text

Imports System.Net

Namespace ConsoleApplication1
       
    Class Program
       
        Private Shared Sub Main(ByVal args As String())
       
            Dim client As New WebClient()
            
            ’networkde geçerli bir limlik tanımlaması yapılıyor
            
            Dim kimlik As New NetworkCredential()
            
            kimlik.Domain = "domain adı"
            
            kimlik.UserName = "kullanıcıadı"
            
            kimlik.Password = "password"
            
            ’Proxy server tanımlanıyor
            
            Dim proxyServer As New WebProxy("10.1.0.100", 8080)
            
            ’proxy sunucu üzerinden doğrulanacak kimlik
            
            proxyServer.Credentials = kimlik
                     
            ’WebClient nesnesinin dışarıya hangi sunucu üzerinden çıkacağı belirtiliyor
            
            client.Proxy = proxyServer
                        
            ’ artık güvenliğe takılmadan dosya indirilebilir
            
            client.DownloadFile("http://site/resim.jpg", "c:\\dosya.jpg")
            
        End Sub
       
    End Class
    
End Namespace



Farklı bi kullanım biçi olarakda

Dim myProxy As New WebProxy("http://proxyserver:port", True)
Dim myFindService As New FindServiceSoap()
myFindService.Proxy = myProxy
               
var fakat bunuda yapacağım rss readderda nasıl kullanacağımı bilemedim

Yardımlarınız için şimiden teşekkürler