_ArrayTrim

[willywill 0]

Hi all,

I have a text file that has an array of IP addresses followed by the hostnames, like so:

10.20.0.1 ACB-HOST01

10.20.0.2 ACB-HOST02

10.20.0.3 ACB-HOST03

My script can search and locate the IP address, but I need to copy only the hostname to the clipboard, so I can rename the computer hostname and description. How can I trim the array, so that only the hostname is copied to the clipboard?

Thanks!

[rliiack 0]

Use a 2D array.

$array[0][0]=10.20.0.1

$array[0][1]=10.20.0.2

$array[0][2]=10.20.0.3

$array[1][0]=ACB-HOST01

$array[1][1]=ACB-HOST02

$array[1][2]=ACB-HOST03

[PsaltyDS 46]

Hi all,

I have a text file that has an array of IP addresses followed by the hostnames, like so:

10.20.0.1 ACB-HOST01

10.20.0.2 ACB-HOST02

10.20.0.3 ACB-HOST03

My script can search and locate the IP address, but I need to copy only the hostname to the clipboard, so I can rename the computer hostname and description. How can I trim the array, so that only the hostname is copied to the clipboard?

Thanks!

Many ways to skin that cat. Here's one:

#include <Array.au3> ; Only for _ArrayDisplay()

Global $avTest[3] = ["10.20.0.1 ACB-HOST01", _
    "10.20.0.2 ACB-HOST02", _
    "10.20.0.3 ACB-HOST03"]

_ArrayDisplay($avTest, "Before")

For $n = 0 to UBound($avTest) - 1
    $avTest[$n] = StringTrimLeft($avTest[$n], StringInStr($avTest[$n], " "))
Next

_ArrayDisplay($avTest, "After")

[willywill 0]

Getting there. my only problem is that I don't want to define them in the script directly for reasons that the IP list will change over time. Here is what I have:

$file = FileOpen("C:\dhcp\list.txt", 0)
$IPAddress = String(@IPAddress1)

; Check if file opened for reading OK
If $file = -1 Then
    MsgBox(0, "Error", "Unable to open file.")
    Exit
EndIf

; Read in lines of text until the EOF is reached
While 1
    $line = FileReadLine($file)
    Select
        Case @error = -1
            MsgBox (0, "Search Result", "End Of File was met")
            ExitLoop
        Case StringInStr($line, @IPAddress1)

            MsgBox (0, "Search Result", $line)
            ExitLoop
    EndSelect
WEnd

FileClose($file)

This works to a point of displaying the entire line that matches the IP address. Now I need to trim the fat to get to the hostname.

[boogieoompa 0]

Not meaning to oversimplify things but would StringSplit with a space delimter be super easy?

[willywill 0]

Simplifying is actually a very good idea. I'm a noob, so I'm learning it as I go. StringSplit with a comma delimiter would probably work. Haven't tried it though.

[willywill 0]

Something like:

$stdin = FileOpen("C:\dhcp\list.csv",0)
$stdout = FileOpen("C:\dhcp\listout.csv",2)
$host = String(@IPAddress1)

while 1
    $line = FileReadLine($stdin)
    if @error = -1 then ExitLoop
    if StringInStr($line,$host) Then
        $split = StringSplit($line, '\,', 0)
        FileWriteLine($stdout,$split[2])
        MsgBox(0,"Found",$host & " found:" & @crlf & $line & @CRLF & "result has been added to results.csv")
    EndIf
WEnd

[boogieoompa 0]

So does that mean it worked for you?

[willywill 0]

It did! Awesome!