WMI script help

I have this script and it works fine.

On Error Resume Next
arrComputers = Array ("192.168.0.5",_
"192.168.0.6")

For Each strComputer In arrComputers
    WScript.Echo
    WScript.Echo "===================================="
    WScript.Echo "IP Address: "& strComputer
    WScript.Echo "===================================="

Wscript.Echo""
Wscript.Echo""
Wscript.Echo "Computer System Information"
Wscript.Echo "_____________________________________________________"

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery( _
    "SELECT * FROM Win32_ComputerSystem",,48)
For Each objItem in colItems
    Wscript.Echo ""
    Wscript.Echo  "Computer Name: " & objItem.Name
Next

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery( _
    "SELECT * FROM Win32_ComputerSystem",,48)
For Each objItem in colItems
    Wscript.Echo "Manufacturer: " & objItem.Manufacturer
Next

Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery( _
    "SELECT * FROM Win32_ComputerSystem",,48)
For Each objItem in colItems
    Wscript.Echo "Model: " & objItem.Model
Next

Next

My question is, is there a way to get it to pull the ip's for the array from a text file or csv?