kidd escribiste:René Castillo escribiste:Pero nececito una opcion para linux ya q el script lo q hace es rellenar unos campos mediante el SetEditBox y para conectar a internet my $segundos = Navigate("
De antemano gracias
En Linux no te van a funcionar pues estos módoulos son específicos para Windows. Quizá si explicas el problema podríamos ayudarte a llegar a una solución alternativa para Linux.
Saludos
bueno lo q hago con mi script es que se conecte a internet y q llene unos campos mas
bueno, ak esta el scrpt
#!c:/perl/bin
#Iniciamos nuestros módulos
use Win32::OLE;
use Win32::SAM;
#Iniciamos nuestro navegador
StartIE();
#Cargamos la página de Mensajitos
my $segundos = Navigate("http://mxgxw.no-ip.com/mxgxw/mensajitos.php");
print "XXMensajitos tardo $segundos segundos en cargar.\n";
#Empieza la Peticion de Datos
print "Numero de Telefono \n";
$Telefono=<STDIN>;
print "Texto del Mensaje \n";
$Mensaje=<STDIN>;
print "Firma \n";
$Firma=<STDIN>;
#Llenamos los campos
SetEditBox("Telefono","$Telefono");
SetEditBox("Mensaje","$Mensaje");
SetEditBox("Firma","$Firma");
#Hacemos submit de la forma
$$segundos = ClickFormButton("enviar");
print "El Mensaje ha sido envado en: $segundos segundos \n";
#Salimos
exit(1);
Como se ve en el script se conecta a la pagina
http://mxgxw.no-ip.com/mxgxw/mensajitos.php y en esa es en la q tengo q llenar los campos
Gracias de antemano