Failed connection to db ipdb.  Can't continue.");
    exit;
  }
  $custid = $_REQUEST['custid'];
  if (isset($_REQUEST['deletecust'])) {
    print "
Deleting $custid from WHOIS\n".
	"Deleting $custid from WHOIS
\n".
	"Back to admin
\n".
	"Back to WHOIS customer list\n";
    $qu = pg_exec ("DELETE FROM customers WHERE custid='$custid'");
    if (!$qu) {
      print "Error deleting $custid.  Mail Kris.\n";
    }
    print "\n";
    exit;
  }
?>
[IPDB admin] Updating WHOIS data
Updating WHOIS data for  print $custid; ?>
Back to admin
Back to WHOIS customer list
// snag form data into local vars.  Not being excessively paranoid because we're
// buried deep and this is a hack anyway.
  $name = $_REQUEST['name'];
  $addr1 = $_REQUEST['addr1'];
  $addr2 = $_REQUEST['addr2'];
  $city = $_REQUEST['city'];
  $prov = $_REQUEST['prov'];
  $country = $_REQUEST['country'];
  $pocode = $_REQUEST['pocode'];
  $phone = $_REQUEST['phone'];
  $tech = $_REQUEST['tech'];
  $abuse = $_REQUEST['abuse'];
  $admin = $_REQUEST['admin'];
  $rdns = $_REQUEST['rdns'];
  $special = $_REQUEST['special'];
  $qu = pg_exec ($db_conn, "UPDATE customers SET name='$name',street='$addr1',street2='$addr2',".
		"city='$city',province='$prov',country='$country',pocode='$pocode',phone='$phone',".
		"tech_handle='$tech',abuse_handle='$abuse',admin_handle='$admin',".
		"def_rdns='$rdns',special='$special' WHERE custid='$custid'");
  echo "".
	"| CustID | $custid | 
\n".
	"| Name | $name | 
\n".
	"| Street address | $addr1 | 
\n".
	"| Address 2 | $addr2 | 
\n".
	"| City | $city | 
\n".
	"| Province | $prov | 
\n".
	"| Country | $country | 
\n".
	"| Postal code | $pocode | 
\n".
	"| Phone | $phone | 
\n".
	"| Tech handle | $tech | 
\n".
	"| Abuse handle | $abuse | 
\n".
	"| Admin handle | $admin | 
\n".
	"| Default rDNS | $rdns | 
\n".
	"| \"Special\" | $special | 
\n".
	"
\n";
?>