I have a remote NT server that automatically sends data to a central NT
Server.
My app works ok until the screen saver kicks in, which is password
protected (and needs to be).
So to counter this problem I put this piece of code in, but I don't know a
way to pass the NT Server password.

Can anyone please help

Regards

Chris Davis

Private Const SPI_SCREENSAVERRUNNING = 97&

Private Declare Function SystemParametersInfo Lib "User32" _
          Alias "SystemParametersInfoA" _
         (ByVal uAction As Long, _
          ByVal uParam As Long, _
          lpvParam As Any, _
          ByVal fuWinIni As Long) As Long

         Dim lRet As Long
         Dim bOld As Boolean

        'bstate is set to to true or false

         lRet = SystemParametersInfo(SPI_SCREENSAVERRUNNING, bState, bOld,
0&)