VS.NET 7, Strict=ON, VB problem

[Marc Champagne]

Hi folks,

With the following code sample in a window's form (VB.NET
7)...
Structure CustomerRecord
<VBFixedString(12)> Public IDee As String
<VBFixedString(45)> Public Name As String
End Structure

Shared CusRec As CustomerRecord
Shared Cust(500) As CustomerRecord

Private Sub GetRecs()

Dim File As Integer
Dim Num As Integer = 0
Dim CustFile As String = "c:\cust.txt"

File = FreeFile()
FileOpen(File, CustFile, _
OpenMode.Random, , ,Len(CusRec))

While (Not EOF(File))
FileGet(File, CusRec) <<< problem is here
Cust(Num) = CusRec
Num = Num + 1
End While

FileClose(File)

End Sub
Using VS.NET 7, When Strict is ON, I am unable to get the
above to work, any ideas as to how I get it to work?

Type casting maybe? (if so, I'm unable to find the right
syntax)
The Task List shows the following:

Overload resolution failed because no accessible 'FileGet'
can be called with these arguments:

Many Thanks!

Marc

[AlexB]

I'm not certain but option Strict may not like the old vb
file access functions. You may need to use the new .net
file classes. I'll be rewriting your code with the
classes in system.io.file will resolve the problem.

Good luck.

-----Original Message-----
Hi folks,

With the following code sample in a window's form (VB.NET
7)...
Structure CustomerRecord
<VBFixedString(12)> Public IDee As String
<VBFixedString(45)> Public Name As String
End Structure

Shared CusRec As CustomerRecord
Shared Cust(500) As CustomerRecord

Private Sub GetRecs()

Dim File As Integer
Dim Num As Integer = 0
Dim CustFile As String = "c:\cust.txt"

File = FreeFile()
FileOpen(File, CustFile, _
OpenMode.Random, , ,Len(CusRec))

While (Not EOF(File))
FileGet(File, CusRec) <<< problem is here
Cust(Num) = CusRec
Num = Num + 1
End While

FileClose(File)

End Sub
Using VS.NET 7, When Strict is ON, I am unable to get the
above to work, any ideas as to how I get it to work?

Type casting maybe? (if so, I'm unable to find the right
syntax)
The Task List shows the following:

Overload resolution failed because no accessible 'FileGet' can be called with these arguments:

Many Thanks!

Marc
.

[Marc Champagne]

"AlexB" <an*******@discussions.microsoft.com> wrote in
news:00****************************@phx.gbl:

-----Original Message-----
Hi folks,

With the following code sample in a window's form (VB.NET
7)...
Structure CustomerRecord
<VBFixedString(12)> Public IDee As String
<VBFixedString(45)> Public Name As String
End Structure

Shared CusRec As CustomerRecord
Shared Cust(500) As CustomerRecord

Private Sub GetRecs()

Dim File As Integer
Dim Num As Integer = 0
Dim CustFile As String = "c:\cust.txt"

File = FreeFile()
FileOpen(File, CustFile, _
OpenMode.Random, , ,Len(CusRec))

While (Not EOF(File))
FileGet(File, CusRec) <<< problem is here
Cust(Num) = CusRec
Num = Num + 1
End While

FileClose(File)

End Sub
Using VS.NET 7, When Strict is ON, I am unable to get the
above to work, any ideas as to how I get it to work?

Type casting maybe? (if so, I'm unable to find the right
syntax)
The Task List shows the following:

Overload resolution failed because no accessible 'FileGet'

can be called with these arguments:

Many Thanks!

Marc

I'm not certain but option Strict may not like the old vb
file access functions. You may need to use the new .net
file classes.
I tried to understand them, but my head just won't give in :)

For the time being, I turn strict-ON, adjust the code to
comply (to the exception of fileget) and then turn back
strict-OFF.
I'll be rewriting your code with the
classes in system.io.file will resolve the problem.

I don't understand what your are saying here.

Thanks

--
Marc Champagne
marcch.AT.videoSPAMNOTtron.DOT.ca.invalid
Montreal, Canada