Over 10 years we help companies reach their financial and branding goals. Engitech is a values-driven technology agency dedicated.

Gallery

Contacts

411 University St, Seattle, USA

engitech@oceanthemes.net

+1 -800-456-478-23

VBS Ping Reply Function Return

strComputer=”Example”

MsgBox PingReply

Function PingReply
Set objPing = GetObject(“winmgmts:{impersonationLevel=impersonate}”).ExecQuery(“select StatusCode from Win32_PingStatus where address = ‘” & strComputer & “‘ and Resolveaddressnames=true”)
For Each objStatus in objPing
If objStatus.StatusCode=0 Then
PingReply=True
Else
PingReply=False
End If
Next
Set objPing=Nothing
Set objStatus=Nothing
End Function

Angel Computers – Contact Us

More Posts

Quarterly Maintenance Audit: Why It’s Important.

At AngelCom, we preform quarterly maintenance audits that allow us to take a deeper look into a customer’s systems, setup, and hardware to ensure everything is functioning as intended. This comprehensive overview allows us to ensure your system is functioning as intended. Learn about why it’s so important here.

How Managed IT Services Can Reduce Costly Downtime

Instead of worrying about how much a period of downtime could cost you, it’s better to have a plan in place that can reduce and prevent it whenever possible. And a managed IT partner can help you devise such a strategy.

Why Is It Important to Have a Robust DNS Filter?

A robust suite of cybersecurity tools is a vital necessity for any business. Failing to protect your network and devices can have huge financial consequences. DNS filters are more than just a tool — they’re an investment in your business. Here’s how having your IT team set up a DNS filter can provide big benefits across your organization.