# -*- coding: UTF-8 -*-
 
require 'watir-webdriver'
 
browser = Watir::Browser.new
browser.goto('http://foro.elhacker.net/login.html')
browser.text_field(:name => "user").set "test"
browser.text_field(:name => "passwrd").set "test"
browser.button(:value => "Ingresar").click
# browser.close
 
__END__

DIM IE
DIM ipf
 
Set IE = CreateObject("InternetExplorer.Application")
IE.navigate "http://zip4.usps.com/zip4/citytown.jsp"
IE.Visible = True
 
While IE.Busy
     WScript.Sleep 50
Wend
 
Set ipf = IE.document.all.getElementByID("city")
ipf.Value = "redmond" 'fill in the text box
Set ipf = IE.document.all.state
ipf.Value = "WA" 'fill in the text box
Set ipf = IE.document.all.Submit
ipf.Click    'click the submit button
'IE.Quit

# -*- coding: UTF-8 -*-
 
require 'watir-webdriver'
 
if not ARGV.empty? then FILE = ARGV[0] else FILE = 'C:\Windows\Login.txt' end
 
File.open(FILE, 'r+').each_line do |line|
    if line['URL'] then $URL = line.split('=').last.chomp end
    if line['USER_TYPE'] then $USER_TYPE = line.split('=').last.chomp.to_sym end
    if line['USER_NAME'] then $USER_NAME = line.split('=').last.chomp end
    if line['USER_TEXT']  then $USER_TEXT = line.split('=').last.chomp end
    if line['PASS_TYPE'] then $PASS_TYPE = line.split('=').last.chomp.to_sym end
    if line['PASS_NAME'] then $PASS_NAME = line.split('=').last.chomp end
    if line['PASS_TEXT']  then $PASS_TEXT  = line.split('=').last.chomp end
    if line['BUTTON1_TYPE']  then $BUTTON1_TYPE  = line.split('=').last.chomp.to_sym end    	
    if line['BUTTON1_NAME'] then $BUTTON1_NAME = line.split('=').last.chomp end
    if line['BUTTON2_TYPE']  then $BUTTON2_TYPE  = line.split('=').last.chomp.to_sym end    
    if line['BUTTON2_NAME'] then $BUTTON2_NAME = line.split('=').last.chomp end
end
 
print "
 
INFO:
 
[+] URL:
    #{$URL}
 
[+] Usuario:
    Atributo = #{$USER_TYPE}
    Nombre   = #{$USER_NAME}
    Texto    = #{$USER_TEXT}
 
[+] Contraseña:
    Atributo = #{$PASS_TYPE}
    Nombre   = #{$PASS_NAME}
    Texto    = #{$PASS_TEXT}
 
[+] Botón 1:
    Atributo = #{$BUTTON1_TYPE}
    Nombre   = #{$BUTTON1_NAME}
 
[+] Botón 2:
    Atributo = #{$BUTTON2_TYPE}
    Nombre   = #{$BUTTON2_NAME}
 
"
 
browser = Watir::Browser.new
browser.goto($URL)
browser.text_field($USER_TYPE => $USER_NAME).set $USER_TEXT
browser.text_field($PASS_TYPE => $PASS_NAME).set $PASS_TEXT
browser.button($BUTTON1_TYPE=> $BUTTON1_NAME).click
browser.button($BUTTON2_TYPE=> $BUTTON2_NAME).click
#browser.close
 

# Valores para XXXX_TYPE: id, title, name, tag_name, value, index, text, etc...
# Importante: No dejar espacios en las líneas entre el caracter "="

URL=http://foro.elhacker.net/login.html

USER_TYPE=name
USER_NAME=user
USER_TEXT=test

PASS_TYPE=name
PASS_NAME=passwrd
PASS_TEXT=test

BUTTON1_TYPE=tag_name
BUTTON1_NAME=Ingresar

BUTTON2_TYPE=tag_name
BUTTON2_NAME=By Elektro H@cker

navegante.exe "C:\carpeta\mis _datos_de_acceso.txt"