[vb6] Wegschrijven teksten naar bestand

Pagina: 1
Acties:

  • TweakersOnly
  • Registratie: September 2000
  • Laatst online: 03:09
In VB6 wil ik een in een applicatie een logboek bijhouden. Ik heb hiervoor de volgende code.


Visual Basic:
1
2
3
4
5
dim strGebruiker as string
strGebruiker = "test12345"
Open App.Path & "\logboek.txt" For Append As #2
Write #2, strGebruiker
Close #2

Als ik in de tekstfile kijk dan staat er "test12345". De kootjes om de variabelenaam wil ik echter niet meenemen, er moet dus test12345 in het bestand komen te staan. Via de search kon ik mijn probleem niet achterhalen. Weet iemand de wellicht heel simpele oplossing voor dit probleem?

  • Exterazzo
  • Registratie: Mei 2000
  • Laatst online: 21:37

Exterazzo

Qeasy

Ipv van Write gebruik je Print, dus:

code:
1
Print #2, strGebruiker

[ Voor 45% gewijzigd door Exterazzo op 16-03-2004 16:14 ]

Audentia


  • ATS
  • Registratie: September 2001
  • Laatst online: 12-02 13:46

ATS

Nog een andere tip: ga er niet van uit dat filedescriptor #2 vrij is. Vraag gewoon aan het systeem om een vrije descriptor. Wat iets van van FileFree() ofzo (lang geleden...)

My opinions may have changed, but not the fact that I am right. -- Ashleigh Brilliant


  • farlane
  • Registratie: Maart 2000
  • Laatst online: 22-05 16:53
ATS schreef op 16 maart 2004 @ 23:10:
Nog een andere tip: ga er niet van uit dat filedescriptor #2 vrij is. Vraag gewoon aan het systeem om een vrije descriptor. Wat iets van van FileFree() ofzo (lang geleden...)
Bijna :) FreeFile is het

Somniferous whisperings of scarlet fields. Sleep calling me and in my dreams i wander. My reality is abandoned (I traverse afar). Not a care if I never everwake.


  • muba
  • Registratie: April 2002
  • Laatst online: 19-10-2013

muba

Prince of Persia!

het wordt dat idd iets als dit:

code:
1
2
3
4
5
6
dim log%
log% = freefile;
(...)
Open App.Path & "\logboek.txt" For Append As log%
Write log%, strGebruiker
Close log%

Reporter: Mister Gandhi, what do you think of western civilisation?
Gandhi: I think it would be a good idea


  • Exterazzo
  • Registratie: Mei 2000
  • Laatst online: 21:37

Exterazzo

Qeasy

MUBA schreef op 17 maart 2004 @ 11:46:
het wordt dat idd iets als dit:

code:
1
2
3
4
5
6
dim log%
log% = freefile;
(...)
Open App.Path & "\logboek.txt" For Append As log%
Write log%, strGebruiker
Close log%
Volgens mij wordt het dan om precies te zijn dit:
code:
1
2
3
4
5
6
Dim FF As Integer
FF = FreeFile
(...)
Open App.Path & "\logboek.txt" For Append As #FF
Print #FF, strGebruiker
Close #FF

Audentia


  • pjonk
  • Registratie: November 2000
  • Laatst online: 29-12-2025
Die % suffix is een overblijfsel uit de oude basic tijd om aan te geven van welk type een variabele is:
% = integer, & = long, $ = string, # = double

De rest kun je die wel in de documentatie terugvinden ;)

It’s nice to be important but it’s more important to be nice

Pagina: 1