Avatar billede blady Nybegynder
17. maj 2002 - 14:49 Der er 11 kommentarer og
1 løsning

Hente data fra fil

Hej eksperter!!

Jeg sidder og roder med et program hvor jeg skal hente nogle data'er fra min harddisk. Det interessante er at programmet sletter indholdet i datafilen. Nu er jeg... (#!&/%¤¤) ...blevet træt af det!!!
Jeg har vb6.
Er der nogle, der lige kan fortælle mig hvor fejlen ligger i dette program:

Private Sub Form_Load()
Dim tekst As String
Open "c:\test1.txt" For Input As #1
Line Input #1, tekst
Close #1
End Sub

vb6 fortæller et den er gal med linien:- Line input #1,tekst
men sådan har jeg da gjort mange gange uden denne fejlmeddelse

Blady
Avatar billede ducks Nybegynder
17. maj 2002 - 15:02 #1
rettelse

Open "c:test1.txt" For Input As #1 = Open "c:\test1.txt" For Input As #1
Avatar billede blady Nybegynder
17. maj 2002 - 15:03 #2
ups ved overføring til eksperten kom jeg til at fjerne backslash i linien: Open "c:test1.txt" For Input As #1
der skal selvfølgelig stå Open "c:\test1.txt" For Input As #1 og dette ER skrevet rigtig i programmet.

Blady
Avatar billede blady Nybegynder
17. maj 2002 - 15:04 #3
Ducks>> fejlmeddelsen fortæller at der er fejl i:
Line Input #1, tekst

Blady
Avatar billede ducks Nybegynder
17. maj 2002 - 15:05 #4
tænkte jeg nok, eftersom jeg selv har prøvet at eksperten sletter backslash selvom man har skrevet den, var mere rettet til andre :)
Avatar billede blady Nybegynder
17. maj 2002 - 15:11 #5
ducks>> kan du hjælpe mig eller ikke, jeg har brug for hjælp ikke kommentar, dem kan jeg få af min kone :-)

Blady
Avatar billede ducks Nybegynder
17. maj 2002 - 15:15 #6
jeg ved ikke hvordan man gør men er selv interesseret i et svar så jeg forsøger mig frem, gi'r da også lige svar når jeg har fundet løsningen hvis der ikker er kommet et andet først :)
Avatar billede blady Nybegynder
17. maj 2002 - 15:17 #7
okie, glæder mig

Blady
Avatar billede ducks Nybegynder
17. maj 2002 - 15:22 #8
ok, lav 2 knapper i en form (command1 og command2) brug:

Dim Tekst2 As String

---------------------------------------

Private Sub Command1_Click()
Dim Tekst As String
Open "c:\test1.txt" For Input As #1
Line Input #1, Tekst
Close #1
Tekst2 = Tekst
End Sub

---------------------------------------

Private Sub Command2_Click()
MsgBox Tekst2
End Sub




ved du hvordan man henter flere linjer?
Avatar billede blady Nybegynder
17. maj 2002 - 15:35 #9
ducks>> problemet ligger i at jeg ikke kan hente data fra filen fordi indholdet (ikke filen) bliver slettet, hvorved at filen er tom, men hvis jeg flytter filen (test1.txt) til et andet katalog er der ingen problemer.

Blady
Avatar billede ducks Nybegynder
17. maj 2002 - 15:39 #10
hmm lyder mystisk altså når du henter det sletter den det samtidig?

prøv at skrivebeskytte den
Avatar billede blady Nybegynder
17. maj 2002 - 16:02 #11
ducks>> det kan jeg ikke for en form før den opretter den og det er ikke denne form der sletter indholdet i den, for hvis jeg laver en remark på anden formen altså der hvor jeg har problemer, ja så er indholdet der stadig!!!
Ja det er mystisk, men det er også derfor jeg henvender mig til eksperterne!!!...  :-)

Blady
Avatar billede blady Nybegynder
19. maj 2002 - 16:57 #12
Okay jeg prøver at finde denne løsning et andet sted!

Blady
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester