åben txt fil

Øhh, er det et spørgsmål? så kom med lidt flere detaljer

Prøv dette her

  Open sti & "test.txt" For Input As #1

  Do While Not EOF(1)
    Input #1, s1


  Loop
  Close (1)

hvilket program snakker vi om ?

jamen jeg ved ikke hvad jeg skal skrive i koden for at åbne filen.... altså har prøvet noget fra en bog men jeg tror jeg fatter hat af det.... kan ikke finde nogle steder i de eksempler bogen giver hvor der står hvilken fil man skal åbne eller hvilken linje man skal hente fra...

triple-x hvad er spørgsmålet oprettet under?

z1n - min fejl, var for hurtig, undskylder!

:D lcl-lars, nu sidder jeg ikke med det lige foran mig... er nemlig på work.. men lyder lidt som det i min bog... dog står der sti og filnavn... hvor specifiere jeg hvilken linje den skal hente ?

(jeg skal have det ind i en Txtting.text = "" )

Ok du skal huske og oprette dine variabler.

dvs. dim s1 as String

Du kan gøre det sådan eller du kan bruge en variable fx.
Dim St as String
st = "C:\test.txt"
du kan også bruge CommonDialog hvor du kan finde filen som du vil åben.

CommonDialog.Filter = "Text (*.txt)|*.txt"
CommonDialog.ShowOpen
så kommer den Dialogbox frem som du nok kender.
og filenavnet ligger i CommonDialog.FileName som du putter ind i din open sætning.

Open "C:\test.txt" For Input As #1

  Do While Not EOF(1)
    Input #1, s1
    Txtting = Txtting & s1
  Loop
  Close (1)

Hilsen

Lars

Tror jeg har besvaret spørgsmål som dette snart 10 gange, og skal blot supplere Lars:

Er det en almindelig text-fil, kan du åbne den med
  Open ... For Input

Du kan enten selv angive filen (der hvor jeg skriver ...) eller lade brugeren vælge en fil via en commondialog (.Showopen)

Du kan så læse linie for line, og smide hver linie ind i den samme variabel, eller fx. ind i et array. Du kan også læse hele filens indhold ind i én variabel på een gang.

Du kan også skrive til en fil (Open ... for Output) eller tilføje (Append)

Husk altid at lukke filen igen med Close

Du kan ikke bare nappe fx. linie 5 i en textfil, uden at læse de første 4 linier først. Dog kan du bruge Random Access Files, der tillader dette.

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbenlr98/html/vastmopenx.asp

www.eksperten.dk/kat/5?searchtype=txt&words=open+txt&method=and&sort=score&catid=5

Wups - linket til msdn skulle være hertil:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbcn7/html/vaoriVisualBasicLanguageTour.asp

Der står alt hvad du normalt får brug for at vide om VB på disse sider, så brug dem :o)

Sikke jeg klokker i det. Bruger du ovenstående link, kan du i venstre side navigere til denne side

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbenlr98/html/vastmOpen.asp

:o)

fandt selv en løsning ved at arbejde videre på lars'

  Open "C:\ipconfig.txt" For Input As #1
    For a = 1 To 33
    Input #1, getip
    Next a
    ipTxt.Text = Mid(getip, InStr(getip, ":") + 2, Len(getip))
  Close #1