S
Sean
Hello All,
I'm in need of some serious help. I've got an Access 2000
database that I inherited, that I've been heavily
modifying. Everything has been working fine, but now on
two of ten machines I get an error on the following code.
The error is project or library not found. The line is the
environ(indx) line. If I create a brand new database and
then import in my module, it runs fine. On my machine and
many others, everything is fine. So far it is just two
computers that are giving me fits. Does anyone have a clue?
Sean
Do
EnvString = Environ(Indx) ' Get environment
' variable.
If Left(EnvString, 9) = "USERNAME=" Then ' Check
PATH entry.
usrname = Right(EnvString, Len(EnvString) - 9)
dne = 1
Exit Do
Else
Indx = Indx + 1 ' Not PATH entry,
End If ' so increment.
Loop Until EnvString = ""
I'm in need of some serious help. I've got an Access 2000
database that I inherited, that I've been heavily
modifying. Everything has been working fine, but now on
two of ten machines I get an error on the following code.
The error is project or library not found. The line is the
environ(indx) line. If I create a brand new database and
then import in my module, it runs fine. On my machine and
many others, everything is fine. So far it is just two
computers that are giving me fits. Does anyone have a clue?
Sean
Do
EnvString = Environ(Indx) ' Get environment
' variable.
If Left(EnvString, 9) = "USERNAME=" Then ' Check
PATH entry.
usrname = Right(EnvString, Len(EnvString) - 9)
dne = 1
Exit Do
Else
Indx = Indx + 1 ' Not PATH entry,
End If ' so increment.
Loop Until EnvString = ""