Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Private Const SWP_NOMOVE = 2 Private Const SWP_NOSIZE = 1 Private Const Flags = SWP_NOMOVE Or SWP_NOSIZE Private Const HWND_TOPMOST = -1 Private Const HWND_NOTOPMOST = -2 Private Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long Public Sub SetWindowOnTop(ByVal p_hWnd As Long, Optional ByVal p_bOnTop As Boolean = True) If p_bOnTop Then Call SetWindowPos(p_hWnd, HWND_TOPMOST, 0, 0, 0, 0, Flags) Else Call SetWindowPos(p_hWnd, HWND_NOTOPMOST, 0, 0, 0, 0, Flags) End If End Sub Calling it like this: Call SetWindowOnTop(Me.hWnd, True)
|VB6 / DAO 3.6 / run time error: Couldn't find installable ISAM||7||114|
|Paint/Redraw window while dragging||16||85|
|VBA: copy range dynamically based on config sheet v2||3||55|