6 Replies - 1220 Views - Last Post: 27 January 2013 - 11:02 PM Rate Topic: -----

#1 B7vks  Icon User is offline

  • New D.I.C Head

Reputation: 0
  • View blog
  • Posts: 17
  • Joined: 02-July 12

How to Use ListView Like This.

Posted 11 September 2012 - 05:17 AM

Hy ,
How To Use Listview?

I tray To make Download Link Checker .,


My Project is :-

 Private Sub OpenFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog1.FileOk
        strFileName = OpenFileDialog1.FileName
        Label1.Text = strFileName
        Dim strm As System.IO.Stream
        strm = OpenFileDialog1.OpenFile()
        TextBox2.Text = OpenFileDialog1.FileName.ToString()
        If Not (strm Is Nothing) Then
            'insert code to read the file data
            strm.Close()

            Dim filepath As String = OpenFileDialog1.FileName
            Dim inputstream As New IO.StreamReader(filepath)
            Dim newstr(2) As String
            Dim no As String
            Dim links As String

            Do While inputstream.Peek <> -1
                newstr = inputstream.ReadLine().Split("*")
                links = newstr(0)

                no = newstr(1)

                Me.lb1.Items.Add(links)
                Me.lb1.Items.Item(lb1.Items.Count - 1).SubItems.Add(no)

            Loop
            inputstream.Close()
        End If
    End Sub


Private Sub LoadLinksToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LoadLinksToolStripMenuItem.Click
        strfilename = TextBox1.Text

        OpenFileDialog1.Title = "Please Select a File"
        OpenFileDialog1.InitialDirectory = Environment.SpecialFolder.DesktopDirectory
        OpenFileDialog1.Filter = "(*.txt)|*.txt"
        OpenFileDialog1.ShowDialog()


    End Sub


 Private Sub ListView1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles lb1.MouseDown
        If e.Button = Windows.Forms.MouseButtons.Right Then
            cms1.Show(Cursor.Position)
        End If
    End Sub

 Private Sub Show_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Show.Click
        If Hide.Visible = False Then
            Show.Hide()
            Hide.Show()
        End If
    End Sub

    Private Sub Hide_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Hide.Click
        If Show.Visible = False Then
            Hide.Hide()
            Show.Show()
        End If
    End Sub




I mad this Codes. For My Project,

my Project's 1st Step IS -



#1 - Load Your .txt Files via openfiledialog then Links are View In ListView1 Line by line

#2 - Click on Start Button Then textbox1.text = Listview's 1st link.Result show in webbrowser1.
#3 - If Link working? then link's checkbox.checked = true
#4 - Last step = Save all Checked links in text file save on
"C:\"




and i traying to make it autometic ,,,,,

please Help me , God Help You!



View This Step's
Posted Image

Posted Image


Posted Image


Help Me Please ,, God Help You!----B7vks :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie: :helpsmilie:

Is This A Good Question/Topic? 0
  • +

Replies To: How to Use ListView Like This.

#2 sela007  Icon User is offline

  • D.I.C Addict

Reputation: 138
  • View blog
  • Posts: 838
  • Joined: 21-December 11

Re: How to Use ListView Like This.

Posted 11 September 2012 - 06:13 AM

HI! WHERE IS THE PROBLEM?
Was This Post Helpful? 1
  • +
  • -

#3 B7vks  Icon User is offline

  • New D.I.C Head

Reputation: 0
  • View blog
  • Posts: 17
  • Joined: 02-July 12

Re: How to Use ListView Like This.

Posted 11 September 2012 - 10:45 PM

i need this Work,

when Click start button then open 1st link , then wait 20sec, then open 2nd link , then wait 20sec, then open 3rd link, then wait 20sec, i need this prosecc to countineus .......... please help me...............
Was This Post Helpful? 0
  • +
  • -

#4 sela007  Icon User is offline

  • D.I.C Addict

Reputation: 138
  • View blog
  • Posts: 838
  • Joined: 21-December 11

Re: How to Use ListView Like This.

Posted 12 September 2012 - 05:43 AM

do you know how to use timer control?
Was This Post Helpful? 0
  • +
  • -

#5 B7vks  Icon User is offline

  • New D.I.C Head

Reputation: 0
  • View blog
  • Posts: 17
  • Joined: 02-July 12

Re: How to Use ListView Like This.

Posted 13 January 2013 - 12:30 AM

i know but how to retrive link line by line?????
Was This Post Helpful? 0
  • +
  • -

#6 sela007  Icon User is offline

  • D.I.C Addict

Reputation: 138
  • View blog
  • Posts: 838
  • Joined: 21-December 11

Re: How to Use ListView Like This.

Posted 18 January 2013 - 11:16 AM

if your links are in column number 2 then you can retrieve link like this:
Dim linkUrl As String
Dim linkNumber As Integer
'linkNumber = X
txtUrl = lv1.Items(linkNumber).SubItems(1).Text
'OpenLink(txtUrl)

All you need is to increase linkNumber every 20 seconds.
Was This Post Helpful? 0
  • +
  • -

#7 B7vks  Icon User is offline

  • New D.I.C Head

Reputation: 0
  • View blog
  • Posts: 17
  • Joined: 02-July 12

Re: How to Use ListView Like This.

Posted 27 January 2013 - 11:02 PM

its not work boss.....
Was This Post Helpful? 0
  • +
  • -

Page 1 of 1