Retroceder   Foros del Web > Programación para sitios web > Perl y CGI

Respuesta
 
Herramientas Desplegado
Antiguo 04-jun-2002, 23:31   #1 (permalink)
Darwin está en el buen camino
 
Fecha de Ingreso: noviembre-2002
Mensajes: 4
Leanlo Por favor y ayudenme es PERL HTML ACCESS

Me llamo Darwin Marcelo y estoy en Colombia, tengo 14 años y estoy construyendo una pequeña pagina web y quiero crearle una seccion donde los usuarios se puedan inscribir y leyendo un manual decia que con perl se podia hacer esto entonces estoy pues aprendiendo perl pero no he podido lograr que atraves de un formulario en la pagina puedan ingresar los datos a una base de datos (Acess), hice el programita en perl y el lo hace si ejecuto el programa por DOS ya que tengo Windows, pero si llamo el programa desde el formulario no lo hace, el favor que les pido es el siguiente, que le falta a el programa en perl, no se si es lo del POST o algo asi, es que aun no he entendido muy bien esta parte, abajo coloco el codigo del programa en perl, este funciona atraves de DOS y el formulario que es muy sencillo son solo como 4 campos a llenar, algunas personas me han dicho algo sobre Apache pero no estoy muy seguro y pues no he buscado. Es que en realidad no se si debo colocarle otra instruccion al programita en perl, ya en mi equipo he colocado lo del ODBC...

Gracias por su colaboración.

Darwin Marcelo

---------------------------------------

use Win32::ODBC;
$base=new Win32::ODBC("DSN=BibVir");

print "Nombre : ";
chop($Nombre=<stdin>);
print "D.I. : ";
chop($DocIde=<stdin>);
print "Colegio : ";
chop($Colegio=<stdin>);
print "Codigo : ";
chop($Codigo=<stdin>);

print "Confirme su Codigo : ";
chop($CodConf=<stdin>);

if ($Codigo eq $CodConf)
{
$insercion="insert into Usuarios values ('$Nombre','$DocIde','$Colegio','$Codigo')";
$base->Sql($insercion);

open (salida, "Inscrito.html");
print salida "<html><head><title>Inscrit o</title></head>";
print salida "<body>Estas Inscrito</body></html>";
close (salida);
}

else { print "El Codigo es Diferente"; }

$base->Close();
Darwin está desconectado   Responder Citando
Antiguo 05-jun-2002, 12:41   #2 (permalink)
DanielRey está en el buen camino
 
Avatar de DanielRey
 
Fecha de Ingreso: noviembre-2002
Ubicación: Mendoza
Mensajes: 630
Enviar un mensaje por Yahoo  a DanielRey
Re: Leanlo Por favor y ayudenme es PERL HTML ACCESS

Hola Darwin :)

Todo programa perl que vaya a ser utilizado como CGI debe invariantemente llevar esta instrucción antes del primer print:
print "Content-type: text/html\n\n";
para que el explorador lo entienda.

Si además el servidor web es linux o unix, debes poner #!/bin/perl -w como primer línea para que sepa donde hallar el intérprete perl.

Además, la carpeta donde reside el archivo ".pl" debe tener permisos de ejecución.

Suerte ;)
DanielRey está desconectado   Responder Citando
Antiguo 05-jun-2002, 14:02   #3 (permalink)
Darwin está en el buen camino
 
Fecha de Ingreso: noviembre-2002
Mensajes: 4
Re: Leanlo Por favor y ayudenme es PERL HTML ACCESS

Epa viejo pero listo coloco eso y lo de la carpeta esa, mas o menos se por donde, pero dejo el resto como esta, por que el chop es para digitarlos y entrarlos por DOS pero como hago para que el tome esos datos de la pagina web. en alguna parte lei que depronto se hacia asi. no se... ayudeme, a y que quiere decir print "Content-type: text/html\n\n"; ...

----- El Codigo -----

print "Content-type: text/html\n\n";
use Win32::ODBC;
$base=new Win32::ODBC("DSN=BibVir");

$Nombre = $base->param ('Nombre');
$DocIde = $base->param ('DocIde');
$Colegio = $base->param ('Colegio');
$Codigo = $base->param ('Codigo');

if ($Codigo eq $Codigo)
{
$insercion="insert into Usuarios values ('$Nombre','$DocIde','$Colegio','$Codigo')";
$base->Sql($insercion);
}

else
{
print "El Codigo es Diferente";
}

$base->Close(); :) :) :)
Darwin está desconectado   Responder Citando
Respuesta

No hay votos aún.


Herramientas
Desplegado

Normas de Publicación
No puedes crear nuevos temas
No puedes responder temas
No puedes subir archivos adjuntos
No puedes editar tus mensajes

BB code is Activado
Caritas están Activado
[IMG] está Activado
Código HTML está Desactivado


La Zona horaria es GMT -6. Ahora son las 06:36.


Message Board Statistics

LinkBacks Enabled by vBSEO 3.1.0

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93