Browse Source

fixed " error

master
chris 21 years ago
parent
commit
fe7d9b40be
2 changed files with 2 additions and 0 deletions
  1. +1
    -0
      insertdata.pl
  2. +1
    -0
      newmember.pl

+ 1
- 0
insertdata.pl View File

@@ -24,6 +24,7 @@ my $env;
foreach my $key (@names){
$data{$key}=$input->param($key);
$data{$key}=~ s/\'/\\\'/g;
$data{$key}=~ s/%22/\\\"/g;
}
my $dbh=C4Connect;
my $query="Select * from borrowers where borrowernumber=$data{'borrowernumber'}";


+ 1
- 0
newmember.pl View File

@@ -137,6 +137,7 @@ if ($insert eq ''){
my $i=0;
my @inputs;
while (my ($key, $value) = each %data) {
$value=~ s/\"/%22/g;
$inputs[$i]=["hidden","$key","$value"];
$i++;
}


Loading…
Cancel
Save