URGENT help converting IP from Long to String

[Thread1]

You may try my code, it's a lot simplier

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (pDst As Any, pSrc As Any, ByVal ByteLen As Long)

Private Function IPString(ByVal Value As Long) As String
Dim b(3) As Byte
  
  CopyMemory b(0), Value, 4&
  IPString = b(3) & "." & b(2) & "." & b(1) & "." & b(0)
  
  Erase b
  
End Function