Database connection, gem records.

Problemet er ikke så meget hvordan der skrives til tekstfilen, men mere hvordan man kan lave løkken... Så den smider alle records ud.

ingen der har et bud, eller forstår I ikke mit problem?

kode fragment:

        Dim sw As StreamWriter = new StreamWriter("C:\T1.txt")
        Dim con As SqlConnection = New SqlConnection ("server=ARNEPC2;Integrated Security=SSPI;database=Test")
        con.Open
        Dim cmd As SqlCommand = New SqlCommand ("SELECT * FROM T1", con)
        Dim rdr As SqlDataReader = cmd.ExecuteReader
        While rdr.Read
            Dim f1 As Integer = CType(rdr(0), Integer)
            Dim f2 As String = CType(rdr(1), String)
            sw.WriteLine(f1 & " " & f2)
        End While
        con.Close
        sw.Close

den kode connecter til en SQLServer, læser alle rækker fra tabel T1 og udskriver
de 2 felter til en fil T1.txt

de bør kunne copy pastes ind i den sub

Jeg kigger lige på det, tak for svar :)

jeg må hellere ligge et rigtigt svar såfremt det virker

Jeg fik fejl i linje 1: Dim sw As StreamWriter = new StreamWriter("C:\T1.txt")  hvor Dim sw As """StreamWriter""" = new StreamWriter("C:\T1.txt") """streamwriter""" ikke var defineret. Prøver at løse det med:

Dim sw As New System.IO.StreamWriter("c:\test.txt")

du kan jo også bare importere System.IO namespacet

Ja okay. Det virker - tusind tak :)

arne_v  Hvis jeg nu ønsker at tekstfilen med navnet: dagens dato altså:

Dim sw As StreamWriter = new StreamWriter("C:\" & now() & ".txt") så får jeg fejl. Vil du svare på hvad fejlen evt kunne være eller skal jeg oprette nyt spørgsmål

Prøv:

Dim sw As StreamWriter = new StreamWriter("C:\" & DateTime.Now.ToString("yyyy-MM-dd-HH-mm-ss") & ".txt")

mange tak, det fungere :)

og på den måde kan du også nemt rette formatet