G
Guest
Ok, here is my issue, I have an app. that works find on the Pocket PC but,
fails to create the files and folders on the emulator. Here is the code that
fails.
If Not Directory.Exists(Me.mstrDir) Then
Directory.CreateDirectory(Me.mstrDir)
End If
'
' if the database exists...
'
If File.Exists(Me.mstrDB) Then
'
' connect...
'
If Me.mConn.State = ConnectionState.Closed Then
Me.mConn.Open()
Else
'
' look for the .CSV files to import...
'
Dim bFound As Boolean = File.Exists(Me.mstrDir & "File1.csv")
bFound = bFound AndAlso File.Exists(Me.mstrDir & "File2.csv")
bFound = bFound AndAlso File.Exists(Me.mstrDir & "File3.csv")
bFound = bFound AndAlso File.Exists(Me.mstrDir & "File4.csv")
bFound = bFound AndAlso File.Exists(Me.mstrDir & "File5.csv")
Any ideals on how to correct this to work?
I am using VB.Net.
fails to create the files and folders on the emulator. Here is the code that
fails.
If Not Directory.Exists(Me.mstrDir) Then
Directory.CreateDirectory(Me.mstrDir)
End If
'
' if the database exists...
'
If File.Exists(Me.mstrDB) Then
'
' connect...
'
If Me.mConn.State = ConnectionState.Closed Then
Me.mConn.Open()
Else
'
' look for the .CSV files to import...
'
Dim bFound As Boolean = File.Exists(Me.mstrDir & "File1.csv")
bFound = bFound AndAlso File.Exists(Me.mstrDir & "File2.csv")
bFound = bFound AndAlso File.Exists(Me.mstrDir & "File3.csv")
bFound = bFound AndAlso File.Exists(Me.mstrDir & "File4.csv")
bFound = bFound AndAlso File.Exists(Me.mstrDir & "File5.csv")
Any ideals on how to correct this to work?
I am using VB.Net.