heres the code guys, feel free to take it apart. [Smile] you might want to know that i am a newbie at scripting [Big Grin]

servers.txt reference a list of server names
i.e.
server1
server2
server3
and so forth...

code:
  
$date = split(@date,"/")

$appname = $date[0] + $date[1] + $date[2] + "app.evt"
$secname = $date[0] + $date[1] + $date[2] + "sec.evt"
$sysname = $date[0] + $date[1] + $date[2] + "sys.evt"

open(1, "c:\scripts\servers.txt",2)	;change this txt file when adding servers

$server = readline(1)
while @error = 0
	if $server
		gosub "EventLog"
	endif

	$server = readline(1)
	
loop

exit

:EventLog
backupeventlog('\\' + $server + '\Application', '\\' + $server + '\evtlogs$\' + $appname)
? "app " @serror
backupeventlog('\\' + $server + '\Security', '\\' + $server + '\evtlogs$\' + $secname)
? "sec " @serror
backupeventlog('\\' + $server + '\System', '\\' + $server + '\evtlogs$\' + $sysname)
? "sys " @serror
and here is what it looks on the cmd prompt
app Access is denied.5
sec Access is denied.5
sys Access is denied.5
app Access is denied.5
sec Access is denied.5
sys Access is denied.5
app Access is denied.5
sec Access is denied.5
sys Access is denied.0
app The operation completed successfully.0
sec The operation completed successfully.0
sys The operation completed successfully.0
app The operation completed successfully.0
sec The operation completed successfully.0
sys The operation completed successfully.0
app The operation completed successfully.0
sec The operation completed successfully.0
sys The operation completed successfully.

Please advise.