[mo22]

Dim wantedExtension as String = ".jpeg"
	 
	For Each file_name As String In OpenFileDialog1.FileNames
	    If (file_name.EndsWith(wantedExtension) Then
	        TEST1.lstFiles.Items.Add(file_name)
	        TEST1.txtList.Text = TEST1.txtList.Text + Environment.NewLine + file_name
	        File.Copy(file_name, "C:\Documents and Settings\kmoloney\Desktop\kmoloney\RELEASEDtest" & "\" & Path.GetFileName(file_name), True)
	    End If
	Next

'i took this from another developer here please help i have being trying to find this answer for along time

its in vb

This post has been edited by AdamSpeight2008: 25 January 2013 - 10:00 PM

[AdamSpeight2008]

DouglasAdams, The Hitchhikers Guide to the Galaxy said:

“O Deep Thought computer," he said, "the task we have designed you to perform is this. We want you to tell us...." he paused, "The Answer."
"The Answer?" said Deep Thought. "The Answer to what?"

This post has been edited by AdamSpeight2008: 26 January 2013 - 08:41 AM