Cut text x spaces

[stevwolf]

I have the following text...

Last logon for Jsmith was from mightymouse on Tue Jan 22 2013 at 10:32 AM

I can get it into a file using autoit, but what I would like is to be able to only put some text in a file.

How do I cut the text at say the 8th space and put the rest into a variable.

eg I just want the text "Tue Jan 22 2013 at 10:32 AM" which of course will change all the time based on date.

I will take the text and then put it in a variable which I will write out to a file.

I have looked at various helps and tried a number of things but cant seem to find what I want. I am not a programer but pretty good at taking other peoples scripts and using them for my own use.

Thanks.

[BrewManNH]

Using a non-RegEx version of the string functions, you can do it this way.

$String = "Last logon for Jsmith was from mightymouse on Tue Jan 22 2013 at 10:32 AM"
ConsoleWrite(StringMid($String, StringInStr($String, " ", 0, 8) + 1) & @CRLF) ; prints out the string from the 8th space char plus one to the end of the string

[stevwolf]

;You have moved me along a considerable amount.

;However its not quite working the way I think it should.

I run this command that gives me the sentence that I mention in my OP.

It all runs fine, including your component. Accpet for these things.

I had to change the number from 8 to 15. This seems to cut the string where I want it.

When I run it without the Second msgbox the debug window shows the right edited string.

However when I add the second msgbox the output to the msgbox is 31. I dont get that.

RunWait(@ComSpec & " /c C:WindowsSystemtruelast.exe jsmith >> C:tempa.log" ,"",@SW_HIDE)

$OutPut = FileRead( "c:temp" & "a.log",FileGetSize("c:temp" & "a.log")) ; Puts into varable

FileDelete( "c:temp" & "a.log") ; Once its in a varable now delete the file.

MsgBox(4096, "Results", $OutPut ) ; Test to see if the variable is there.

$NewOut=ConsoleWrite(StringMid($OutPut, StringInStr($OutPut, " ", 0, 15) + 1) & @CRLF)

MsgBox(4096, "Results", $NewOut ) ; Test to see if the variable is there.

Regards

Shalom

Edited January 22, 2013 by stevwolf

[JohnQSmith]

#include <String.au3>
$string = "Last logon for Jsmith was from mightymouse on Tue Jan 22 2013 at 10:32 AM"
$result = StringStripWS(_StringReverse(StringLeft(_StringReverse($string), StringInStr(_StringReverse($string)," ",0,7))), 3)
ConsoleWrite($result & @CRLF)

Never mind... basically the same solution as BrewManNH.

Edited January 22, 2013 by JohnQSmith

[JohnQSmith]

However when I add the second msgbox the output to the msgbox is 31. I dont get that.

That's because what you're printing in your second MsgBox is the return code from the ConsoleWrite command, which is the number of characters written to the console at your line...

$NewOut=ConsoleWrite(StringMid($OutPut, StringInStr($OutPut, " ", 0, 15) + 1) & @CRLF)

Edit: I hate how when you paste text, it sometimes adds the font strings and colors. I need to remember to do a "Paste as plain text" from Chrome.

Edited January 22, 2013 by JohnQSmith

[kylomas]

stevwolf,

This works, however, it depend on the string format remaining constant.

; create test file

local $str = 'Last logon for Jsmith was from mightymouse on Tue Jan 22 2013 at 10:32 AM'
filewrite(@scriptdir & '\a.log',$str)

;RunWait(@ComSpec & " /c C:\Windows\System\truelast.exe jsmith >> C:\temp\a.log" ,"",@SW_HIDE)

;$OutPut = FileRead( "c:\temp" & "\a.log")                                              ; < ---------------- This will populate your variable
$OutPut = FileRead(@scriptdir & "\a.log")                                               ; < ---------------- This will populate your variable

FileDelete(@scriptdir & "\a.log") ; Once its in a varable now delete the file.

MsgBox(4096, "Results", $OutPut ) ; Test to see if the variable is there.

$NewOut=StringMid($OutPut, StringInStr($OutPut, " ", 0, 8) + 1)                         ; <------------ create $NewOut with partial string
ConsoleWrite($NewOut & @CRLF)                                                           ; <------------ This will write to the console

MsgBox(4096, "Results", $NewOut )                                                       ; <------------ This will write it to a msgbox

kylomas

[stevwolf]

Thanks all that helped a lot.