Choose last line in a .txt file to add a entry ?

[tobi]

Hi everybody !

I am trying to add one entry to the services file in C:\...\system32\drivers\etc .

i open this file with notepad and i use the send command to add some more lines.

my problem is that i cant find out how add my lines behind the existing lines...

Here is the code i use:

RunAsSet ( "administrator",@Computername, "****", 1 )

Run( "Notepad.exe C:\WINDOWS\system32\drivers\etc\services", "C:\Windows", @SW_MAXIMIZE)

WinWaitActive("services - Notepad")

Send("bla bla bla")

WinClose("services - Notepad")

WinWaitActive("Notepad")

Send("!n")

RunAsSet ()

I also tried it with FileWriteLine and then it automatically adds my stuff at the end of the existing lines. But i couldnt use this script with RunAsSet, which is requiered.

have anyone some ideas to help me ?

Thx in advance

br, Tobi

[BigDod]

Hi everybody !

I am trying to add one entry to the services file in C:\...\system32\drivers\etc .

i open this file with notepad and i use the send command to add some more lines.

my problem is that i cant find out how add my lines behind the existing lines...

Here is the code i use:

RunAsSet ( "administrator",@Computername, "****", 1 )

Run( "Notepad.exe C:\WINDOWS\system32\drivers\etc\services", "C:\Windows", @SW_MAXIMIZE)

WinWaitActive("services - Notepad")

Send("bla bla bla")

WinClose("services - Notepad")

WinWaitActive("Notepad")

Send("!n")

RunAsSet ()

I also tried it with FileWriteLine and then it automatically adds my stuff at the end of the existing lines. But i couldnt use this script with RunAsSet, which is requiered.

have anyone some ideas to help me ?

Thx in advance

br, Tobi

Try

RunAsSet ( "administrator",@Computername, "****", 1 )
Run( "Notepad.exe C:\WINDOWS\system32\drivers\etc\services", "C:\Windows", @SW_MAXIMIZE)
WinWaitActive("services - Notepad")
Send("^{END}")
Send("{ENTER}")
Send("bla bla bla")
WinClose("services - Notepad")
WinWaitActive("Notepad")
Send("!n") 
RunAsSet ()

[Jos]

What about doing it without the need for Notepad:

RunAsSet ( "administrator",@Computername, "****", 1 )
Run(@comspec & " /c ECHO bla bla bla >> C:\WINDOWS\system32\drivers\etc\services", "C:\Windows", @SW_HIDE)
RunAsSet ()

[SmOke_N]

This worked for me:

RunAsSet( "administrator",@Computername, "****", 1 )
FileWriteLine(@SystemDir & '\drivers\etc\services', 'Testing---------------------------------------')
TestTheory()
RunAsSet()

Func TestTheory()
    Run( "Notepad.exe " & @SystemDir & "\drivers\etc\services", "C:\Windows", @SW_MAXIMIZE)
EndFunc

[cdkid]

In the latest beta, there's a UDF of mine called _FileWriteToLine, that's probably what you're lookin for.

~cdkid

[SmOke_N]

In the latest beta, there's a UDF of mine called _FileWriteToLine, that's probably what you're lookin for.

~cdkid

You don't need a UDF, it's a one liner.

[Valuater]

In the latest beta, there's a UDF of mine called _FileWriteToLine, that's probably what you're lookin for.

~cdkid

ooohhh... your in the beta... way to go cdkid

8)

[SmOke_N]

ooohhh... your in the beta... way to go cdkid

8)

I didn't comprehend that!! WTG!! (P.S., I did like the UDF)

[cdkid]

thanks

~cdkid

[Jos]

Seems your are all missing the issue that the OP needs elivated rights to do this, at least that what I assume since there is a RunASSet() in the original post.

Thats why I proposed the one-liner using Run().

Edited March 13, 2006 by JdeB