Code for form works on desktop but not on Network Drive

[crimedog]

I have a form - that uses a combobox to open form number 2 @ a specific record. It works great on my C: drive - but when I copy it onto the Network Drive it just goes to the first record every time (unless it is 0 - then it open new record like it is supposed to:

Dim VarID As Integer
VarID = Me.Combo18
If VarID = 0 Then
    DoCmd.OpenForm "00_360_Request_360", , , , , acHidden
    DoCmd.GoToRecord acDataForm, "00_360_Request_360", acNewRec
    DoCmd.OpenForm "00_360_Request_360", , , , , acDialog
ElseIf VarID > 0 Then
    DoCmd.OpenForm "00_360_Request_360", , , , , acHidden
    DoCmd.FindRecord VarID, , True, , True
    DoCmd.OpenForm "00_360_Request_360", , , , , acDialog
    
End If
DoCmd.Close acForm, Me.Name

I do not know what is wrong. Also the first time I copied te front end over - you had to click twice on the Command button. The second time I copied it - it worked...

[ranman256]

You dont do it this way...(not open form, find, openform)

you open the form once, to the exact record
DoCmd.OpenForm "00_360_Request_360",,,"[varid]= " & combo18

[crimedog]

That fixed it