Radimus gave me this code and it seems to work well so far.

code:
$wksta = 'workstation1'
? iif(RemoteAdmin($wksta),"Admin","Not Admin")

Function RemoteAdmin($wksta)
$RemoteRC=dir ('\\'+$wksta+'\'+'c$$'+'\.')
$remoteAdmin=iif(not @error,'1','0')
endfunction