puts process.CommandLine

require 'win32ole'
 
wmi = WIN32OLE.connect("winmgmts://")
processes = wmi.ExecQuery("select * from win32_process")
for process in processes do
puts process.Caption
puts process.CommandLine
puts process.CreationClassName
puts process.CreationDate
puts process.CSCreationClassName
puts process.CSName
puts process.Description
puts process.ExecutablePath
puts process.ExecutionState
puts process.Handle
puts process.HandleCount
puts process.InstallDate
puts process.KernelModeTime
puts process.MaximumWorkingSetSize
puts process.MinimumWorkingSetSize
puts process.Name
puts process.OSCreationClassName
puts process.OSName
puts process.OtherOperationCount
puts process.OtherTransferCount
puts process.PageFaults
puts process.PageFileUsage
puts process.ParentProcessId
puts process.PeakPageFileUsage
puts process.PeakVirtualSize
puts process.PeakWorkingSetSize
puts process.Priority
puts process.PrivatePageCount
puts process.ProcessId
puts process.QuotaNonPagedPoolUsage
puts process.QuotaPagedPoolUsage
puts process.QuotaPeakNonPagedPoolUsage
puts process.QuotaPeakPagedPoolUsage
puts process.ReadOperationCount
puts process.ReadTransferCount
puts process.SessionId
puts process.Status
puts process.TerminationDate
puts process.ThreadCount
puts process.UserModeTime
puts process.VirtualSize
puts process.WindowsVersion
puts process.WorkingSetSize
puts process.WriteOperationCount
puts process.WriteTransferCount
end

wmi = WIN32OLE.connect("winmgmts://")
processes = wmi.ExecQuery("select * from win32_process")
for process in processes do
puts process.CommandLine
end

On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_ProcessStartup",,48)
For Each objItem in colItems
    Wscript.Echo "ShowWindow: " & objItem.ShowWindow
    Wscript.Echo "Title: " & objItem.Title
Next

require 'win32ole'
 
wmi = WIN32OLE.connect("winmgmts://")
processes = wmi.ExecQuery("Select * from Win32_ProcessStartup")
for process in processes do
puts process.ShowWindow
puts process.Title
end

#!/usr/local/bin/ruby
 
# WindowsNTŒn‚ÅCPU•‰‰×‚ƃ�ƒ‚ƒŠ•‰‰×‚ð‹L˜^‚·‚é
 
require "Win32API"
 
# ’²�¸ŠÔŠu[•b]
interval = 1
 
# CPU •‰‰×‚̎擾—p
NtQuerySystemInformation = Win32API.new('NTDLL', 'NtQuerySystemInformation', 'LPLP', 'I')
perfInfo = "\0\0\0\0" * 78
timeInfo = "\0\0\0\0" * 8
sysInfoLen = "\0\0\0\0"
 
# ƒ�ƒ‚ƒŠ�Á”ï‚̎擾—p
GlobalMemoryStatus = Win32API.new('kernel32','GlobalMemoryStatus','P','V')
memStruct = "\0\0\0\0" * 8
 
$regular = false
$formerIdle = 0
$formerTime = 0
while true
  # ƒAƒCƒhƒ‹ŽžŠÔ‚̎擾
  NtQuerySystemInformation.call(2, perfInfo, perfInfo.size, sysInfoLen)
  idle = perfInfo.unpack("L")[0]
  # ƒVƒXƒeƒ€ŽžŠÔ‚̎擾
  NtQuerySystemInformation.call(3, timeInfo, timeInfo.size, sysInfoLen)
  time = timeInfo.unpack("L3")[2]
  # �·•ª‚Å CPU •‰‰×‚ðŒvŽZ[%]
  cpuLoad = 100.0 - ((100.0 * (idle - $formerIdle)) / (time - $formerTime))
  if cpuLoad < 0 or cpuLoad > 100
    $regular = false
  end
  $formerIdle = idle
  $formerTime = time
 
  # ƒ�ƒ‚ƒŠ�Á”ï‚̎擾[%]
  GlobalMemoryStatus.call(memStruct)
  memLoad =memStruct.unpack("L2")[1]
 
  if $regular
    printf "time=%s cpu=%4.1f mem=%4.1f\n", \
      Time.now.strftime("%H:%M:%S"), cpuLoad, memLoad
  else
    $regular = true
  end
 
  sleep interval
end

If $archivo ABIERTO POR $cualquier_programa_de_windows
 Sleep 01
elsif
 mover $archivo a...
end

def Access(source_file, dest_file)
 begin
  ENV['tmp'] = $archivo.split('\\').last.split('.').first
  'cheat environment_variables --add'
 
  # CÓDIGO ORIGINAL:
  # system('start /b /MIN cmd /C Tasklist /v | Find "%tmp:~10%" >NUL')
  # ESTA PARTE HAY QUE MEJORARLA PARA QUE NO SE VEA LA CONSOLA
 
   system('Title MOVEMEBYELEKTRO & NirCMD win hide ititle "MOVEMEBYELEKTRO" & Tasklist /v | Find "%tmp:~10%" >NUL')
 
until $?.exitstatus.eql? 1 or $?.exitstatus.eql? 0
    sleep 0.1
end
 
   if $?.exitstatus.eql? 0
      reintentar($archivo.encode('utf-8').gsub("\û", "-"), ARGV[0])
   end
 
   if $?.exitstatus.eql? 1
      FileUtils.mv $archivo.encode('utf-8').gsub("\û", "-"), ARGV[0]
   end
 
 rescue
   reintentar($archivo.encode('utf-8').gsub("\û", "-"), ARGV[0])
 end
end

 until...

def Access(source_file, dest_file)
 ENV['tmp'] = $archivo.split('\\').last.split('.').first
 'cheat environment_variables --add'
 
 $shell.ShellExecute('CMD', '/C Tasklist /v | Find "%tmp:~10%">c:/Windows/temp/moveitexitcode.txt', '', '', 0)
 
 until File.exist?('c:\Windows\temp\moveitexitcode.txt').eql? true
 end
puts File.zero?('c:\Windows\temp\moveitexitcode.txt')
 
  if File.zero?('c:\Windows\temp\moveitexitcode.txt').eql? false
 
     reintentar($archivo.encode('utf-8').gsub("\û", "-"), ARGV[0])
 end
 
   if File.zero?('c:\Windows\temp\moveitexitcode.txt').eql? true
     FileUtils.mv $archivo.encode('utf-8').gsub("\û", "-"), ARGV[0]
  end
 
 
begin
File.delete('c:\Windows\temp\moveitexitcode.txt')
rescue Errno::EACCES
retry
end
end