Displaying the value of a variable on a form (1 Viewer)

Hi all,

I would like to display the status of the network connection on a form.

Here is what I have done so far:

1. I put this code in the (General) section of my form:


Then, i created a text box (TextNetwSTS) where I would like the status displayed (UP or DOWN) and in it code, I put:


Disappointing result: the text box remains blank.

Any idea what I did wrong?

Thanks a lot!

I am pretty sure that


Is not understood by Access - where did you find this ?

1 word: Scope.

Variables are not eternal and ephermal, they exist within certain parameters. While both your functions have variables called 'Network_Cnx', they are 2 different variables and cease to exist once a function/sub hits its End statement.

ConnectionStatus assigns a value to Network_Cnx, but does nothing with it.
TextNetwSTS_BeforeUpdate uses Network_Cnx, but never assigns it a value.

You need to bridge the gap. Either move the code from ConnectionStatus into TextNetwSTS_BeforeUpdate. Or make ConnectionStatus a function which returns a value and call it from TextNetwSTS_BeforeUpdate.

This post might help
http://www.vbaexpress.com/forum/showthread.php?42466-Pinging-IP-addresses-in-Access-2007

you should call Connection_Status first before you assign the value:

Private Sub TextNetwSTS_BeforeUpdate(Cancel As Integer)
Call Connection_Status
TexNetwSTS.Value = Network_Cnx.Value
End Sub