Open "TextFile.text" For Output As #1 ?????

[old Hippy]

hallo allemaal

Waarom werkt dit niet in vb2008

 [COLOR="red"]Open[/COLOR] "TextFile.text" [COLOR="red"]For[/COLOR] Output As [COLOR="red"]#[/COLOR]1
  Print [COLOR="red"]#[/COLOR]1, "Hallo!"
  Print [COLOR="red"]#[/COLOR]1,
  Print [COLOR="red"]#[/COLOR]1, "Dit is een voorbeeld van tekst die is geschreven met Print."
Close [COLOR="red"]#[/COLOR]1

Open Kan niet als exspression gebruikt worden
For exspression expected
# exspression expected

Heeft iemand een oplossing

 

[Jedi]

Is het niet .txt ipv .text ?

 

[kabourterplop]

Omdat het geen .NET code is

 

[old Hippy]

hi Jedi en kabourterplop
bedankt voor de reactie

O.k met .txt werkt het ook niet de codes die ik al heb uitgeprobeerd komen van www.vbwereld.nl

maar wat ik ook doe de fout begind met Open.
Bv. Open "c:\tekstbestand.txt" For Input As #filenum Werk ook niet eigenlijk geen van al die code. Ze lopen vast met Open
dus hoe open ik dit in vb2008?????
hoe krijg ik toegang.?????

 

[kabourterplop]

Zo kan je een bestand uitlezen:

Dim sr As New Io.StreamReader(PathToFile)

Dim txt as string = sr.readToEnd

msgbox(txt)

 

[old Hippy]

Ok dat werkt
maar hoe schrijf je naar dat bestand???

Ik wil een doc bestand openen en daar data in weg schrijven.
zo als je in word brieven of etiketten kan maken.

 

[kabourterplop]

Het schrijven naar een .doc file is niet zo eenvoudig als de hieronder genoemde manier voor het schrijven naar een .txt bestand. Om te schrijven naar een .doc moet je ff googlen.

dim sr as new io.streamreader(PathToFile)
dim text as new string = sr.readtoend()
sr.flush()
sr.close()

dim sw as new io.streamwriter(PathToFile)
sw.write(text & vbnewline & joutekst)
sw.flush()
sw.close()

 

[old Hippy]

ik denk dat ik het op een andere manier moet gaan doen

en een access db moet gaan maken en deze aan een word doc hangen.
het doc vanuit vb opstarten en de data vanuit vb invoeren of zo
maar ik moet uit gaan zoeken hoe ik met een access moet werken in vb2008
ben wel weer een tijtje van de weg en uit de kroeg.

in ieder geval hartelijk bedankt voor het mee denken
ben weer een stuk wijzer geworden.