Function virker ikke mere

this doesnt look right.

lngX As Long
Then
lngX = apiGetComputerName(strCompName, lngLen)

What does apiGetComputerName return?

You can also try left(strCompName, lngLen)
(without $)

OK, had another look and teh code seems OK, but I think you can remove $ from left still.

Try compiling the program. Quit eoften IF you have a MISSING reference then it will give strange side effects such as this. IF you get an error when compiling then this should give an indication to the problem.

.

i have narrowed it down a bit, it isn't the code displayed here that is triggin the error, it seems to my error handling:
NOT working:
Function report_error(mask, LOgin, Form, Err, felt)
Dim CONN As ADODB.Connection
Set CONN = CurrentProject.Connection
CONN.Execute "exec sp_Error  " & "'" & Form & "'," & "'" & Err & "'," & "'" & mask & "'," & "'" & LOgin & "'," & "'" & felt & "'"
Set CONN = Nothing
End Function

Working:
Function report_error(mask, LOgin, Form, Err)
Dim CONN As ADODB.Connection
Set CONN = CurrentProject.Connection
CONN.Execute "exec sp_Error  " & "'" & mask & "'," & "'" & LOgin & "'," & "'" & Form & "'," & "'" & Err & "'"
Set CONN = Nothing
End Function

Function report_error(mask, LOgin, Form, Err)

Its an idea to declare the data types! ALSO "form" should NOT be used as a variable name as it is alreday used by Access, and Err is too

Function report_error(mask as string, LOgin as string ,YourForm as  Form, YourErr as ?)

If you place

Option Explicit

at the top of each module and code in the form then you will get an error if a variable is not declared.

IF you think it is this code the comment it out and see if it works

that was how i found out

OK, so correct the things I mentioned and go from there, one step at a time :o)

I would look at ALL your variable names! Login is more than likley reserved too

I will do just that and thanx

selv thanks :o)

just for your information,

if I name a function left, it has an impact on everything that has to do with left..... strange Hu... :O)
NOT

More than likely, left is a VBA function alreday so when you have your own left function which one gets performed?

I'm glad I don't have a loaded gun in the house, Chances are that I would have issued a death penalty on myself. *lol*