Missing Reference Question

[ribhead]

Howdy, I'm in sort of a bind right now. Our I.T. Dept. "upgraded" our network and now several computers are missing a reference so I cannot use
Environ(COMPUTERNAME). The reference that is missing is Microsoft Windows Common Controls-2 6.0. If I know what reference is missing how do I (can I?) restore it.
Below is code that I found on one of PHV's posts but I'm not sure what to do with the information. Come on Jim I'm a supervisor not a computer guru.
Function ReferenceInfo()
Dim strMessage As String
Dim strTitle As String
Dim refItem As Reference
On Error Resume Next
For Each refItem In References
If refItem.IsBroken Then
strMessage = "Missing Reference:" & vbCrLf & refItem.FullPath
Else
strMessage = "Reference: " & refItem.Name & vbCrLf _
& "Location: " & refItem.FullPath
End If
Debug.Print strMessage
Next refItem
End Function

Any help would be much appreciated.

Thanks, Rib

Bartender:Hey aren't you that rope I threw out an hour ago?

Rope:No, I'm a frayed knot.

 

[PHV]

Take a look here:

http://support.microsoft.com/default.aspx?scid=kb;en-us;193366

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244

 

[ribhead]

PH I unclicked the reference that said "MISSING" and now it seems to be working fine. I guess I thought there was a lot more to it.

Thanks, Rib

Bartender:Hey aren't you that rope I threw out an hour ago?

Rope:No, I'm a frayed knot.

 

[PHV]

I unclicked the reference that said "MISSING"
And did the database compile properly ?

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ222-2244