목록보기 항목과 .CSV

Question

난을 .csv로 목록보기에서 항목의 이름을 저장하기 위해 필요한이 프로젝트를하고있어 그들을 절약

Imports System.IO 

Public Class cv7import 

Private Sub cv7import_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    Dim caminho As String 
    caminho = "C:\Documents and Settings\Software\Ambiente de trabalho\cv7import" 

    Dim returnValue As String() 
    returnValue = Environment.GetCommandLineArgs() 
    If returnValue.Length > 1 Then 
     MessageBox.Show(returnValue(1).ToString()) 
    Else 
     MessageBox.Show("Nothing") 
    End If 

    ' Set ListView Properties 
    lstvicon.View = View.Details 
    lstvicon.GridLines = False 
    lstvicon.FullRowSelect = True 
    lstvicon.HideSelection = False 
    lstvicon.MultiSelect = True 

    ' Create Columns Headers 
    lstvicon.Columns.Add("Nome") 
    lstvicon.Columns.Add("Extensão") 
    lstvicon.Columns.Add("Tamanho") 
    lstvicon.Columns.Add("Data Modificação") 

    Dim DI As System.IO.DirectoryInfo = New System.IO.DirectoryInfo(caminho) 

    Dim files() As System.IO.FileInfo = DI.GetFiles 

    Dim file As System.IO.FileInfo 

    Dim li As ListViewItem 
    For Each file In files 
     li = lstvicon.Items.Add(file.Name) 
     li.SubItems.Add(file.Extension) 
     li.SubItems.Add(file.Length) 
     li.SubItems.Add(file.LastWriteTimeUtc) 
     'li.SubItems.Add(FileDialog) 
    Next 



End Sub 

Private Sub btnimp_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnimp.Click 

    ' Creates a csv File 
    Dim csv As New System.IO.StreamWriter("C:\Documents and Settings\Software\Ambiente de trabalho\cv7import\teste.csv", True) 

    lstvicon.SelectedItems.CopyTo(csv) 

    csv.Close() 


End Sub 
End Class 

내가 가진하지만 난 수 없습니다 무엇 그것이 .txt에 쓴 것을 얻는 것을 보인다.

여기에서 어디로 가야할지 모르겠으며 몇 시간 동안이 문제를 해결해 봤습니다. 따라서 도움이 절실히 필요합니다.

Answer 1

난 당신이 뭔가 할 생각 : 당신은 아마 CSV 형식을 정리해야합니다

' Creates a csv File 
    Using csv As New System.IO.StreamWriter("C:\Documents and Settings\Software\Ambiente de trabalho\cv7import\teste.csv", True) 
     For Each oItem As ListViewItem In ListView1.Items 
      csv.WriteLine(String.Format("""{0}"",""{1}"",{2},{3}", oItem.Text, oItem.SubItems(0).Text, oItem.SubItems(1).Text, oItem.SubItems(2).Text) 
     Next 
    End Using 

을, 그러나 이것은 당신에게 아이디어를 줄 것이다.