65182
May 28, 2008, updated at 09:26:16 (UTC)
3648
1
0
vb6 codes unter vb 2008 express
Hallo,
ich habe hier diesen Quellcode unter vb 6 geschrieben:
Nun wollte ich, da ich zuhause vb 2008 benutze den Quellcode dort einfügen doch er erkennt den Befehl "open datei for input as #1"
weiß jemand wie ich das ungefähr in vb 08 schreiben müsste?
MfG justina
ich habe hier diesen Quellcode unter vb 6 geschrieben:
open [Datei] for input as #1
do
line input #1, a
b=split(a, ";")
c=b(0)
beschreibung=b(1)
if c="VD00654" then ...
loop until eof(1)
Nun wollte ich, da ich zuhause vb 2008 benutze den Quellcode dort einfügen doch er erkennt den Befehl "open datei for input as #1"
weiß jemand wie ich das ungefähr in vb 08 schreiben müsste?
MfG justina
Please also mark the comments that contributed to the solution of the article
Content-Key: 88604
Url: https://administrator.de/contentid/88604
Printed on: April 24, 2024 at 01:04 o'clock
1 Comment
Dim fr as System.IO.StreamReader = My.Computer.Filesystem.OpenTextFileReader([Datei])
do while fr.endofstream = false
dim strLine as string = fr.ReadLine()
dim strSplittedLine() as string = strLine.Split(";")
dim c as string = strSplittedLine(0)
dim beschreibung as string = strSplittedLine(1)
if c = "VD00654 Then
'do something
end if
loop
so ist zwar ungetestet, müßte aber eigentlich so hinhauen ;)