Programming2007
Programmer
This is my code:
Private Sub getWebViewFiles(ByVal s As String)
Dim files As String()
Dim curDirectory As String()
Dim dirs As String()
curDirectory = Directory.GetFiles("C:\\SCoutline4")
dirs = System.IO.Directory.GetDirectories("C:\\SCoutline4")
Do Until (dirs.Length Is Not Null And curDirectory.Length is not null)
files = Directory.GetFiles(curDirectory & "*.htm")
Loop
End Sub
I tried changing the do until line to: ............Do until(dirs.Length != null) .............
But that doesn't work either. Can't really find the correct syntax for writing these types of expressions on the web. I usually write in C# but I have to write this in vb.net
Private Sub getWebViewFiles(ByVal s As String)
Dim files As String()
Dim curDirectory As String()
Dim dirs As String()
curDirectory = Directory.GetFiles("C:\\SCoutline4")
dirs = System.IO.Directory.GetDirectories("C:\\SCoutline4")
Do Until (dirs.Length Is Not Null And curDirectory.Length is not null)
files = Directory.GetFiles(curDirectory & "*.htm")
Loop
End Sub
I tried changing the do until line to: ............Do until(dirs.Length != null) .............
But that doesn't work either. Can't really find the correct syntax for writing these types of expressions on the web. I usually write in C# but I have to write this in vb.net