From: Constantin Teodorescu <teo@flex.ro>
To: rony khoury <rkhoury@apotres.edu.lb>
Cc: PostgreSQL Interfaces <pgsql-interfaces@postgresql.org>
Subject: Re: [INTERFACES] heeeeeeeeeeeeelp meeeeeeeeeeee
Date: Mon, 29 Jun 1998 21:16:12 +0300
Message-ID: <3597D9EC.4BCAA2EC@flex.ro> (raw)
References: <3597D482.6C67EAF5@apotres.edu.lb>
rony khoury wrote:
>
> First I have redhat linux 5.0 running on my system , with it comes
> postgresql I got these
> to run fine on my system using psql as the interface .
I would recommend you to install RedHat 5.1 and updates because it has a
lot of things improved, even PostgreSQL libraries preinstalled.
> Now I tried a two steps procedure to do so , first is to conect from C
> to postgresql , and latter to
> use C modules as cgi called from browsers .
With PHP you will mix : HTML generator, database connection and form
processing.
It's just simple. Look over my examples that I have sent to you and you
will see how.
In PHP, you will find the form variables that you have defined a
previous HTML form as local variables.
Just use them and don't even think how they have been passed.
You might get some problems trying to compile PHP with PostgreSQL
support and apache with PHP module, but reading their README's will be
just fine. Just follow them. If you have some problems, just ask.
Apache 1.3.0 + PHP 3.0 would be a good choice.
Also ,Perl cgi's would be fine.
I am giving you here an example how to get form variables in Perl and
how to connect to PostgreSQL database.
#!/usr/bin/perl
use Pg;
$datele = <STDIN>;
@pairs = split(/&/, $datele);
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
# restore blank
$value =~ tr/+/ /;
# restore special char
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
# store them into associative array %VAR
chomp $value; $value =~ s/\r//;
$VAR{$name} = $value ;
}
# preluam cimpurile transmise in variabile
$nrfact = $VAR{'nrfact'};
$client = $VAR{'client'};
$valoare = $VAR{'valoare'};
$datafact = $VAR{'datafact'};
$continut = $VAR{'continut'};
$continut =~ s/'/\\'/g;
($zi,$luna,$an) = split(/\./,$datafact);
$datafact = $luna.'-'.$zi.'-'.$an;
# Acest rind este obligatoriu pentru inceput de HTML raspuns
print "Content-type:text/html\n\n";
print <<EOM;
<HTML>
<HEAD>
<TITLE>Emitere factura</TITLE>
</HEAD>
<BODY>
<H1>S-a emis urmatoarea factura</H1>
Factura cu numarul : $nrfact <br>
Data emiterii : $datafact <br>
Catre clientul : $client <br>
Valoarea facturii : $valoare <br><br>
EOM
$con=PQsetdb('',5432,'','','doc');
$res=PQexec($con,"select * from factemise where nrfact='$nrfact'");
$errmsg=PQerrorMessage($con);
if ($errmsg ne '') {
print "<B> Eroare select verificare dubluri<br>",$errmsg;
print "</body></html>\n";
PQclear($res); PQfinish($con);
exit 1;
}
if (PQntuples($res) > 0) {
print "<b>Eroare : Mai exista o factura cu numarul $nrfact<b>";
print "</body></html>\n";
PQclear($res); PQfinish($con);
exit 1;
}
PQclear($res);
$sqlcmd="insert into factemise (nrfact,datafact,client,valoare,
continut) values
('$nrfact','$datafact','$client','$valoare','$continut')";
#print $sqlcmd;
$res=PQexec($con,$sqlcmd);
$errmsg = PQerrorMessage($con);
if ( $errmsg ne '' ) {
print '<font color="#FF0000">';
print "<b>EROARE INSERT : MESAJ = ",$errmsg,"</b></font><br>";
} else {
print 'Inregistrarea a fost efectuata !';
}
print "</body></html>\n";
PQclear($res);
PQfinish($con);
--
Constantin Teodorescu
director FLEX Consulting Braila, ROMANIA
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Reply to all the recipients using the --to and --cc options:
reply via email
To: pgsql-interfaces@postgresql.org
Cc: teo@flex.ro, rkhoury@apotres.edu.lb
Subject: Re: [INTERFACES] heeeeeeeeeeeeelp meeeeeeeeeeee
In-Reply-To: <3597D9EC.4BCAA2EC@flex.ro>
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
This inbox is served by DDX for PostgreSQL; see mirroring instructions
for how to clone and mirror all data and code used for this inbox